Registriert seit: 14. Mär 2003
Ort: Osnabrück
244 Beiträge
Delphi 2009 Professional
|
Re: Handle aller Controls
7. Dez 2004, 16:44
Bin mir nich sicher weil ichs nich getestet hab aber das sollte klappen:
Delphi-Quellcode:
function getRichEditNr(ICQNr, editNr:Integer):cardinal;
var i:integer;
begin
result := 0;
dec(editNr);
for i := 0 to editNr do
begin
result := FindWindowEx(FindWindow( nil, PChar(Inttostr(ICQNr)+' - Message Session')), result, ' RichEdit20A', nil);
if result = 0 then
Exit;
end;
end;
Dann solltest du das Handle mit
Delphi-Quellcode:
....
Handle := getRichEditNr(11111111, 1); //für das erste Edit
//bzw.
Handle := getRichEditNr(11111111, 2); //für das zweite Edit
....
bekommen...
Greetz
Boombuler
|
|
Zitat
|