Das deutsche QBasic- und FreeBASIC-Forum

[Leader4]

Hallo.

Wie kann ich es in FBasic einrichten, dass ich ein Fenster, das in einem Screen-Modus erstellt wurde (z. B. Screen 19) über das Kreuz ( X ) in der Titelleiste beendet werden kann.

Ginge dass zum Beispiel etwa in der Art:

If (.....) Then System ?


Freundliche Grüße,
Leader4.
_________________
Ein richtiger Programmierer muss so richtig faul sein und sich den ganzen Tag mit der Frage beschäftigen, wie man mal wieder etwas einfacher machen kann.

[MisterD]

INKEY=CHR(255,104) ist glaub ich die Abfrage die du suchst (entspricht Alt+F4, 104 ist ascii für k und 255 ist steuerzeichen.)
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[Leader4]

Hmm, also ich hab das mal in einer kleinen Schleife probiert:

[max06]

vielleicht so?

[Jojo]

MisterD hat die falschen zahlen angegeben. der shortcut ist 255+"k", also chr(255,107)
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[Leader4]

Ja, mit der Zahl 107 hat es geklappt.


Danke an euch!


Grüße,
Leader4.
_________________
Ein richtiger Programmierer muss so richtig faul sein und sich den ganzen Tag mit der Frage beschäftigen, wie man mal wieder etwas einfacher machen kann.

[MisterD]

oh, wars 107? oO *merk*
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[Jojo]

deswegen nehm ich immer chr(255)+"k" ... kann ich mir besser mekren
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[volta]

ich benutze oft einen Standardcodeblock um mehrere 'Programmfluchtmöglichkeiten' einzubinden.

[Jojo]

Während der erstellungs- und testphase könnte es recht nützlich sein, für sowas einen Thread zu erstellen, da man dann eigentlich doch fast immer (außer bei nem komplettern einfrieren des programmes) wieder rauskommt...
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.