CTRL+V Automatizado.

[broly7]

Gracias conseguí resolverlo, adaptándolo a mis necesidades. (Si, con una varita mágica Rastafarey ¬¬)

Código Delphi [-]
Function CTRLV:string;
var
wnd: HWND;
begin
wnd := FindWindow (Nil,'Sin título - Bloc de notas');
BringWindowToTop(wnd);
keybd_event(VK_CONTROL, 0, 0, 0);
keybd_event($56, 0, 0, 0); // Ctrl+'V'
keybd_event($56, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
end;

Sólo una ayudaita más. Mi programa tarda un poco en cargar (no es el bloc de notas), la idea sería abrirlo y seguidamente hacerle un ctrl+v, ¿Cómo puedo saber cuando estará listo el programa externo para ser manipulado? Seria algo como if findwindow creo nose...gracias.

[[gatosoft]]

Excelente solucion Broly7,

Por otro lado te comento que según las normas del club, deberías abrir un nuevo hilo para una nueva pregunta, y antes que nada, hacer una busqueda en el histórico del foro...

La pregunta que haces, (si la entendí bien) tambien es muy popular por aqui... mira por ejemplo, la respuesta de Roman en este hilo:

http://www.clubdelphi.com/foros/showthread.php?t=59726

que por cierto a su vez remite a este otro hilo:

http://www.clubdelphi.com/foros/show...34&postcount=2


PDTA: Por cierto... no olvides colocar aqui tu solución, si logras resolver tu problema...
Un saludo,