| |
|
|
- Page 1 - |
|
Roberto | Guten Tag Ich brauche mal wieder hilfe. Ich will machen, dass wenn ich auf ein Bild klicke eine File geöffnet wird. Wie potuto ich das machen. Hier mein bisheriger Code
declare passwindow&,e%
Windowtitle RHP Windows
Window 50,20 - 800,600
startpaint passwindow&
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
endpaint
whilenot e%
WaitInput
if Clicked 54,586;0
LoadBMP RHPVISTA.BMP,54,69;0
Waitinput
end
|
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 19.02.2009 ▲ |
|
|
|
| |
|
- Page 2 - |
|
|
Paul Glatz | Das ist dmit ich das komplette bild sehe |
|
|
| |
|
|
|
Paul Glatz | Hie ein neuer Code: KompilierenMarkierenSeparierendeclare passwindow&,e%,i%
Windowtitle RHP Windows
Window 50,20 - 900,700
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
whilenot e%
WaitInput
if Mouse(54,586-54+99,586+30)
if i% = 1 Ist das Startmenu offen
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
repaint neu malen
i% = 0 Starmenu zu
elseif i% = 0 es ist zu!
LoadBMP STARTPUSHED.BMP,54,91;0
repaint neu malen
i% = 1 Startmenu offen
endif
endif
endwhile
|
|
|
| |
|
|
|
Roberto | Cool thx hat geklappt. Kannst du mir noch die Maus Coordinaten Erklären. Was bedetet das if Mouse(54,586-54+99,586+30) also die zahlen |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Ist schon! KompilierenMarkierenSeparierendeclare passwindow&,e%,i%
Windowtitle RHP Windows
Window 50,20 - 900,700
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
whilenot e%
WaitInput
if Mouse(54,586-54+99,586+30)
if i% = 1 Ist das Startmenu offen
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
repaint neu malen
i% = 0 Starmenu zu
elseif i% = 0 es ist zu!
LoadBMP STARTPUSHED.BMP,54,91;0
repaint neu malen
i% = 1 Startmenu offen
endif
endif
endwhile
|
|
|
| |
|
|
|
Roberto | Und jetzt noch bitte die Zahlen Erklären |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Ich habe alles im Code mit komentaren erklärt |
|
|
| |
|
|
|
Roberto | Ja aber net die Koordinaten if Mouse(54,586-54+99,586+30) |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | |
|
| |
|
|
|
Roberto | Ja aber was bedeuten die Einzelne Zahlen Zb Welche ist die Zahl per x und y |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Aiuto zu XProfan 11
@Mouse(X1,Y1 - X2,Y2)
X1,Y1 : Integer - linke obere Ecke X2,Y2 : Integer - rechte untere Ecke
Ergebnis: Integer (0 oder 1) Das Ergebnis ist 1, wenn beim letzten Mausklick die Maus im angegebenen Bereich war.
|
|
|
| |
|
|
|
Roberto | Ne ich mein das if Mouse(54,586-153,616) Für was steht 54 x oder y und was bedeutet 586-153 x oder y und 616? |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Also
54 = X oben links (X1) 586 = Y oben links (Y1) 153 = X unten rechts (X2) 616 = Y unten Rechts (Y2) |
|
|
| |
|
|