Ver Mensaje Individual
  #5  
Antiguo 28-01-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 20
cHackAll Va por buen camino
Cita:
Empezado por cmm07 Ver Mensaje
gracias por la respuesta pero lamentablemente el enlace que me diste no me sirvio, ya que ando buscando algo parecido pero que en vez que coloque roman en todas partes me lea todo lo que pase sobre el mouse

Gracias.
Código Delphi [-]
procedure TForm1.Timer1Timer(Sender: TObject);
var Text: array [0..259] of Char;
begin
 GetWindowText(WindowFromPoint(Mouse.CursorPos), @Text, SizeOf(Text));
// Memo1.Lines.Add(Text);
 Caption := Text;
end;

Provecho
Responder Con Cita