Einzelnen Beitrag anzeigen

Praktikant

Registriert seit: 24. Sep 2003
131 Beiträge
 
Delphi 5 Enterprise
 
#5

Re: Handle: Button von app2 aus app1 klicken

  Alt 12. Nov 2003, 15:53
ok, danke für den Hinweis mit FindWindowEx!
Bekomme jetzt auch ein Handle zurück, aber irgendwie nicht das Richtige.

Habe wieder herum probiert:
Bekomme mal ein Handle selbst wenn das Prog nicht läuft, bzw. mal geht er in die while-endlosschleife.
Wenn ich das Prog offen habe dann wechselt er bei jedem button klick die handle adresse, das ist doch auch nicht normal?!

Naja, wenn ich dann mit sendmessage mein bmclick schicke passiert zumindest nie etwas.

Mein Progaufbau sieht nun folgendermassen aus, wo habe ich da noch ein Fehler?
Delphi-Quellcode:
 
private
  ButtonKommBeendenHwnd : THandle;
[...]
var
  hWindow : DWORD;
  hButton : DWORD;
begin
  hWindow := 0;
  while hWindow = 0 do
    hWindow := FindWindow(nil,'FormKommunikation');
  // Die Child Windows durchgehen
  hButton := 0;
  while hButton = 0 do
  hButton := FindWindowEx (hWindow,ButtonKommBeendenHwnd,0,0); //ButtonKommBeenden ist Name des Button der geklickt werden soll
  // Wenn hButton <> 0 ist, wurde der Button gefunden
  Label4.Caption:=IntToStr(hButton);

  if hButton = 0 then exit;
  // und kann angeklickt werden
  SendMessage(hButton,BM_CLICK,0,0);
So wie der code jetzt steht scheint die handle adressierung zu funzen, nur mein prog reagiert nicht auf die sendmessage
  Mit Zitat antworten Zitat