Checkbox checken in anderem Programm

[BloodySmartie]

Hallo liebe Community!

Mir kam heute eine tolle Idee für ein größeres Projekt. Ich bin gerade dabei, ein paar grundlegende Informationen zu sammeln. An sich wird es nicht mal schwer zu implementieren sein. Allerdings gibts da etwas, mit dem ich einfach keine Erfahrung habe: Ich möchte Text in ein Eingabefeld in einem anderen Programm schreiben oder eine Checkbox an/abkreuzen. Ich könnte mir vorstellen, dass das über Messages und die Handles der entsprechenden Steuerelemente geht, aber ich hab keine Ahnung davon, wie. :gruebel: :gruebel:

Das Handle der zu manipulierenden Komponente würde ich gern per Mausklick abfragen(wegen der Benutzerfreundlichkeit). Geht das?

Könnt Ihr mir vielleicht ein paar Tipps geben? Ich bin für jede Hilfe dankbar.

Viele Grüße

BloodySmartie

[bitsetter]

Zitat:

Zitat von BloodySmartie

Ich möchte Text in ein Eingabefeld in einem anderen Programm schreiben oder eine Checkbox an/abkreuzen. Ich könnte mir vorstellen, dass das über Messages und die Handles der entsprechenden Steuerelemente geht, aber ich hab keine Ahnung davon, wie.

Hallo,

für die Checkbox müsste es so gehen:

Delphi-Quellcode:

SendMessage(..., BM_SETCHECK, 1, 0);//true
SendMessage(..., BM_SETCHECK, 0, 0);//false

[sirius]

Zitat:

Zitat von BloodySmartie

Hallo liebe Community!
Mir kam heute eine tolle Idee für ein größeres Projekt. Ich bin gerade dabei, ein paar grundlegende Informationen zu sammeln. An sich wird es nicht mal schwer zu implementieren sein. Allerdings gibts da etwas, mit dem ich einfach keine Erfahrung habe: Ich möchte Text in ein Eingabefeld in einem anderen Programm schreiben oder eine Checkbox an/abkreuzen. Ich könnte mir vorstellen, dass das über Messages und die Handles der entsprechenden Steuerelemente geht, aber ich hab keine Ahnung davon, wie. :gruebel: :gruebel:

Das hast du richtig erfasst :zwinker:
Die eine Message wäre BM_SetCheck
Und die andere sieht nach WM_setText aus.

Zitat:

Das Handle der zu manipulierenden Komponente würde ich gern per Mausklick abfragen(wegen der Benutzerfreundlichkeit). Geht das?

windowfrompoint(getcursorpos)

[BloodySmartie]

Das ging ja fix, danke danke danke :hello:

Kann ich denn "windowfrompoint" auch dafür verwenden, das Handle von einem Steuerelement, wie nem Button oder Textfeld zu bekommen?

[Larsi]

hi,

wenn ich folgendes eingebe:

Delphi-Quellcode:

windowfrompoint(getcursorpos)

kommen da fehler muss man da eine unit einbinden???


MFG Lars W.

[bitsetter]

Zitat:

Zitat von Larsi

hi,

wenn ich folgendes eingebe:

Delphi-Quellcode:

windowfrompoint(getcursorpos)

kommen da fehler muss man da eine unit einbinden???


MFG Lars W.

Versuche mal:

Delphi-Quellcode:

var
  Wnd: HWND;
begin
  Wnd:= Windows.WindowFromPoint(mouse.CursorPos);

[Larsi]

und wie kann ich den namen auslesen

[sirius]

sorry:

Delphi-Quellcode:

var pos:TPoint;
...
getcursorpos(pos);
windowfrompoint(pos);

..wenn mans nicht täglich macht
(Unit windows)

[Larsi]

und was schreibt man statt der drei punkte bei dem sendmessge reim???

[sirius]

Zitat:

Zitat von Larsi

und wie kann ich den namen auslesen

Delphi-Quellcode:

procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var pos:Tpoint;
    text:array[0..49] of char;
begin
  getcursorpos(pos);
  sendmessage(windowfrompoint(pos),wm_gettext,50,integer(@text));
  edit1.text:=text;
end;

Einfach die Maus vom Formular gedrückt zu einem anderen Fenster ziehen und dann loslassen.

[sirius]

Zitat:

Zitat von BloodySmartie

Kann ich denn "windowfrompoint" auch dafür verwenden, das Handle von einem Steuerelement, wie nem Button oder Textfeld zu bekommen?

Jo!

[Larsi]

hi,
hab das jetzt so gemacht:

Delphi-Quellcode:

var
Wnd: HWND;
begin
Wnd:= Windows.WindowFromPoint(mouse.CursorPos);
SendMessage(Wnd,  WM_setCheck, 1, 0);
end;

aber das geht ja nur auf meinem form!?

ich dachte das geht in jeder anwendung!

[BloodySmartie]

Ah, cool :)

Funktioniert das denn auch, wenn die Form des anderen Programms nicht sichtbar ist?

[Larsi]

kann ich auch den text von der jeweiligen textbox empfangen???

[sirius]

Zitat:

Zitat von BloodySmartie

Ah, cool :)
Funktioniert das denn auch, wenn die Form des anderen Programms nicht sichtbar ist?

Es funktioniert auch, aber nicht über windowfrompoint. Da musst du dir das Handle anders besorgen (Findwindow, enumwindows,...) oder einfach wissen.

Zitat:

Zitat von Larsi

kann ich auch den text von der jeweiligen textbox empfangen???

steht doch oben :gruebel:

Zitat:

Zitat von Larsi

aber das geht ja nur auf meinem form!?
ich dachte das geht in jeder anwendung!

Wenn du die Mouse capturest schon (siehe SetCapture und ReleaseCapture)

[BloodySmartie]

Okay, da werde ich mich mal reinarbeiten. Fürs erste: vielen herzlichen Dank. Ich hoffe, dass ich mir den Rest dann selbst erarbeiten kann. Mal sehn :)