Hallo,
um nur ein Instanz meines Programmes zuzulassen, verwende ich diesen Code:
Delphi-Quellcode:
var
MyHandle: integer;
begin
MyHandle := FindWindowByTitle('Rechnungen');
if MyHandle > 0 then
begin
ShowWindow(MyHandle,SW_RESTORE);
halt(0);
end;
end;
Das funktioniert einwandfrei, aber nachdem das Fenster der 1. Instanz wieder restauriert wird, lässt es sich nicht mehr minimieren. Alles andere geht.
Scheint nur mit Delphi-Programmen so zu sein, ein Test mit Notepad funktioniert wie erwartet.
Hat jemand eine Idee?
Danke und Gruß Uli