[broly7]

Buenas, verán estoy trabajando con la uses clipbrd. Y según he leido por los foros cada vez que el portapapeles guarda o pega alguna cadena, debe mantener el APi visor desde el que hizo la última función, (o algo asi entendí). Y por eso me tira siempre este error del que estoy quemado.
Pongo las 2 últimas funciones desde donde vienen los errores:

Código Delphi [-]
Function CTRLC:string;
begin
wnd:=0;
wnd := FindWindow (Nil,'OtroProgramaexterno'); //Aquí cambia la ventana donde trabaja
if wnd<>0 then begin
BringWindowToTop(wnd);
keybd_event(VK_CONTROL, 0, 0, 0);
keybd_event($43, 0, 0, 0); // Ctrl+'C'
keybd_event($43, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0); 
end;
end;

E inmediátamente seguido ejecuto esta función:

Código Delphi [-]
Function CheckPaste:string;
var
S:string;
begin
S:=Clipboard.AsText;
if S = '' then //CHAN-CHAN! Aqui es donde sucede el error "Cannot open clipboard"
begin
form1.Timer1.Enabled:=false;
Showmessage('...');
end else
begin
Showmessage('...');
end;
end;

En cambio he porbado a ejecutar las 2 funciones por separado con 2 botones de acción y sí funciona.
Y el error creo que se da por lo que dije de que cambia el handle o algo.
Gracias, a ver si hay suerte y lo puedo solucionar.

PD: me he mirado 400 veces este hilo pero no he sacado nada en claro ya que no trabaja con el uses clipbrd. 1 Saludo. =)