Ver Mensaje Individual
  #2  
Antiguo 24-03-2017
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.
Cita:
Empezado por yuyidt Ver Mensaje
...
Que debería agregar para que me modifique el registro si existe?
...
Basándome en el código de tu mensaje, para modificar un registro haría algo similar a esto:
Código Delphi [-]
procedure TForm5.BitBtn1Click(Sender: TObject);
begin
  with DataModule2.FDQuery6 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('UPDATE EVA_MAESTRO');
    SQL.Add('SET NOMBRE_EXAMEN = :NOMBRE_EXAMEN, FECHA_INI = :FECHA_INI,');
    SQL.Add('FECHA_FIN = :FECHA_FIN, NOTA = :NOTA');
    SQL.Add('WHERE CED_EST = :CED_EST');
    ParamByName('NOMBRE_EXAMEN').AsString := Edit1.Text;
    ParamByName('FECHA_INI').AsDate       := DateTimePicker1.Date;
    ParamByName('FECHA_FIN').AsDate       := DateTimePicker2.Date;
    ParamByName('NOTA').AsString          := ComboBox2.Text;
    ParamByName('CED_EST').AsString       := 'i';  // ¿ Codigo único / ID ?
    ExecSQL;
    ...

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita