Necesito Determinar el Form de un Objeto

[Efren2006]

Empezado por Neftali

Puedes utilizar algo así:

Código Delphi [-] MessageDlg(Format('Mensaje: %s (%s)', [E.Message, Sender.Classname]), mtInformation, [mbOK], 0);


Para estar seguro puedes comprobar el tipo:

Código Delphi [-] if (Sender is TFrom) then Nombre := TForm(Sender).Name;

Neftali

Gracias por tu tiempo..

Ya verifique que tipo de Objeto Envia y es el objeto donde se genero la excepcion, osea, en mi caso de Ejemplo fue que programe en el evento onExit de un TGroupbox el Post de una tabla y haciendo esto me dio la excepcion, entonces envio en el SENDER el Objeto TGroupbox.

Sabiendo esto como puedo determinar el FORM donde esta creado este objeto, ya que a futuro podria ser cualquier objeto... ?

Saludos

[roman]

Puedes usar la función GetParentForm.

// Saludos

[Efren2006]

Empezado por roman

Puedes usar la función GetParentForm.

// Saludos

Roman

Efectivamente la solucion al problema.

Gracias