Форум: "Основная";
Текущий архив: 2005.01.30;
Скачать: [xml.tar.bz2];
ВнизKak svernut programku pri pervom ejo zapuske??? Найти похожие ветки
← →
про (2005-01-14 16:06) [0]Mastera, podskazhite pozhalujsta. U menja proga zapuskaetsja, to est" viskakivaet, pri windows startup, i etim o4en" meshaet =(( kazhdij raz ejo viklju4at"... tirim ..pirim .. vobshem meshaet =( Nepodskazhite, kak sdelat" 4tob ona vklju4alas" pri starup, i srazu zhe svora4ivalas"?? Posle togo kak ja ejo viklju4aju ona svara4ivaetsja v traybar .. i mne nado sdelat" 4tob pri startup ona vklju4alas" i svara4ivalas" v tray bar..
o bozhe kak zaputanno zvu4it, nadejus" ktonibud" pojmet ideju =))
Zaranee blagodarju =))
← →
PVOzerski © (2005-01-14 16:15) [1]Использовать проверку единственности запущенного экземпляра. Способы описаны много где в Интернете, только надо использовать именно те, что пригодны для Win32 - не через hprevinst, а через mutex"ы или хотя бы через имена классов окон, присутствующих в системе.
← →
Neznaika © (2005-01-14 17:18) [2]А почему бы сразу ее не запускать в трей, а потом если юзеру надо, он ее развернет.?
← →
Neznaika © (2005-01-14 17:19) [3]И еще у тебя что клава на русский не переключается??? Читать ужас как не удобно!!!
← →
KristinA © (2005-01-14 22:30) [4]Zdrastvuj Neznajka, 4esno govorja ja tak i ho4u sdelat", no poka4to moi znanija Delpi nepozvoljajut etogo =((
U menja v FormCreate imeetsja takoj kod:
procedure TfReminder.FormCreate(Sender: TObject);
var
reg:TRegistry;
tray: TNotifyIconData;
Ic: TIcon;
begin
FHide:= true;
fReminder.DoubleBuffered:=true;
path:=ExtractFileDir(application.exename);
Ic := TIcon.Create;
Ic.LoadFromFile(path+"\Templates\AB.ico");
with tray do
begin
cbSize := SizeOf(TNotifyIconData);
Wnd := fReminder.Handle;
uID := 1;
uFlags := NIF_ICON or NIF_MESSAGE or NIF_TIP;
uCallBackMessage := WM_NOTIFYTRAYICON;
hIcon := Ic.Handle;
szTip := ("Ýòî íàøà èêîíêà");
end;
Shell_NotifyIcon(NIM_ADD, Addr(tray));
Ic.Destroy;
end;
mozhno li ego otkorektirivat" tak 4tob programka zapuskalas" v tray"e?? Esli kto mozhet mne s etim pomo4 budu o4en" blagodarna =))
A nas4et klavi, ja na russkom o4en" medlenno pe4ataju.. ja ne iz Rossii, i u4us" ne na russkom =( poetomu imeju nekotorie problemi s russkim =(( nadobudet zanjatsja im, ato dazhe neudobno za oshibki, kotorih u menja navernoe tu4a =)
← →
Юрий Зотов © (2005-01-14 22:55) [5]http://www.delphikingdom.com/asp/viewitem.asp?catalogid=903
Там и про трей найдете, и про повторный запуск, и еще кое-что.
← →
KristinA © (2005-01-15 14:56) [6]eh....mastera pomogite pozhalujsta, nikak nemogu razobratsja s tray"em =(( nado pri pervom zapuske programki, ejo svernut"
← →
Neznaika © (2005-01-15 15:34) [7]Ну если надо просто свернуть то в инспекторе у формы есть свойство WindowState если я не ошибаюсь, оно позволяет запустить в свернутом виде. ;)
← →
avik © (2005-01-15 16:10) [8]пропиши в реестр чтобы прога запустилась !!!!
а опосля в самой проге свернешь в трей - это не сложно и
не надо больше запускать !!!
← →
KristinA © (2005-01-15 16:50) [9]razobralas" =)))
vot etot kod:
Application.CreateHandle;
ShowWindow(Application.Handle, SW_HIDE);
Application.ShowMainForm := FALSE;
! spasibo vsem kto pitalsja pompo4 =)))))) !
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.01.30;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.034 c