 |
Das deutsche QBasic- und FreeBASIC-Forum Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
|
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Digga

Anmeldungsdatum: 07.01.2006 Beiträge: 48
|
Verfasst am: 26.03.2007, 19:28 Titel: ALT-Taste abfragen |
|
|
Hallo alle zusammen
Hab ein kleines Problem. Würde gerne eine eigene Mnüleiste erstellen und mit hilfe z.B. von ALT + d, den Menüpunkt Datei aufrufen.
Menüleiste
Code: |
screen 19
color 0,15
cls
line (0,0)-(799,15),29,BF
line (0,16)-(799,16),28
line (0,17)-(799,17),27
line (0,18)-(799,18),26
line (0,19)-(799,19),25
line (0,20)-(799,20),24
line (0,21)-(799,21),23
color 0, 29
print " Datei Bearbeiten Ansicht Extras"
line (8,13)-(14,13),0
line (8,14)-(14,14),0
line (8,13)-(14,13),0
line (8,14)-(14,14),0
sleep
|
gruß Digga |
|
Nach oben |
|
 |
ThePuppetMaster

Anmeldungsdatum: 18.02.2007 Beiträge: 1839 Wohnort: [JN58JR]
|
Verfasst am: 26.03.2007, 19:32 Titel: |
|
|
Du willst also wissen, wann Alt gedrückt wurde?
Wenn du in FB ne abfrage für die Shift Taste dhast, kannst du diese auch für Alt nutzen .. der Code is nur ein anderer
Shift = 1
STRG = 2
Alt = 4
Mit GetKeystate gehts ähnlich
MfG
TPM _________________ [ WebFBC ][ OPS ][ ToOFlo ][ Wiemann.TV ] |
|
Nach oben |
|
 |
Digga

Anmeldungsdatum: 07.01.2006 Beiträge: 48
|
Verfasst am: 26.03.2007, 19:36 Titel: |
|
|
Nein hab ich leider nicht
Hast du eine?
Wäre echt net |
|
Nach oben |
|
 |
Eternal_pain

Anmeldungsdatum: 08.08.2006 Beiträge: 1783 Wohnort: BW/KA
|
Verfasst am: 26.03.2007, 19:53 Titel: |
|
|
Ich wollte eigentlich gerade einen kurzen versuch machen mit Multikey(&h38) and Inkey$="d"
aber irgendwie funzt das nicht so wie ich mir das gedacht habe....
Inkey gibt bei alt immer ein Chr$(255) vorweg, wie auch das Chr$(255)+"k" für das fenster schliessen ect, aber wie frage ich jetzt nach einer spezifischen tastenkombination ab ?!
Edit:
if key=chr$(255)+chr$(32) then ?"TEST"
das ist jetzt Alt+"D" allerdings weiss ich nicht warum der code 32 für "d" steht  _________________
 |
|
Nach oben |
|
 |
Digga

Anmeldungsdatum: 07.01.2006 Beiträge: 48
|
Verfasst am: 26.03.2007, 20:10 Titel: |
|
|
Danke das ist genau das was ich gesucht habe
Ist das normal das der Rechner tutet wenn ich die Tastenkombination benutze? |
|
Nach oben |
|
 |
Eternal_pain

Anmeldungsdatum: 08.08.2006 Beiträge: 1783 Wohnort: BW/KA
|
Verfasst am: 26.03.2007, 20:11 Titel: |
|
|
will es nicht beschwören, aber meiner tutet auch  _________________
 |
|
Nach oben |
|
 |
Digga

Anmeldungsdatum: 07.01.2006 Beiträge: 48
|
Verfasst am: 27.03.2007, 20:02 Titel: |
|
|
Da bin ich noch mal
Hab jetzt leider noch ein Prop.
Wenn ich diesen Code ausführe:
Code: |
declare sub Menue_Datei
screen 19,24,,,60
color RGB(0,0,0),RGB(255,255,255) 'Schrift-und Hintergrundfarbe
cls
line (0,0)-(1279,15),RGB(207,207,207),BF 'Grauer Menuebalken
line (0,16)-(1279,16),RGB(181,181,181) '****************************
line (0,17)-(1279,17),RGB(156,156,156) '* *
line (0,18)-(1279,18),RGB(130,130,130) '* Abstufung des Balken in *
line (0,19)-(1279,19),RGB(105,105,105) '* dunklere Grautöne *
line (0,20)-(1279,20),RGB(79,79,79) '* *
line (0,21)-(1279,21),RGB(54,54,54) '****************************
color RGB(0,0,0), RGB(207,207,207) 'Schrift-und Hintergrundfarbe
print " Datei"
line (8,13)-(14,13),RGB(0,0,0) 'Unterstrich bei dem D von
line (8,14)-(14,14),RGB(0,0,0) 'Datei
do
taste$ = inkey
Select Case taste$
case chr$(255)+chr$(32)
call Menue_Datei
end select
WHILE INKEY <> "": WEND
loop until taste$ = CHR(27)
'--------------------------------------------------------------------------
Sub Menue_Datei
line (0,0)-(1279,15),RGB(207,207,207),BF
line (0,16)-(1279,16),RGB(181,181,181)
line (0,17)-(1279,17),RGB(156,156,156)
line (0,18)-(1279,18),RGB(130,130,130)
line (0,19)-(1279,19),RGB(105,105,105)
line (0,20)-(1279,20),RGB(79,79,79)
line (0,21)-(1279,21),RGB(54,54,54)
color RGB(0,0,0),RGB(169,169,169)
Locate 0,2
print "Datei"
line (8,13)-(14,13),RGB(0,0,0)
line (8,14)-(14,14),RGB(0,0,0)
line (8,15)-(200,500),RGB(169,169,169),B
line (9,16)-(199,499),RGB(255,255,255),BF
end sub
|
Nachdem die Tastenkombination gedrückt wurde, soll eigentlich Datei mit einem dunkleren grau hinterlegt werden.
Aber irgendwie schreibt er trotz locate das Wort Datei in die nächste Zeile,
die dann direkt von dem Kontexmenü überdeckt wird.
Meine frage ist jetzt, weiß einer wo mein Fehler liegt?
gruß Digga
Ps: ist nur ne Testdatei kann mir zwar auch vorstellen, das mein Problem auch mit mehreren Bilschirmseiten zu lösen ist. Aber damit kenne ich mich noch nicht so aus  |
|
Nach oben |
|
 |
Eternal_pain

Anmeldungsdatum: 08.08.2006 Beiträge: 1783 Wohnort: BW/KA
|
Verfasst am: 27.03.2007, 20:09 Titel: |
|
|
Du hast das Locate in deinem Sub vergessen...
Code: | locate 1,2:?"Datei" |
ich kann mich irren, aber bei locate gibt es glaube kein 0 _________________
 |
|
Nach oben |
|
 |
Digga

Anmeldungsdatum: 07.01.2006 Beiträge: 48
|
Verfasst am: 27.03.2007, 20:11 Titel: |
|
|
Hast recht
Hab ich total vergessen
Danke |
|
Nach oben |
|
 |
|
|
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.
|
|