Ha kétszer elindítom ugyanazt az applikációt,
akkor a proggi másodszorra kikapcsolja magát, és előtérbe hozza a
már megnyitott másik ugyanolyan applikációt
uses Messages,WinProcs
. . . var HWND:THandle; begin
HWND:=FindWindow('TForm1','xakk'); // form1.caption -ja "xakk" !! if HWND=0then begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run; end else begin
winprocs.SetForegroundWindow(HWND); end; end.