Re: Opóźnienie uruchamiania programu

Jacek Maciejewski wrote:

> Dnia Sat, 26 Jan 2008 20:55:25 +0100, Piotr Palusiński napisał(a):
>
>> Zaptasz okienko "Zamknij okno po wykonaniu zadania"
>
> Dzięki za wskazówkę, podziałało, efekt mnie już zadowala. Ale
> niecałkiem jest jak piszesz, bo w Właściwościach skrótu nie ma takiego
> okienka. Skorzystałem w zamian z opcji "uruchom w oknie
> zminimalizowanym" a ono samo znika z paska po odpaleniu F&H.

kiedyś, jak uczyłem sie asemblera pod win, skleciłem prosty program do
opóźniania autostartu. jest co prawda nie konfigurowalny ale poniżej
masz źródło, wystarczy sciągnąć fasma, poustawiać scieżki i będzie
banglać :)

format PE GUI 4.0

include 'd:\assm\fasm\include\win32a.inc'

;*************************************************************
section '.code' code executable
    invoke
CreateProcess,path1,NULL,NULL,NULL,FALSE,NORMAL_PRIORITY_CLASS,
NULL,NULL,sinfo,pinfo
    invoke Sleep,2*1000 ;2 sekundy pauzy
    invoke
CreateProcess,path2,NULL,NULL,NULL,FALSE,NORMAL_PRIORITY_CLASS,NULL,
NULL,sinfo,pinfo
    invoke Sleep,3*1000 ;3 sekund pauzy
    invoke
CreateProcess,path3,NULL,NULL,NULL,FALSE,NORMAL_PRIORITY_CLASS,NULL,
NULL,sinfo,pinfo
    invoke Sleep,10*1000 ;10 sekund pauzy
    invoke
CreateProcess,path4,NULL,NULL,NULL,FALSE,NORMAL_PRIORITY_CLASS,NULL,
NULL,sinfo,pinfo
    invoke Sleep,10*1000 ;10 sekund pauzy
    invoke ExitProcess,0

;*************************************************************
section '.data' data readable writeable

path4 db "E:\Program Files\ICQLite\ICQLite.exe -minimize",0
path3 db "E:\Program Files\BitComet\BitComet.exe",0
path2 db '"C:\Program Files\Google\Google
Talk\googletalk.exe" /autostart',0
path1 db '"E:\Program Files\MSI\PC Alert III\alert.exe"',0

pinfo PROCESS_INFORMATION
sinfo STARTUPINFO

;*************************************************************
section '.idata' import data readable

 library kernel32, 'KERNEL32.DLL',\
         user32, 'USER32.DLL'

 import kernel32,\
    ExitProcess,'ExitProcess',\
    CreateProcess,'CreateProcessA',\
    Sleep,'Sleep'

 import user32,\
    MessageBox,'MessageBoxA'

-- 
Michał Walenciak,   gg: 3729519,  mail: Kicer86 na gmail kropka com
http://kicer.elsat.net.pl