Ver Mensaje Individual
  #2  
Antiguo 04-01-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
¿que intentas hacer?

Analicemos tu código:
Código Delphi [-]
var 
  mango:THandle;
  buffer:PChar;
  i:Integer;
begin
  // Por ahora vamos bien, obtenemos el handle de una ventana del explorer
  mango:= FindWindow('IEFrame',nil); 
  if mango <> 0 then
  begin
    // Mostramos "OK" si obtenemos el handle de un ventana del explorer
    ShowMessage('ok');
    // Aqui intentas obtener la longitud del titulo de la ventana, 
    // pero el parametro 200 no se para que lo usas (segun la documentacion debe ser siempre 0)
    i:=sendmessage(mango,WM_GETTEXTLENGTH,0,200);
   // Aqui añades algo a un memo, pero ¿que tienes en la variable buffer?
    form1.Memo1.Lines.Add(string(buffer));
  end else
  begin    
    ShowMessage('no');
end;

No entiendo lo que quieres conseguir. Aunque el código que utilizas me recuerda a este otro hilo. ¿Lo sacaste de ahi?
Responder Con Cita