Hola.
Cita:
Empezado por yuyidt
...
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'; ExecSQL;
...
Saludos