Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
3. Mai 2008
Meinst du die Form mit der Person drauf?
var
wndMain, wndChild: HWND;
begin
wndMain := FindGarenaMainWindow;
if wndMain <> 0 then
begin
wndChild := FindWindowEx2(wndMain,'#32770', 2);
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
3. Mai 2008
Sende zweimal eine BM_CLICK Nachricht an den Button. Dann wird er geklickt.
(soeben erfolgreich getestet)
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
2. Mai 2008
Das Problem, ich muss zuvor auf das kleine Anzeigefenster der Person klicken das irgendwas aktiviert wird, quote]
Handelt es sich hierbei um ein Listview Control?
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
1. Mai 2008
Du schon aber vielleicht kann den Code ja mal jemand anders gebrauchen.
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
1. Mai 2008
function FindGarenaMainWindow: Hwnd;
const
GarenaWindowTitle = 'Garena ';
GarenaClassName = 'Afx:';
var
NextHandle: Hwnd;
WinTitle, WinClass: array of char;
begin
Result := 0;
NextHandle := GetWindow(Application.Handle, GW_HWNDFIRST);
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
1. Mai 2008
So findest du das richtige RichEdit
//...
wndChild := FindWindowEx(wndMain, 0, 'AfxMDIFrame80u', nil);
wndChild := FindWindowEx(wndChild, 0, '#32770', nil);
wndChild := GetDlgItem(wndChild, 162);
//...