Das deutsche QBasic- und FreeBASIC-Forum

[Helli M.]

Hallo an Euch!!!

Ich habe schon angefangen zu lernen, natürlich versuche ich alles umzusetzen, aber das mit dem Beispiel, in den Monsterfaq wie man das Programm immer mit escape abbrechen kann, geht irgendwie nicht...
ich habe es so gemacht:
do
print.....
.....
loop while inkey$<>CHR$(27)

Was habe ich falsch gemacht???
Ich werde bis zum erbrechen nach dem namen gefragt, und auch nett begrüßt, aber ich kann niemals nie nicht mit escape beenden!!!
Wieso nicht??
Bitte gebt mir einen kleinen Schubs, ich sitz grad auf der Leitung...
:fragezeichen:
Vielen Dank an Euch!!
Viele liebe Grüße und
Ein gutes neues Jahr
wünscht Euch
Helli

[Helli M.]

Hallo, nochmal!!!

Ich habe vergessen, dass ich nach loop in der nächsten zeile noch
end
geschrieben habe!!!

Es sieht also so aus:
do
print....
....
loop while inkey$ CHR$<>(27)
end

Das hatte ich vergessen!!!
Noch mal
einen lieben Gruß
Helli

[Mecki]

Es wäre möglich, dass du in der Do-Loop-Schleife bereits INKEY$ abfragst für was anderes und somit der Tastaturpuffer bereits leer ist, wenn am Ende der Schleife auf ESC-Druck überprüft wird.
Du überbrückst dies, indem du INKEY$ nur ein einziges mal ausliest:

[Helli M.]

Hallo Mecki!!!

Leider ist das nicht das Problem...es geht nicht, ich hab es auf verschiedene Art versucht, aber es geht nie...

Ich verstehe auch irgendwie den Befehl nicht??

Ich meine, ich frage nach, welche Taste gedrückt ist, aber wie weiß QBasic, was es dann machen soll, wenn die Taste gedrückt ist??

Wie es gehen soll, hab ich mir so gedacht, ich weiß nicht, ob es stimmt, bitte sagt mir, ob ich auf dem Holzweg bin:
Also, ich dachte es geht so:
ich sage QB das:
i=0,
und wenn i=1 dann ist ende
wenn die Taste CHR$(27) gedrück ist, dann ist i=1
und folglich Ende!
(Diesen Befehl müßte man dann doch am Anfang jeden Programmes stehen haben können, oder??)
Aber bei dem Befehl in den Monfaq komm ich nicht mit???
Dort verstehe ich das nur so:
mache das:
schau welche Taste gedrückt ist
wiederhole sofort wenn CHR$(27) gedrückt wurde

Anders versteh ich es nicht...bin ich echt sooo blond???
Bitte helft mir wieder!!!
Viele Grüße und
Prosit Neujahr!!!!!
Helli

[Mecki]

Also das das mit dem i ist denke ich nicht notwendig.

Einfach:

[Helli M.]

Hallo Mecki!!!

Auch das geht nicht...
Ich schreibe das her, was ich auch da habe, vielleicht kommst Du drauf, was da schief geht...

cls
? "wie ist dein name?"
nochmal:
input name$
if name = "" then goto nochmal
else ? "hallo, "; name$ + " schön dich kennenzulernen!"
end if

Vorher habe ich mit anderer Hintergrundfarbe meinen namen und meine email adresse für 3 sekunden hingeschrieben, dann eben das cls!!

Weißt Du wo da "der Hund begraben" liegt???
Ich hoffe sehr, dass es nicht ist, weil das XP irgendwas verhindert, oder stört...
Liebe Grüße
Helli

[Kai Bareis]

das problem liegt beim INPUT name$
nachs du vielleicht so das wen man Exit eingibt das programm entweder beendet wird oder abbricht

[Skilltronic]

Hallo !

Ist das der Teil, der in der DO...LOOP Schleife steht ? Wenn ja, dann geht es nicht, weil INPUT das Programm anhält, bis Enter gedrückt wurde. Alternativ könntest du ja beenden, wenn nichts eingegeben wird anstelle zu nochmal: zurückzukehren. Oder du machst die ganze Eingabe mit INKEY$ selbst, indem du Zeichen für Zeichen aneinanderhängst, bis Enter oder ESC gedrückt wurde.

Gruss
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[Helli M.]

Hallo Ihr!!!

Vielen Dank! Jetzt verstehe ich, wieso es nicht geht... aber in den meisten Programmen wird ja dauernd eine Eingabe verlangt, dann greift diese Do Loop Schleife eigentlich nie???
Wie löst man das Problem denn dann???
Ich habe es so gemacht, wie ich anfangs gemeint hab:
for i=0 to 1
if inkey$=chr$(27) then i=1
next i
Das hab ich an den Anfang gesetzt, jetzt kann man das Programm zwar nicht während einer Eingabeaufforderung beenden, aber immer dazwischen, oder????

Was meint Ihr, kann man das so lassen, oder ist das irgendwie blöd??
Alles Gute für Euch
liebe Grüße
Helli

[Mecki]

Hi Helli!

Nein, das ist eben das Problem, das ich in meinem Posting oben schon angesprochen habe.

Sobald du INEKY$ ausliest, ist der Tastaturpuffer damit ausgelesen und somit (meistens) leer.
Beim nächsten INKEY$, das wohl nur Sekundenbruchteile später kommt, ist natürlich noch keine Taste zum Puffer hinzugekommen.

Daher darf man das Inkey$ nur einmal pro Schleifendruchgang auslesen.

[Helli M.]

Hallo an Euch!!!

Ich habe einen Befehl gefunden, der key on heißt!
Könnte ich vielleicht den verwenden, um das Programm "immer" mit Escape abzubrechen??
Oder besteht das Problem mit dem leeren Puffer, egal welchen Befehl ich verwende??
Den key on habe ich schon versucht, aber er will immer irgendnoch was wissen, dabei hab ich (glaub ich halt) die Syntax richtig, würdet Ihr mir bitte anhand einer Zeile diesen key Befehl zeigen??
Vielen Dank!!!!
Liebe Grüße
Helli

[Skilltronic]

Hallo

Sieh dir doch mal die QB-Onlinehilfe oder die Monster-FAQ auf qbasic.de an, oder gib ON KEY als suchbegriff hier im Forum an. Das ist eine von den Sachen die schon -zig mal erklärt wurden.

Der ON KEY-Befehl funktioniert aber auch nicht, während auf eine Eingabe mit INPUT gewartet wird.

So kannst du z.B. mit F1 abbrechen:

KEY (1) ON
ON KEY (1) GOSUB raushier
...
...
raushier:
END

Gruss
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[Helli M.]

Hallo Skilltronic!!!

Ich bin noch nicht durch, mit dem durchforsten!!
Das ist eine gute Idee von Dir gewesen!!
Weißt, man denkt so an sein Problem, dass man gleich um Hilfe schreit, wenn man nicht weiterkommt, man denkt gar nicht daran, dass andere auch so ein Problem haben könnten!!!
Danke für den Tipp, ich schau jetzt, bevor ich wieder gleich um Hilfe ruf!!!
viele Grüße
Helli

[Bernd]

Ehm, sicher, dass das Problem nicht folgendes war?

loop until while inkey$ <> CHR$(27)

Wieso hast du da statt = einfach <> genommen, oder ist das in QB gleichbedutend?

Ich würds auf alle Fälle mal ausprobieren!

Die Anderen habens zwar schon ausgebessert in ihren Codes, aber wenn ichs nicht überlesen habe, nicht ausdrücklich daraufhin gewießen!

Bernd
_________________
Neue Homepage: http://www.glubb.rockt.de

UND

Der Wahnsinn hat seine eigene Homepage: http://pulmollwand.rulz.de

[Gremlin]

[Skilltronic]

Hallo !

[Helli M.]

Hallo Scilltronic!!!!


Ich bin begeistert!!!

Diese Antwort hat mir genau das gesagt, was ich wissen wollte!!
Durch diesen Link hast Du mir genau klar gemacht, worauf es ankommt!!
So freue ich mich echt aufs weiterlernen!!!

Viele Grüße
und alles Gute
Helli
_________________
Wieso einfach, wenn's auch kompliziert geht?!