Editar sobre otros procesos.

[[duilioisola]]

Supongo que si declaras HWndWinamp como integer y gWindowName com string será suficiente.
De todos modos, supongo que si te pones sobre la función FindWindow y presionas F1, te dará algo de información sobre esta API. (No tengo el Delphi para probar ahora)

mira este hilo que creo que solucionará todas tus dudas

[rauros]

He conseguido compilar pero no encuentra ninguna ventana... Os puedo dejar el código para que me lo corrijan? (no es mucho)

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  gWindowName:='firefox.exe';
  hwndWinamp := FindWindow(nil,pchar(trim(gWindowName))) ; //localizamos la ventana

  IF hwndWinamp = 0 THEN BEGIN
     hwndWinamp := FindWindow(pchar(trim(gWindowName)),nil) ; //gWindowName es una variable que contiene
//el handle de la ventana sobre la que debemos actuar
     IF hwndWinamp = 0 THEN BEGIN
       ShowMessage(gWindowName + ' Ventana NO ENCONTRADA');
       exit;
     end;
  END;
  SetForegroundWindow(hwndWinamp); //pasamos a esa ventana
  SetForegroundWindow(hwndWinamp);
  //Aqui tienes varios ejemplos de envio de pulsaciones de teclas
  PostKeyEx32(VK_HOME, [], TRUE);
  PostKeyEx32(VK_END, [SSsHIFT], TRUE);
  PostKeyEx32(VK_INSERT, [ssCtrl], TRUE);
  SetForegroundWindow(Handle); //De esta manera volvemos a nuestra aplicacion
  PostKeyEx32(ord('V'), [SSCTRL], TRUE);
end;

He empezado provando con firefox pero siempre me dice
firefox.exe VENTANA NO ENCONTRADA

[Neftali [Germán.Estévez]]

Prueba cambiando el primer parámetro del FindWindow por:

PChar('MozillaUIWindowClass')

Que es la clase para la ventana principal de FF; Deja el segundo parámetro a nil.

[rauros]

Vale pero eso era para hacer una prueba. ¿y si necesito usar el proceso de un videojuego como puedo saber el tipo de clase para la ventana? Gracias a todos.

[Neftali [Germán.Estévez]]

Utilidades com WinDowse o Winexp pueden darte el nombre de la clase para una ventana determinada.

[rauros]

He solucionado los problemas, gracias. Pero hay otro problema: no puedo escribir "punto". He provado con PostKeyEx32(46, [], TRUE); pero no funciona. Pese a que con PostKeyEx32(13, [], TRUE); si que pulsa "enter" (car return) y que las letras también funcionan de ese modo. Gracias por toda la ayuda.

[rauros]

Investigando un poco he encontrado que el error es de delphi, y no del susodicho juego. Pues he probado con el notepad y tampoco se escriben puntos. Creo que solo se escriben carácteres alfabéticos (a...z). A ver si alguien encuentra alguna solución, o alguien le ha pasado esto anteriormente. Gracias.