Hola
Estoy intentando copiar el texto una ventana que yo escoja por ejemplo la de Internet Explorer.
Código:
procedure TForm1.Button1Click(Sender: TObject);
var mango:THandle;
buffer:PChar;
i:Integer;
begin
//Obteniendo el Handle de la ventana
mango:=FindWindow('IEFrame',nil);
if mango <> 0 then
begin
showMessage('ok');
i:=sendmessage(mango,WM_GETTEXTLENGTH,0,200);
form1.Memo1.Lines.Add(string(buffer));
end
else
begin
showMessage('no');
end;
No he logrado capturar ningun texto de la ventana, espero que me puedan ayudar desde ya muchas gracias..