Ĺadny brzuch
Jak mogę usunąć program z paska zadań? Tzn. chodzi mi o to, że jak uruchamiam program, to pojawia mi się przycisk obok menu START (tak jak w Windowsie). Nie wiem, może było na forum, ale nie wiedziałem co wpisać :(
Pozdrawiam
Przykład:program Project1; uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin SetWindowLong(Application.Handle,GWL_EXSTYLE,GetWindowLong(Application.Handle,GWL_EXSTYLE) or WS_EX_TOOLWINDOW); Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.było zresztą :P
Przykład:program Project1; uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin SetWindowLong(Application.Handle,GWL_EXSTYLE,GetWindowLong(Application.Handle,GWL_EXSTYLE) or WS_EX_TOOLWINDOW); Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.było zresztą :P
Kod działa, ale jak dodam komponent MainMenu i dodam jakieś menu, to po kliknięciu wyskakuje bład :(. Co zrobić, żeby można było otworzyć inne formy?
Kod działa, ale jak dodam komponent MainMenu i dodam jakieś menu, to po kliknięciu wyskakuje bład :(. Co zrobić, żeby można było otworzyć inne formy?
Cyrkiel - nie lepiej:
procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Form1.Handle,GWL_STYLE,GetWindowLong(Form1.Handle,GWL_STYLE) and not WS_CAPTION); Height:=ClientHeight; end;
Użytkownik lofix edytował ten post 19 lipiec 2007, 18:09
Cyrkiel - nie lepiej:
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Form1.Handle,GWL_STYLE,GetWindowLong(Form1.Handle,GWL_STYLE) and not WS_CAPTION);
Height:=ClientHeight;
end;
Przyznam, że nie sprawdzałem, ale na oko to mi wygląda na ukrycie belki programu, a nie ukrycie programu z paska zadań.
ShowWindow(application.handle, false) czy coś w tym stylu też można ;).
Kod działa, ale jak dodam komponent MainMenu i dodam jakieś menu, to po kliknięciu wyskakuje bład sad.gif. Co zrobić, żeby można było otworzyć inne formy?
Jestem niespotykanie spokojnym człowiekiem, ale jak ktoś mi pisze w dziale programowanie, że my wyskoczył błąd to mam ochotę z miejsca uszkodzić. Opisz dokładnie jaki błąd i kiedy wyskakuje!. A co do pytania - myślę, że można je po prostu otworzyć :>. Proszę naucz się precyzować pytania bo zdaje się że to nie pierwsze takie kwiatki na forum z Twojej strony.
Jak oczekujesz pomocy, to chociaż postaraj się pisać tak żeby inni Cię rozumieli...
http://rtfm.killfile.pl/
Przyznam, że nie sprawdzałem, ale na oko to mi wygląda na ukrycie belki programu, a nie ukrycie programu z paska zadań.
ShowWindow(application.handle, false) czy coś w tym stylu też można ;).
Jestem niespotykanie spokojnym człowiekiem, ale jak ktoś mi pisze w dziale programowanie, że my wyskoczył błąd to mam ochotę z miejsca uszkodzić. Opisz dokładnie jaki błąd i kiedy wyskakuje!. A co do pytania - myślę, że można je po prostu otworzyć :>. Proszę naucz się precyzować pytania bo zdaje się że to nie pierwsze takie kwiatki na forum z Twojej strony.
Jak oczekujesz pomocy, to chociaż postaraj się pisać tak żeby inni Cię rozumieli...
http://rtfm.killfile.pl/
No więc jak dam kod do FormCreate to mi program cały czas ładuje się do paska zadań (tzn. tego co jest obok zegara). Posiadam komponent CoolTrayIcon. Może tego... Ale jak dam kod na samym końcu to po uruchomieniu programu i kliknięciu na menu wyskakuje ten błąd! No i co jest? Próbowałem dawać bez tego komponentu CoolTrayIcon, ale to samo :(
Użytkownik mateok edytował ten post 18 lipiec 2007, 14:08
No więc jak dam kod do FormCreate to mi program cały czas ładuje się do paska zadań (tzn. tego co jest obok zegara). Posiadam komponent CoolTrayIcon. Może tego... Ale jak dam kod na samym końcu to po uruchomieniu programu i kliknięciu na menu wyskakuje ten błąd! No i co jest? Próbowałem dawać bez tego komponentu CoolTrayIcon, ale to samo :(
No dobrze, trochę sam popracowałem i trzebabyło tylko usunąć linijkę:
Application.CreateForm(TForm1, Form1);
Dzięki za pomoc! Temat do zamknięcia
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Pozdrawiam
Przykład:program Project1; uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin SetWindowLong(Application.Handle,GWL_EXSTYLE,GetWindowLong(Application.Handle,GWL_EXSTYLE) or WS_EX_TOOLWINDOW); Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.było zresztą :P
Przykład:program Project1; uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin SetWindowLong(Application.Handle,GWL_EXSTYLE,GetWindowLong(Application.Handle,GWL_EXSTYLE) or WS_EX_TOOLWINDOW); Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.było zresztą :P
Kod działa, ale jak dodam komponent MainMenu i dodam jakieś menu, to po kliknięciu wyskakuje bład :(. Co zrobić, żeby można było otworzyć inne formy?
Kod działa, ale jak dodam komponent MainMenu i dodam jakieś menu, to po kliknięciu wyskakuje bład :(. Co zrobić, żeby można było otworzyć inne formy?
Cyrkiel - nie lepiej:
procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Form1.Handle,GWL_STYLE,GetWindowLong(Form1.Handle,GWL_STYLE) and not WS_CAPTION); Height:=ClientHeight; end;
Użytkownik lofix edytował ten post 19 lipiec 2007, 18:09
Cyrkiel - nie lepiej:
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Form1.Handle,GWL_STYLE,GetWindowLong(Form1.Handle,GWL_STYLE) and not WS_CAPTION);
Height:=ClientHeight;
end;
Przyznam, że nie sprawdzałem, ale na oko to mi wygląda na ukrycie belki programu, a nie ukrycie programu z paska zadań.
ShowWindow(application.handle, false) czy coś w tym stylu też można ;).
Kod działa, ale jak dodam komponent MainMenu i dodam jakieś menu, to po kliknięciu wyskakuje bład sad.gif. Co zrobić, żeby można było otworzyć inne formy?
Jestem niespotykanie spokojnym człowiekiem, ale jak ktoś mi pisze w dziale programowanie, że my wyskoczył błąd to mam ochotę z miejsca uszkodzić. Opisz dokładnie jaki błąd i kiedy wyskakuje!. A co do pytania - myślę, że można je po prostu otworzyć :>. Proszę naucz się precyzować pytania bo zdaje się że to nie pierwsze takie kwiatki na forum z Twojej strony.
Jak oczekujesz pomocy, to chociaż postaraj się pisać tak żeby inni Cię rozumieli...
http://rtfm.killfile.pl/
Przyznam, że nie sprawdzałem, ale na oko to mi wygląda na ukrycie belki programu, a nie ukrycie programu z paska zadań.
ShowWindow(application.handle, false) czy coś w tym stylu też można ;).
Jestem niespotykanie spokojnym człowiekiem, ale jak ktoś mi pisze w dziale programowanie, że my wyskoczył błąd to mam ochotę z miejsca uszkodzić. Opisz dokładnie jaki błąd i kiedy wyskakuje!. A co do pytania - myślę, że można je po prostu otworzyć :>. Proszę naucz się precyzować pytania bo zdaje się że to nie pierwsze takie kwiatki na forum z Twojej strony.
Jak oczekujesz pomocy, to chociaż postaraj się pisać tak żeby inni Cię rozumieli...
http://rtfm.killfile.pl/
No więc jak dam kod do FormCreate to mi program cały czas ładuje się do paska zadań (tzn. tego co jest obok zegara). Posiadam komponent CoolTrayIcon. Może tego... Ale jak dam kod na samym końcu to po uruchomieniu programu i kliknięciu na menu wyskakuje ten błąd! No i co jest? Próbowałem dawać bez tego komponentu CoolTrayIcon, ale to samo :(
Użytkownik mateok edytował ten post 18 lipiec 2007, 14:08
No więc jak dam kod do FormCreate to mi program cały czas ładuje się do paska zadań (tzn. tego co jest obok zegara). Posiadam komponent CoolTrayIcon. Może tego... Ale jak dam kod na samym końcu to po uruchomieniu programu i kliknięciu na menu wyskakuje ten błąd! No i co jest? Próbowałem dawać bez tego komponentu CoolTrayIcon, ale to samo :(
No dobrze, trochę sam popracowałem i trzebabyło tylko usunąć linijkę:
Application.CreateForm(TForm1, Form1);
Dzięki za pomoc! Temat do zamknięcia