| |
|
|
- page 1 - |
|
Roberto | Guten journée il me faut la fois wieder hilfe. je veux faire, dass si je sur un Bild klicke une Dossier ouvert wird. comment pourrait je cela faire. ici mon bisheriger Code
declare passwindow&,e%
Windowtitle RHP Windows
Fenêtre 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
si 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 | c'est dmit je cela komplette bild vois |
|
|
| |
|
|
|
Paul Glatz | Hie un neuer Code: KompilierenMarqueSéparationdeclare 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. peux du mir encore qui souris Coordinaten expliquer. quoi bedetet cela si Souris(54,586-54+99,586+30) alors qui payons |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Ist déjà! KompilierenMarqueSéparationdeclare 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 | et maintenant encore s'il te plaît les numéros expliquer |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | j'ai alles im Code avec komentaren erklärt |
|
|
| |
|
|
|
Roberto | oui mais net qui Koordinaten si Souris(54,586-54+99,586+30) |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | |
|
| |
|
|
|
Roberto | oui mais quoi bedeuten qui Einzelne payons Zb quelle ist qui numéro pour x et y |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Aider trop XProfan 11
@Souris(X1,Y1 - X2,Y2)
X1,Y1 : Integer - linke obere coin X2,Y2 : Integer - rechte untere coin
Ergebnis: Integer (0 ou bien 1) cela Ergebnis ist 1, si beim letzten Mausklick qui souris im angegebenen Bereich était.
|
|
|
| |
|
|
|
Roberto | Ne je mon cela si Souris(54,586-153,616) Pour quoi steht 54 x ou bien y et quoi bedeutet 586-153 x ou bien y et 616? |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | alors
54 = X dessus à gauche (X1) 586 = Y dessus à gauche (Y1) 153 = X unten à droite (X2) 616 = Y unten à droite (Y2) |
|
|
| |
|
|