Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Tastaturspeicher

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Spongebob Schwamm



Anmeldungsdatum: 31.10.2004
Beiträge: 40

BeitragVerfasst am: 26.02.2005, 19:39    Titel: Tastaturspeicher Antworten mit Zitat

Hi!
Wie kann ich den Tastaturspeicher leren?

mfg
Spongebob Schwamm
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland

BeitragVerfasst am: 26.02.2005, 19:48    Titel: Antworten mit Zitat

Hallo.

Siehe MonFAQ: http://www.antonis.de/faq/qbmonfaq-dateien/582178051.html

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Mecki
Igel


Anmeldungsdatum: 10.09.2004
Beiträge: 985
Wohnort: Niederbayern

BeitragVerfasst am: 26.02.2005, 20:50    Titel: Antworten mit Zitat

Ganz oben muss es allerdings heißen:
Code:
WHILE INKEY$ <> " ": WEND
Hey, hey Wiki, sag ich da nur grinsen
_________________
» Yodl.de: So sucht man gestern. verwundert
» Geld verdienen im Netz + ICQ.
» Firefox!
» 100€ zu gewinnen
» FreeBASIC.de
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen AIM-Name Yahoo Messenger MSN Messenger
jb



Anmeldungsdatum: 14.01.2005
Beiträge: 2010

BeitragVerfasst am: 26.02.2005, 20:55    Titel: Antworten mit Zitat

Wurde 5 Topics vorher schon erklärt...

siehe "Hat QB einen Bug"

jb
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Paul
aka ICC, HV-Freak


Anmeldungsdatum: 11.09.2004
Beiträge: 588
Wohnort: Uelzen

BeitragVerfasst am: 27.02.2005, 00:09    Titel: Antworten mit Zitat

Code:

FOR a = 1 TO 15
doof$ = INKEY$
NEXT a


[ durchgeknallt ]
_________________
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Spongebob Schwamm



Anmeldungsdatum: 31.10.2004
Beiträge: 40

BeitragVerfasst am: 27.02.2005, 13:31    Titel: Das war ein Fehler Antworten mit Zitat

Hi!

Da hab ich glaub ich was falsches beschrieben. Ich habe 30 Line Input Behfele hintereinander so und weil ich 25 davon nicht beantworten kann leg ich sozusagen ein Stein auf die Enter Taste dass heist dass die ganzen Input hintereinander mit einem "Enter" beantwortet werden aber der 31 Input ist der wichtigste und damit ich den nicht auch überspringe soll die Tastatur sozusagen "Gestoppt" werden.

mfg
Spongebob Schwamm
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte

BeitragVerfasst am: 27.02.2005, 19:06    Titel: Antworten mit Zitat

Hm.,.das erninnert mich an die Cheatbox CT.EXE lächeln Da konnte man 1 odr so drücken,dann wurde ein cheat aktivier.-aber ich schweife ab...
Man müsste von einem externen programm den tastaurpuffer modifizieren!
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Dusky_Joe



Anmeldungsdatum: 07.01.2005
Beiträge: 1007
Wohnort: Regensburg/Oberpfalz

BeitragVerfasst am: 27.02.2005, 19:40    Titel: Antworten mit Zitat

hmm.... mir fällt zu dem problem auch nix anderes ein, als eine alternative routine zu schreiben. die könnte dann prüfen, ob die länge der eingabe 0 ist. und wenn, dann soll eine meldung ausgegeben werden, dass du etwas eigeben musst, oder so...

Code:

SUB AltInput (Prompt$, row, col, Ant$)
LOCATE row, col
PRINT Prompt$;

GetKey:
k$ = INKEY$
SELECT CASE k$
 CASE CHR$(8) 'Backspace
   ....
 CASE CHR$(13) 'Enter
  GOTO EndOfSub

 CASE CHR$(0) 'Keine Taste gedrückt

 CASE ELSE
  Ant$ = Ant$ + k$
END SELECT
GOTO GetKey

EndOfSub:
END SUB



für Backspace musst du dir was einfallen lassen. Geht ganz einfach, hab ich auch schon gemacht, bin nur zu faul, meine codes zu durchsuchen.... cool

Das wäre dann mal das Grundgerüst dazu.
Jetzt müsstest du nur an EndOfSub So was einbauen, wie:

Code:

IF LEN(Ant$) = 0 THEN ...


praktisch wäre natürlich, wenn du angeben könntest, ob die eingabe wichtig ist:

Code:

SUB AltInput (Prompt$, row, col, Ant$, wichtig)

...

EndOfSub:
IF wichtig THEN
...
END SUB



Ich hoffe bloß, dir ist das nicht zu umständlich *g*
Viel spaß damit!
_________________
fully biological degradable

Once, the big wave arrives, you've got two ways, you can go:
Either, you ride it, or you don't do.
But, if you don't ride, you'll never know wether you'd have gone wet.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz