XProfan

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

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:
Compile Mark Separation

DECLARE 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

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 ...

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...

@Jörg - for any

CASE 1L$ > "":w32_DrawIcon(%hdc,340,265,ExtractAssociatedIcon(1L$+"\",1))

then mach time ;)

10/23/08 ▲