XProfan

RGH

¡Hola Horst,

WinExex startet una Programa y kehrt inmediatamente zurück, sin el Ende des Programmes abzuwarten. Willst Usted warten, a el aufgerufene Progamm final wurde, mußt Usted WinExecWait uso.

Saludo
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

Man bin Yo doof

- es groß y deutlich en el Ayuda - Gracias Roland
(uno se eben alt !)

RGH

¡Hola Horst,
para Su spezielles Problema war mi Antwort algo voreilig. Hier wartet WinExecwait sólo unwesentlich länger, nämlich a el Öffnen des Papierkorbes abgeschlossen es. Si usted aber warten willst, a el Explorerfenster des Papierkorbes geschlossen se, müßtest Usted warten, a kein Ventana con dessen Überschrift mehr existiert. So funktioniert lo en me:
Kompilieren Marca Separación

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

Nach "Papierkorb" suchen?

In diesem Fall debería uno se más así abfinden, dass el Operation nunmal asynchon abläuft. (como auch pensamiento es)

Wer así gezielt sin embargo el Papierkorb "verwalten" möchte, el debería sólo el Papierkorb-APIs anwenden.

@IF
Das war sólo una Ejemplo -
Lo va en 15 verschiedene Windows-Características, el wahlweise comenzó voluntad puede y aquí se
después de el Schliessen el jeweiligen Función una Aktion stattfinden ! - Compri ???

Yo nix Compri Problema. Compri doch veces auch igual Herunterfahren. Ist en efecto una "Windows-Funktion". Un 16.! Nur una <b>Beispiel</b>!

@Lieber IF
In una pequeño Tool de meiner Feder voluntad en el Menu 15 Windows-Características disponible gestellt. (el Code dafür schwirrte hier irgendwo rum) - Um pero en diesem Programa Conjunto("Autopaint",0) a umgehen, muss Hice una cierto Grund NACH el Schliessen el jeweiligen Windows-Función una cierto Procedur aufrufen (una Teil el Oberfläche (Icons) se nämlich por el neu geöffnete Ventana gelöscht) y dieser Procedur voluntad esta Icons otra vez producido. So, como dankenswerterweise Roland me geholfen ha, funktioniert el Sache ahora.

Compri ?

Jörg
Sellmeyer

y ahora Alle:
"Ich se en un anspruchsvollen y vernünftig erscheinenden Programa kein "DrawIcon" uso, pero con Crear() una Handle erzeugen y el una Static zuweisen!"
.
.
.
.
.
.
.
.
.
Amen!

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

E.T.

Jörg Sellmeyer: y ahora Alle:
"Ich se en un anspruchsvollen y vernünftig erscheinenden Programa kein "DrawIcon" uso, pero con Crear() una Handle erzeugen y el una Static zuweisen!"
.

In XP10 tener el Handle entonces una Control zugewiesen (zuweisen necesario, weils una Button con 2-zeiligem Texto war), y tener el Dingens siempre "refresht", si yo de uno waitinput-Bucle zurück war.

Obs ahora en XP11 einfacher va, muß Yo sólo veces checken (habs sólo seit ner Semana)

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 - para Alle

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

Dann mach veces ;)

23.10.2008 ▲