Always on bottom API kald?

Følgende er hentet fra Borlands Community:

Question:

How do I keep my application in a iconized (minimized) state?

Answer:

First, you must set the WindowState property of the form to
Minimized. Then you must create a message handler to respond to the
Windows WM_QueryOpen message, to let Windows know that you do not want
the form to resize.

Example:

{Place this code in the private section of the Form declaration}

procedure WMQueryOpen(VAR Msg : TWMQueryOpen); message WM_QUERYOPEN;

{Place this code in the Form implementation section}

procedure TForm1.WMQueryOpen(VAR Msg : TWMQueryOpen);
begin
  Msg.Result := 0;
end;


Link: http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=13073

Nå, ja forresten. Jeg har aldrig prøvet det!, så jeg aner ikke om det virker ;-)

Det skulle ikke minimeres, men ligge under alle andre vinduer (modsat always on top!)

Okay det havde jeg misforstået!

Men prøv med følgende kode:

procedure TForm1.FormActivate(Sender: TObject);
begin
  SetWindowPos(Handle, HWND_BOTTOM, 0, 0, Screen.Width, Screen.Height, 0);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnActivate := FormActivate;
end;

Og så sæt onActivate for din form til FormActivate

Det burde fungere hvis jeg har forstået dig ret denne gang ;-)

Kort sagt sørger koden for at alle aktiveringer af programmet skubber det bagerst i Z-orderen.

/moa

Hejsa Loproc

Kunne du bruge mit svar, eller hvordan??

Ja,
Tak for hjælpen!