Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
4-1102700725
zioza
2004-12-10 20:45
2005.01.30
Сменить раскладку клавиатуры, другому активному окну


3-1103801697
tytus
2004-12-23 14:34
2005.01.30
Как динамически создать столбцы в сетке?


4-1102793329
Zahar
2004-12-11 22:28
2005.01.30
Как узнать версию программы?


14-1105255050
Yegorchic
2005-01-09 10:17
2005.01.30
Ну когда обновят www.DelphiGFX.mastak.ru?


1-1105366671
Maxim____M
2005-01-10 17:17
2005.01.30
Обращение к объекту.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский