Problema con Clipboard en crhome

[Draker]

Buenas tardes les explico, tratando de conseguir la URL de Crhome, realizo:
1.- una enumeración de ventajas hijas
2.- una vez encontrada pulso F6, para que me lleve a la barra de direcciones del crhome
3.- copio lo que esta seleccionado al portapapeles
4.- pego la url en un memo

Pero el copiado y pegado no lo realiza, ya probe a poner sleep() despues del F6, despues del copiado y aveces lo hace y la mayoria de veces no, adjunto el codigo:

function Chrome(wnd: THandle; Param: Integer): Bool; stdcall;
var
wndClass: array[0..127] of char;
Buffer: PChar;
begin
GetClassName(wnd, wndClass, SizeOf(wndClass));
if wndClass = 'Chrome_WidgetWin_1'
then
begin
ClipBoard.Clear;
SetForegroundWindow(wnd);

While ClipBoard.AsText<>'' do
begin
PostMessage(wnd, WM_SYSKEYDOWN, VK_F6,0);
keybd_event(VK_CONTROL, 0, 0, 0);
keybd_event($43, 0, 0, 0);
keybd_event($43, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
end;

Form1.memo1.Lines.Add(Clipboard.AsText);
Result := False;
end
else Result := True;

SetForegroundWindow( Form1.Handle);
end;

Y en ocaciones manda error, que el clipboard esta cerrado.