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:

on key

 
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
Distelpalme



Anmeldungsdatum: 15.10.2004
Beiträge: 34
Wohnort: Basel

BeitragVerfasst am: 15.11.2004, 22:24    Titel: on key Antworten mit Zitat

Hallöle lächeln
so 2 kleine fragen. 1. Wie kann ich bei der ON KEY anweisung eine taste seber definieren? Ich will die Taste LINKS, RECHTS, OBEN und UNTEN benutzen. Problem ist dass die ON KEY anweisung nur die tasten auf dem numblock beherrscht. weinen
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden AIM-Name Yahoo Messenger MSN Messenger
Skilltronic



Anmeldungsdatum: 10.09.2004
Beiträge: 1148
Wohnort: Köln

BeitragVerfasst am: 16.11.2004, 11:05    Titel: Antworten mit Zitat

Hallo

Was du mit Tasten selber definieren meinst, versteh' ich nicht so ganz. Alles was es zur KEY- und KEY(n)-Anweisung zu wissen gibt, steht in der Direkthilfe von QB.

Das mit den Pfeiltasten wurde auch schon des öfteren erklärt. Suche mal im alten Forum oder in der Monster-FAQ auf www.qbasic.de

Im Prinzip werden bei den Pfeil- und ein paar anderen Tasten zwei Zeichen übergeben. Zuerst immer CHR$(0) und dann ein Grossbuchstabe. So kommt bei der "nach oben" Taste z.B. CHR$(0) + "H" an. Mit diesem Prorgerämmchen kannst du selber rausfinden welche Taste wie funktioniert.

Code:

CLS
DO
DO
taste$ = INKEY$
LOOP WHILE taste$ = ""
IF LEN(taste$) = 2 THEN PRINT "CHR$(0) + ";
PRINT RIGHT$(taste$, 1)
LOOP


So kannst du so eine solche Taste dann abfragen:

Code:

DO
DO
taste$ = INKEY$
LOOP WHILE taste$ = ""
IF taste$ = CHR$(0) + "M" THEN GOSUB machirgendwas
LOOP

machirgendwas:
...


Gruss
Skilltronic
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
dreael
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 2507
Wohnort: Hofen SH (Schweiz)

BeitragVerfasst am: 16.11.2004, 21:44    Titel: Antworten mit Zitat

Habe früher einmal eine Tastencode-Tabelle unter

http://www.dreael.ch/QB/Tastenbelegung.xls

erstellt, welche durch vollständiges Durchprobieren aller Tastenkombinationen unter DOS 6.22 entstanden ist.
_________________
Teste die PC-Sicherheit mit www.sec-check.net
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
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