Ir al contenido


Foto

Problema con Clipboard en Crhome

crhome url clipboard

  • Por favor identifícate para responder
2 respuestas en este tema

#1 draker

draker

    Newbie

  • Miembros
  • Pip
  • 2 mensajes

Escrito 08 junio 2017 - 11:46

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:
 

php
  1. function Chrome(wnd: THandle; Param: Integer): Bool; stdcall;
  2. var
  3.   wndClass: array[0..127] of char;
  4.   Buffer: PChar;
  5. begin
  6.   GetClassName(wnd, wndClass, SizeOf(wndClass));
  7.   if wndClass = 'Chrome_WidgetWin_1'
  8.   then
  9.     begin
  10.       ClipBoard.Clear;
  11.       SetForegroundWindow(wnd);
  12.  
  13.  
  14.       While ClipBoard.AsText='' do
  15.       begin
  16.         PostMessage(wnd, WM_SYSKEYDOWN, VK_F6,0);
  17.         keybd_event(VK_CONTROL, 0, 0, 0);
  18.         keybd_event($43, 0, 0, 0);
  19.         keybd_event($43, 0, KEYEVENTF_KEYUP, 0);
  20.         keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
  21.       end;
  22.       
  23.       Form1.memo1.Lines.Add(Clipboard.AsText);
  24.       Result := False;
  25.     end
  26.   else Result := True;
  27.  
  28.  
  29.   SetForegroundWindow( Form1.Handle);

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

  • 0

#2 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.446 mensajes
  • LocationMéxico

Escrito 08 junio 2017 - 01:41

Hola draker, bienvenido a delphiaccess

Veo que validas que Clipboard.AsText tenga algo para realizar los eventos del teclado, pero ¿que pasa cuando no tiene nada? si haces un debug en esa función podrías encontrar el problema.

Saludos
 


  • 0

#3 draker

draker

    Newbie

  • Miembros
  • Pip
  • 2 mensajes

Escrito 08 junio 2017 - 03:13

jejejeje, claro amigo egostar, sorry por el horror, a la hora de quitar todas las basurillas de como tengo el código le cambie el signo, ahí lo edite, como vez primero limpio el clipboard y después hago la validación, el punto de validarlo es por que si mando a llamar nuevamente a la función y si ya se dio F6 una vez el crhome deja de seleccionar el texto, vuelves a pulsarlo y no hace nada, hasta la tercera vez vuelve a seleccionar el texto.


  • 0





Etiquetado también con una o más de estas palabras: crhome, url, clipboard

IP.Board spam blocked by CleanTalk.