Vise taskbar

begin
ShowWindow(Application.Handle, SW_HIDE) ;
  SetWindowLong(Application.Handle, GWL_EXSTYLE,
    getWindowLong(Application.Handle, GWL_EXSTYLE) or
    WS_EX_TOOLWINDOW) ;
  ShowWindow(Application.Handle, SW_SHOW) ;
  end;

Jeg har denne procedure for at få fjernet programmet fra taskbaren..

procedure TForm1.FormShow(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_SHOW);
end;

Hmm.. det virker ikke rigtigt. Jeg havde tænkt mig at oprette 2 procedures, hvor jeg derefter bare lavede en almindelig if-then løkke.
Jeg kan sagtens fjerne den, jeg kan bare ikke få den vist..

med  ShowWindow(Application.Handle, SW_HIDE);
fjerner du iconet i taskbaren
og med  ShowWindow(Application.Handle, SW_SHOW);
gør du det synligt igen !

Glem din SetWindowLong

Jens B

Yes,yes! Så virker det!

Tak for det Jens B. Smid da lige et svar, så får du dine point.

hclarsen -> hvad var der i vejen med mit svar? Det er jo det samme som Jens skrev :/

Det er det da også!

Hmm. så deler jeg bare pointene over.

Ok

Svar