| |
| |
|
Alfred
Wagner | Hello Profaner
i want a File loading with the commands
File$ = @LoadFile$(File select, *.EXE)
so far no trouble.
but how can I thereby check whether the Open or the Cancel Button chosen watts.
thanks already time in the vorhinein
Regards
Alfred |
|
| |
| |
| |
|
|
Alfred
Wagner | trouble yourself resolved
CompileMarkSeparationDeclare Datei$,Laden&,ENDE%
Proc LoadFile
Datei$ = @LoadFile$(Datei auswählen, *.EXE)
If Datei$ >
Print Öffnen gewählt
else
Print Abbrechen gewählt
EndIf
EndProc
cls
Laden&=Control(BUTTON,Laden,1409351680,200,20,70,22,%HWND,0,%hinstance,0)
SETFOCUS(%HWND)
WHILENOT ENDE%
WAITINPUT
If %KEY=2
ENDE%= 1
ELSEIF %KEY=4
ELSEIF GETFOCUS(Laden&) BUTTON
LoadFile
ENDIF
ENDWHILE
Regards
Alfred |
|
| |
| |
| |
|
|
| @Alfred
give time in the Profan-Help %Button one - there stand the actual Options for your trouble 
The in a MessageBox or one the vordefinierten dialogs squeezed button:
1 -OK
2 -Cancel (Cancel)
3 -Cancel (miscarriage)
4 -repeat
5 -ignore
6 -Yes
7 -No
with vordefinierten Dialogen becomes either 1 for OK or 2 for Cancel zurückgegeben.
|
|
| |
| |
| |
|
|
 | | Ungetestet but File > would I do not recommend. rather on Datei= abprüfen. If the Dateiname -1 heissen would could your check failure. As I said - ungeprüft. |
|
| |
| |
| |
|
|
RGH | iF
Ungetestet but File > would I do not recommend. rather on Datei= abprüfen. If the Dateiname -1 heissen would could your check failure. As I said - ungeprüft.
eachone String the characters contains, is with one Stringvergleich larger as . The request File$ > is means completely correctly and sure.
Greeting
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 04/15/07 ▲ |
|
| |
|
|
| | OK. me fell there only The autom.Typenkonvertierung one which the had failure let can. |
|
| |
| |
| |
|
(880)
Deutsch
English
Français
Español
Italia