---

Jeg har lavet et lille terningespil med tre knapper, bla en
close-knap. Jeg har selvfølgelig skrevet Close; i programmet
når man vil forlade programmet. Men jeg ville gerne lave det
sådan, at hvis det aller første man trykker på er Close-knappen,
så skal den komme op med en ShowMessage('Skal du ikke lige
spille et spil først'); eller lign. Jeg ved ikke helt hvordan jeg skal
klare den. Jeg tror jeg skal skrive noget mit hovedeprograms
OnCreat-hændelse med jeg kan ikke hitte ud af det.

---

"Texas" <boxjunk2600@hotmail.com> wrote in message
news:9mivs7$234b$1@news.cybercity.dk...
> Jeg har lavet et lille terningespil med tre knapper, bla en
> close-knap. Jeg har selvfølgelig skrevet Close; i programmet
> når man vil forlade programmet. Men jeg ville gerne lave det
> sådan, at hvis det aller første man trykker på er Close-knappen,
> så skal den komme op med en ShowMessage('Skal du ikke lige
> spille et spil først'); eller lign. Jeg ved ikke helt hvordan jeg skal
> klare den. Jeg tror jeg skal skrive noget mit hovedeprograms
> OnCreat-hændelse med jeg kan ikke hitte ud af det.

Nærmer OnClose. Når du kalder Close; så vil OnClose blive kaldt og i denne
kan du så tillade dit program at lukke eller ej.

if messagedlg('Skal du ikke spille først?',mtconfirmation, [mbyes,
mbno],0)=mryes then canclose:=true
else canclose:=false;

Som du kan se sætter jeg CanClose alt efter om programmet nu skal lukke
eller ej.

Håber det hjælper lidt

MVH
Thomas

---

"Thomas Eg Jørgensen" <thomas@kontorbutikken.dk> wrote in
news:9mj0e8$23v3$1@news.cybercity.dk:

>
> "Texas" <boxjunk2600@hotmail.com> wrote in message
> news:9mivs7$234b$1@news.cybercity.dk...
>> Jeg har lavet et lille terningespil med tre knapper, bla en
>> close-knap. Jeg har selvfølgelig skrevet Close; i programmet
>> når man vil forlade programmet. Men jeg ville gerne lave det
>> sådan, at hvis det aller første man trykker på er Close-knappen, så
>> skal den komme op med en ShowMessage('Skal du ikke lige spille et
>> spil først'); eller lign. Jeg ved ikke helt hvordan jeg skal klare
>> den. Jeg tror jeg skal skrive noget mit hovedeprograms
>> OnCreat-hændelse med jeg kan ikke hitte ud af det.
>
> Nærmer OnClose. Når du kalder Close; så vil OnClose blive kaldt og i
> denne kan du så tillade dit program at lukke eller ej.
>
> if messagedlg('Skal du ikke spille først?',mtconfirmation, [mbyes,
> mbno],0)=mryes then canclose:=true
> else canclose:=false;
>
> Som du kan se sætter jeg CanClose alt efter om programmet nu skal
> lukke eller ej.

Du mener: OnCloseQuery...

Claus

--
Claus Christiansen, <mailto:cch@unipeople.dk>

personal: http://www.bigfoot.com/~kruc/; pythia: http://www.pythia.dk
============================================--------------------------
"Computers are useless. They can only give you answers."
- Pablo Picasso (1881-1973)

---

"Claus Christiansen" <kruc@bigfoot.com> wrote in message
news:Xns910CC05C7186Dkrucsid@192.168.1.2...
> > Nærmer OnClose. Når du kalder Close; så vil OnClose blive kaldt og i
> > denne kan du så tillade dit program at lukke eller ej.
> Du mener: OnCloseQuery...

selvfølgelig, dummeslag til mig

MVH
Thomas

---

"Texas" <boxjunk2600@hotmail.com> wrote in message news:<9mivs7$234b$1@news.cybercity.dk>...
> Jeg har lavet et lille terningespil med tre knapper, bla en
> close-knap. Jeg har selvfølgelig skrevet Close; i programmet
> når man vil forlade programmet. Men jeg ville gerne lave det
> sådan, at hvis det aller første man trykker på er Close-knappen,
> så skal den komme op med en ShowMessage('Skal du ikke lige
> spille et spil først'); eller lign. Jeg ved ikke helt hvordan jeg skal
> klare den. Jeg tror jeg skal skrive noget mit hovedeprograms
> OnCreat-hændelse med jeg kan ikke hitte ud af det.

Det du kan gøre er at du definere en variabel i private sektionen.
Vi kan kalde den FHasPlayed : Boolean; Den sætter du så til FALSE i
formens OnCreate event som du selv skriver. (Den bliver initialiseret
til FALSE, men hvis du vil være sikker...)

Når du så lukker programmet kan du jo checke variablen i formens
OnCloseQuery event som fanger alle nedlukningsformerne (din Close
knap, krydset i øverste hjørne, system menuens luk osv).

Der checker du om FHasPlayed er FALSE og hvis den er så returnerede
du sætter du CanClose (den Var parameter der kommer ind i OnCloseQuery)
til FALSE.

Så skal du jo så selvfølgelig huske at sætte FHasPlayed til TRUE, når
du HAR spillet et spil.

Mvh
Thomas