Przycisk na pasku zadań

0

Co zrobic aby przycisk mojej aplikacj na pasku zadan byl niewidoczny?
I zeby dzialalo pod Delphi 2. Bo w D5 wiem jak, ale w D2 mi nie chce chodzic. Robie tak:

procedure Usun_z_paska_zadan;
var
  ExtendedStyle:Integer;
begin
  ExtendedStyle:=GetWindowLong(Application.Handle, GWL_EXSTYLE);
  SetWindowLong(Application.Handle,GWL_EXSTYLE,  ExtendedStyle or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
end;

I to musi byc pod D2

0
ShowWindow(Application.Handle, SW_HIDE);

Trudno stwierdzić czy będzie to działało pod Delphi2.

0
ShowWindow(Application.Handle, SW_HIDE);

Trudno stwierdzić czy będzie to działało pod Delphi2.

Mi trudno stwierdzić czy wiesz o czym mowa. Ten kod schowa w ogóle całą formę z ekranu, a nie tylko z paska zadań.

0
ShowWindow(Application.Handle, SW_HIDE);

Trudno stwierdzić czy będzie to działało pod Delphi2.

LOL
Jak wszyscy wiemy, obsługa Winapi jest tylko w D7Architect :):)

Sorry, nie mogłem się powstrzymać :)

0

Mi trudno stwierdzić czy wiesz o czym mowa. Ten kod schowa w ogóle całą formę z ekranu, a nie tylko z paska zadań.

Przepraszam bardzo, ale czy któryś z kolegów był łaskaw wypróbować ten kod ??

Jak wszyscy wiemy, obsługa Winapi jest tylko w D7Architect

Wiem że winapi dział pod każdą wersją Delphi, ale jeżeli tamto mu nie działało, to to w sumie też może...

0

Przepraszam bardzo, ale czy któryś z kolegów był łaskaw wypróbować ten kod ?? Jeżeli nie to prosze sie nie odzywać.

OK zwracam honor. Od sporego czasu nie piszę pod VCLa, a w helpie piszą:
TApplication.Handle
Provides access to the window handle of the main form (window) of the application.

IMHO uchwyt głównej formy, więc powinna zniknąć, a tu klops nie znika. Nawet najlepsi się mylą [cygaro].

0

Dzieki za odpowiedzi
mam nadzieje ze bedzie dzialac...

1 użytkowników online, w tym zalogowanych: 0, gości: 1