Wert in eine fremde Anwendung zuweisen ?

[1234588]

SendMessage(btn, BM_CLICK, 0, 0); drueckt man tatsaechlich so einen button? schau mal bei msdn vorbei :o)

mal am rande, SirThornberry gibt sehr nuetzliche tipps die ich nicht unbedingt ignorieren wuerde

[Delphiturbo]

Wenn ich aber 2 einfache Anwendung mit Delphi erstelle
dann funktioniert mit diesem Code

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  wnd: HWND;
begin
  wnd := FindWindow('TForm1','FormFremd');
  wnd := FindWindowEx(wnd, 0, 'TEdit', nil);
  if wnd <> 0 then
  begin
    SendMessage(wnd, WM_SetText, 0, LongInt(PChar(Edit1.Text)));// ok
  end;
  end;
end.

und so nicht :

Delphi-Quellcode:

procedure TForm1.Button4Click(Sender: TObject);
var
  wnd: HWND;
begin
  wnd := FindWindow('#32770',' Text ');
  wnd := FindWindowEx(wnd, 0, 'RichEdit20A', nil);
  if wnd <> 0 then
  begin
    SendMessage(wnd, WM_SetText, 0, LongInt(PChar(Edit1.Text))); // geht nicht !
  end;
  end;

end.

Sehe Anhang bei ok und nicht ok

[SirThornberry]

Zitat von SirThornberry:

Und um zu prüfen ob dein handle überhaupt das richtige ist einfach mal schauen ob du das Fenster ber ShowWindow zum Beispiel ausblenden kannst.

Hast du das schon probiert?
Und hast du dir die Hilfe zu FindWindow angeschaut?

Zitat:

Der Code funktioniert aber bleibt das programm hängern !?

Die Frage ist nicht dein ernst oder?
Schau dir mal Punkt 2.3.2.3 im Kodex an. Du willst Hilfe von uns und nicht umgekehrt!
Wenn du dich nicht an den Kodex hältst und selbst Initiative zeigst bin ich gezwungen das Thema zu schließen.

[Delphiturbo]

Ja, ich kann das Window finden, ein- und ausblenden

Das Fenster heißt Texteinstellungen sehe Bild1 in Anhang

Delphi-Quellcode:

Windows.ShowWindow(FindWindow(nil,PChar('Texteinstellungen')),SW_show);
//..
Windows.ShowWindow(FindWindow(nil,PChar('Texteinstellungen')),SW_HIDE);

[Delphiturbo]

Das Problem lag an WinSpay
Ich habe X-Spay verwendet um Window zu finden, dann hat es geklappt

[SirThornberry]

Es lag ganz bestimmt nicht an dem Programm sondern an demjenigen der mit den Informationen nichts anfangen kann die das Programm gibt. Du solltest endlich anfangen Quelltext zu verstehen und nicht nur zusammen zu kopieren und dann bei nicht funktionieren die Schuld dem Verfasser des Quelltextes geben.

[Delphiturbo]

Kann man auch Text in eine fremdes Window finden und z.B. drauf ein Dopelklick simulieren ?

Ich habe beide Programme WiySpay und X-Spay getestet, leider schafen die nicht !

[toms]

Zitat von Delphiturbo:

Das Problem lag an WinSpay
Ich habe X-Spay verwendet um Window zu finden, dann hat es geklappt

Warum verwendest du denn noch die WinSpy Version von 2005?

[toms]

Zitat von Delphiturbo:

Kann man auch Text in eine fremdes Window finden und z.B. drauf ein Dopelklick simulieren ?

Ich habe beide Programme WiySpay und X-Spay getestet, leider schafen die nicht !

Wie ging das mit "Neuer Frage, neuer ..."

[SirThornberry]

wie toms bereits sagte
Neue Frage neuer Thread.