Ver Mensaje Individual
  #2  
Antiguo 25-10-2007
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 20
cHackAll Va por buen camino
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var Word: OleVariant;
begin
 Word := CreateOleObject('Word.Application');

...

 Word.Quit;
end;

Creo que es un tema relacionado al ActiveX con el que estes trabajando, en el ejemplo anterior SI finaliza el proceso independientemente de la asignación del objeto porque tiene el método 'Quit' que finaliza el proceso.

Te recomiendo: tienes el nombre de la Clase ('x'), abres el regedit, te vas a HKEY_CLASSES_ROOT y buscas tal cadena SOLO en los Datos, no en Claves ni Valores, al encontrarlo veras una Clave que dice LocalServer32, en el caso de ejemplo del 'DAO.DBEngine.36' verías algo como 'C:\Archivos de programa\Archivos comunes\Microsoft Shared\DAO\dao360.dll', con eso obtendrás el archivo que es el ActiveX... lo abres con Delphi y podrás ver todos sus métodos... talvez con ello encuentres un "Quit", "Exit", "Free", o algo que sea lo que buscas.

PD: Gracias por ayudarme a contestar egostar .

Saludos

Última edición por cHackAll fecha: 25-10-2007 a las 00:19:38.
Responder Con Cita