Einzelnen Beitrag anzeigen

Benutzerbild von TonyR
TonyR

Registriert seit: 17. Jun 2006
Ort: Bautzen
503 Beiträge
 
FreePascal / Lazarus
 
#1

Handle auf Vista unter XP nicht gefunden

  Alt 30. Mai 2008, 17:26
Hi Leute,

Ich hoffe, dass ist keine dumme Anfängerfrage aber ich schließe ein Fenster mit folgendem Code:
Delphi-Quellcode:
procedure TForm1.button1click(Sender: TObject);
var h: Thandle;
begin
h:=Findwindow(nil,'Fenstername');
if h<>0 then
  PostMessage(h, WM_SYSCOMMAND, SC_CLOSE, 0);
end;
Ein und dasselbe Fenster mit ein und demselben Code/Programm funktioniert auf Vista einwandfrei, jedoch auf dem XP Home System meines Vaters nicht.
Es scheitert übrigens am finden des Handles, also das PostMessage wird auf jenem XP System gar nicht ausgeführt.
Ich habe das Programm mit Delphi 6 unter Vista kompiliert.

Danke schonmal für eure Hilfe.
Es ist unmöglich, witzig zu sein ohne ein bisschen Bosheit. Die Bosheit eines guten Witzes ist der Widerhaken, der ihn haften lässt. - Georg Christoph Lichtenberg
  Mit Zitat antworten Zitat