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;
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;