| |
|
|
| The untenstehende code is only an example. shows but my trouble. After appeal and terminate the Papierkorbes (or of/ one others windows-function) should a action come off - here The Messagebox. unfortunately becomes the box but immediate viewed and then first becomes the wastebasket launched. How can I the Change ? CompileMarkSeparationDECLARE EE%,ende%,aufruf%
EE%=0
----------------------------------------------
PROC MELDUNG
Messagebox("Es ist vollbracht !","Meldung",64)
ENDPROC
PROC STARTE_AUFRUF
Papierkorb starten - Es kann auch eine andere Windows-Funktion sein - Das ist nur ein Beispiel
WinExec("explorer /n,::{645FF040-5081-101B-9F08-00AA002F954E}",1)
MELDUNG Der Aufruf soll erst nach dem Schliessen des Papierkorbes angezeigt werden
ENDPROC
----------------------------------------------
CLS
ende%=Create("Button",%hwnd,"Ende",10,10,100,25)
aufruf%=Create("Button",%hwnd,"Windows-Papierkorb",10,50,200,25)
WhileNot EE%
WAITINPUT
Case CLICKED(ende%):EE%=1
Case CLICKED(aufruf%):STARTE_AUFRUF
EndWhile
end
thanks for Help |
|
|
| |
|
|
|
RGH | Hello Horst,
WinExex launch one Program and kehrt immediate back, without the end the Program abzuwarten. want You Waiting, To the aufgerufene Progamm exits watts, must You WinExecWait use.
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 | 10/22/08 ▲ |
|
|
|
|
| one be I thick - standing big and explicit in the Help - thanks Roland (one becomes even old !) |
|
|
| |
|
|
|
RGH | Hello Horst, for your special trouble was my response something voreilig. here wait WinExecwait only negligible longer, namely To the Open the Papierkorbes completed is. If you but Waiting want, To the Explorerfenster the Papierkorbes closed becomes, müßtest You Waiting, To no Window with which Headline More existing. so functions it by me: CompileMarkSeparationDECLARE EE%,ende%,aufruf%
EE%=0
----------------------------------------------
PROC MELDUNG
Messagebox("Es ist vollbracht !","Meldung",64)
ENDPROC
PROC STARTE_AUFRUF
Declare Papierkorb&
Papierkorb starten - Es kann auch eine andere Windows-Funktion sein - Das ist nur ein Beispiel
WinExec("explorer /n,::{645FF040-5081-101B-9F08-00AA002F954E}",1)
warten, bis das Fenster tatsächlich existiert
Repeat : Until FindWindow("Papierkorb") <> 0
warten, bis es wieder weg ist
Repeat : Until FindWindow("Papierkorb") = 0
MELDUNGDer Aufruf soll erst nach dem Schliessen des Papierkorbes angezeigt werden
ENDPROC
----------------------------------------------
CLS
ende%=Create("Button",%hwnd,"Ende",10,10,100,25)
aufruf%=Create("Button",%hwnd,"Windows-Papierkorb",10,50,200,25)
WhileNot EE%
WAITINPUT
Case CLICKED(ende%):EE%=1
Case CLICKED(aufruf%):STARTE_AUFRUF
EndWhile
end
|
|
|
| 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 | 10/22/08 ▲ |
|
|
|
|
| After "Papierkorb" search?
In this case ought to one itself sooner so compensate, that The operation nunmal asynchon expires. (as too virtual is)
who so aimed however whom wastebasket "verwalten" would like, the should hold The wastebasket-APIs utilize. |
|
|
| |
|
|
|
| @iF the was only one example - it's about 15 different windows-functions, The optional launched go can and here should to the close the jeweiligen function a action come off ! - Compri ??? |
|
|
| |
|
|
|
| I nothing Compri trouble. Compri still time too same Shutdown. is indeed a "Windows-Funktion". an 16.! only one <b>Beispiel</b>! |
|
|
| |
|
|
|
| @rather iF In one small Tool from of my feather go in the Menu 15 windows-functions available set. (the code for schwirrte here somewhere rum) - circa but with this Program Set("Autopaint",0) To bypass, must I a designed reason After the close the jeweiligen windows-function a defined Procedur Call (one part the surface (Icons) becomes namely by the new opened Window deleted) and this Procedur go these Icons again manufactured. so, How dankenswerterweise Roland me helped has, functions The thing now. Compri ? |
|
|
| |
|
|
|
Jörg Sellmeyer | and now any: "Ich should in a anspruchsvollen and sensible erscheinenden Program no "DrawIcon" use, separate with Create() a handle produce and the a Static allocate!" . . . . . . . . . Amen! |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 10/22/08 ▲ |
|
|
|
|
E.T. |
Jörg Sellmeyer: and now any: "Ich should in a anspruchsvollen and sensible erscheinenden Program no "DrawIcon" use, separate with Create() a handle produce and the a Static allocate!" .
In XP10 Have the lever then one Control allocated (allocate must, weils one Button with 2-zeiligem Text was), and Have the Dingens always "refresht", if I a waitinput-Loop back was.
Obs now in XP11 plainer goes, must I first time checken (habs first since Ner week) |
|
|
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 10/22/08 ▲ |
|
|
|
|
| @Jörg - for any
CASE 1L$ > "":w32_DrawIcon(%hdc,340,265,ExtractAssociatedIcon(1L$+"\",1))
then mach time ;) |
|
|
| |
|
|
|
Andreas Miethe
| Horst horn
@Jörg - for any Horst hornCASE 1L$ > "":w32_DrawIcon(%hdc,340,265,ExtractAssociatedIcon(1L$+"\",1)) then mach time ;)
understand of course not How the code with missing Parameters functions should, but so ought to it weg.
Horst horn
CASE 1L$ > "":w32_DrawIcon(%hdc2,340,265,ExtractAssociatedIcon(1L$+"\",1)):repaint |
|
|
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...] | 10/25/08 ▲ |
|
|
|