| |
|
|
Roberto | je voudrais den corbeille à papier par klick sur une Button ouvrir habe aussi den Code pour mais si je sur den Button klicke passiert rien
var x% = 280
var y% = 75
PROC PRG_START
var ergebnis& = WinExec(corbeille à papier.exe,1)
var ergebnis& = WinExecWait(corbeille à papier.exe,1)
si ergebnis& = 0
Messagebox(faute beim Starten des Programmes,F E H L E R,4112)
end
endif
ENDPROC
Fenêtre Style 31
Titre de la fenêtre Externes Programme starten
Fenêtre (%MaxX - x%)/ 2,(%MaxY - y%)/ 2 - x%,y%
var Papierkorb& = Créer(Button,%HWnd,corbeille à papier öffnen,5,Height(%HWnd) - 30,140,25)
var exit& = Créer(Button,%HWnd,finissons,Width(%HWnd) - 85,Height(%HWnd) - 30,80,25)
var e% = 0
whilenot e%
waitinput
si Clicked(exit&)
e% = 1
elseif Clicked(Papierkorb&)
PRG_START
endif
endwhile
end
|
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 18.02.2009 ▲ |
|
|
|
|
Roberto | peux mir car aucun aider? |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 18.02.2009 ▲ |
|
|
|
|
Paul Glatz | Salut, den corbeille à papier appelles du so sur:
var x% = 280
var y% = 75
PROC PRG_START
var ergebnis& = WinExec(explorer /n,::{645FF040-5081-101B-9F08-00AA002F954E},1) corbeille à papier ouvrir!
var ergebnis& = WinExecWait(corbeille à papier.exe,1)
si ergebnis& = 0
Messagebox(faute beim Starten des Programmes,F E H L E R,4112)
end
endif
ENDPROC
Fenêtre Style 31
Titre de la fenêtre Externes Programme starten
Fenêtre (%MaxX - x%)/ 2,(%MaxY - y%)/ 2 - x%,y%
var Papierkorb& = Créer(Button,%HWnd,corbeille à papier öffnen,5,Height(%HWnd) - 30,140,25)
var exit& = Créer(Button,%HWnd,finissons,Width(%HWnd) - 85,Height(%HWnd) - 30,80,25)
var e% = 0
whilenot e%
waitinput
si Clicked(exit&)
e% = 1
elseif Clicked(Papierkorb&)
PRG_START
endif
endwhile
end
|
|
|
| |
|
|
|
Roberto | |
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 18.02.2009 ▲ |
|
|
|
|
Paul Glatz | Salut, je peux pas nachvollzihen quoi chez DIR pas klappt. Giebt es une annonce ou bien quoi?? |
|
|
| |
|
|
|
Roberto | non chez mir passiert simple le fil rien si je sur den Button klicke |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 19.02.2009 ▲ |
|
|
|
|
Paul Glatz | Salut,
versuch la fois s'il te plaît si folgendes klapt:
|
|
|
| |
|
|
|
Roberto | Klappt mais quoi devoir qui ganzen payons bedeuten alors qui corbeille à papier wird comment gewollt ouvert |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 19.02.2009 ▲ |
|
|
|
|
Paul Glatz | Salut, versuch la fois s'il te plaît:
var x% = 280
var y% = 75
PROC PRG_START
declare ergebnis%
ergebnis% = WinExec(explorer /n,::{645FF040-5081-101B-9F08-00AA002F954E},1) corbeille à papier ouvrir!
var ergebnis& = WinExecWait(corbeille à papier.exe,1)
si ergebnis% = 0
Messagebox(faute beim Starten des Programmes,F E H L E R,4112)
end
endif
ENDPROC
Fenêtre Style 31
Titre de la fenêtre Externes Programme starten
Fenêtre (%MaxX - x%)/ 2,(%MaxY - y%)/ 2 - x%,y%
var Papierkorb& = Créer(Button,%HWnd,corbeille à papier öffnen,5,Height(%HWnd) - 30,140,25)
var exit& = Créer(Button,%HWnd,finissons,Width(%HWnd) - 85,Height(%HWnd) - 30,80,25)
var e% = 0
whilenot e%
waitinput
si Clicked(exit&)
e% = 1
elseif Clicked(Papierkorb&)
PRG_START
endif
endwhile
end
|
|
|
| |
|
|
|
Roberto | oui parfait mais je veux aussi encore autre Fichiers ouvrir. alors quoi bedeuten qui ganzen payons pour EXLPORER |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 19.02.2009 ▲ |
|
|
|
|
Paul Glatz | Salut, cela sagt dem Windows-Explorer cela il den corbeille à papier ouvrir soll. Weche Programme wilst du ouvrir?? |
|
|
| |
|
|
|
Roberto | |
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 19.02.2009 ▲ |
|
|
|