[maxzama]

acabo de hacer este codigo:

pero no se como llamo el parametro a travez de un ZUpdateSQL.

Ejemplo: modulo.Dias_M_I.ParamByName('CEDULA').AsString;

Codigo delphi:

Código Delphi [-]
begin
Dmodulo.RegistroMadre2.SQL.Clear ;
Dmodulo.RegistroMadre2.SQL.Add('select * from RegistroMadre ');
DMODULO.RegistroMadre2.Open;

Dmodulo.RegistroMadre2.First;
       while not Dmodulo.RegistroMadre2.Eof do
             begin

                 if DMODULO.RegistroMadre2.FieldByName('NumeroCuenta').AsString>'' then

                 begin
                     Dmodulo.Dias_M_I.SQL.Text:=Dmodulo.Dias_M_I.InsertSQL.Text;
                     Dmodulo.Dias_M_I.ParamByName('CEDULA').AsString:=DMODULO.RegistroMadre2.FieldByName('Cedula').AsStri  ng;
                     Dmodulo.Dias_M_I.ExecSQL;
                     Dmodulo.Dias_M_I.SelectSQL.Text:=('select * from RegistroMadre ');
                     SHOWMESSAGE('A sido Insertado');
                 end;
       Dmodulo.RegistroMadre2.Next;
       end;
       Dmodulo.ibt.Commit;
end;