evento show

[alfil123]

hola amigos tengo un problemon con delphi

Código Delphi [-]
 
if fmConbien.ShowModal= mrok

bueno en esta linea se muestra fmconbien
pero nunca entra a su evento show

Código Delphi [-]
procedure TfmConbien.FormShow(Sender: TObject);
begin
//  ADODataSet.Clone(CCliente.Listar(dmConeccion.ADOConection,Error));
  ADODataSet.Clone(CCliente.Listar(dmConeccion.ADOConection,Error));
 //  ADODataSet.Clone(CCliente.ListarRepresentante(dmConeccion.ADOConection,Error));
end;

ya he realizado un seguimiento y nada nose porque si alguin me lo podria explicar se los agradeceria

[[Héctor Randolph]]

Hola alfil123!

Lo primero que veo en tu código es que estás haciendo referencia a dos formas distintas, ¿Cuál de los dos eventos es el que no se activa?


if fmConbien.ShowModal= mrok


procedure TfmConGrupos.FormShow(Sender: TObject);

Saludos

[alfil123]

grasias por responder tan rapido, y disculpen el error , al evento del form frconbien es a donde no entra

Código Delphi [-]
procedure TfmConbien.FormShow(Sender: TObject);
begin
  // ADODataSet.Clone(CCliente.Listar(dmConeccion.ADOConection,Error));
  ADODataSet.Clone(CCliente.Listar(dmConeccion.ADOConection,Error));
  // ADODataSet.Clone(CCliente.ListarRepresentante(dmConeccion.ADOConection,Error));
end;

[oscarnoe]

En condiciones normales, el evento OnShow se dispara cuando llamas a ShowModal, otra cosa es que la linea de codigo que esta dando algun error.

ya he realizado un seguimiento y nada nose porque

Aunque dicho esto no se darte una razon concreta de porque no se dispara el evento. te propongo 1 prueba mas; poner un "breakpoint" en el codigo del evento y otro en la linea del showmodal o antes de... para ver si llegan a ejecutarse.

Espero que te sea de ayuda

Oscar Noe