Vraag:
Hoe start ik (bij windows xp) een applicatie, die automatisch op een 2e screen
(verlengde desktop op 2e monitor) verschijnt.
Na enig gepuzzel kom ik tot het volgende:
procedure TForm1.FormActivate(Sender: TObject);
begin
Form1.WindowState := WsMaximized;
if Form1.WindowState <> WsMaximized then
Form1.WindowState := WsMaximized;
application.BringToFront;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
if screen.MonitorCount > 1 then
Hfd.Form1.Left := screen.Monitors[1].Left + 10;
if Form1.WindowState <> WsMaximized then
Form1.WindowState := WsMaximized;
application.BringToFront;
end;
De applicatie gaat wel naar het 2e screen, maar minimized.
Door 1 maal in de taakbalk op de applicatie te klikken verschijnt die wel maar ik wil
dat dit in 1 keer direct gebeurt.
Antwoord:
U bent niet ingelogd.
|