Zwijanie programu do paska

0

A mam jeszcze jeden problem z programem. Nie moge go zwinac bezpośrednio do paska. Chodzi o to że jak go zwijam to ładuje mi się nad menu start a nie do paska. Wiecie moze co z tym zrobic ?
Z góry dzieki Marecki :)

0
Application.Minimize; 

ewentualnie:

ShowWindow(Application.Handle, SW_MINIMIZE);

[Kojot nie chce mnie zalogować :[ . Najwyrazniej używanie wyszykiwarki nie popłaca ;P ].

// po 15 minutach wygasa sesja, więc można się zalogować - ŁF

0

Dominik mam jeszcze pytanko, gdzie wsadzić " Application.Minimize; " tak żeby podczas wyświetlania dowolnego okna w moim progsie, po kliknięciu na przycisk minimalizacji (w górnym pasku) progs wlatywał do paska.

0

O ile dobrze zrozumiałem chcesz żeby minimalizacja dowolnego okna w twoim programie powodowała minimalizacje całego programu. Przyszło mi do głowy coś takiego:

procedure TForm2.FormDeactivate(Sender: TObject);
begin
  if WindowState = wsMinimized then
  begin
    WindowState := wsNormal;
    Application.Minimize;
  end;
end;

Nie jest to zbyt ładne rozwiązanie, ale w każdym razie działa. Można też zrobić tak, że każde okno bedzie sie minimalizowało oddzielnie - http://www.swissdelphicenter.ch/torry/showcode.php?id=547.

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