Cual es la mejor forma de modificar un registro?

[wilcg]

Hola, quiero saber cual es la manera correcta y eficiente para modificar un registro.
tengo estos códigos pero no estoy seguro si es la mejor forma. en mi aplicación quiero implementar un código que sea eficiente, la base de datos que uso es firebird.

Código Delphi [-]
  with Query do
  begin
    Close;
    SQL.Clear;
    SQL.Add('Select * From Productos');
    SQL.Add('WHERE codigo = ' + codProducto);
    Open;
    Edit;
    FieldByName('fecha_alta').Value := FormatDateTime('DD/MM/YYYY', Date);
    FieldByName('detalle').AsString := Memo1.Lines.Text;
    FieldByName('categoria').AsString := Edit1.Text;
    Post;
  end;

Ó

Código Delphi [-]
with Query do
  begin
    Close;
    SQL.Clear;
    SQL.Text := 'Select * From Productos Order by codigo desc';
    Active := True;
    if Locate('codigo',codProducto,[]) then
    begin
      Open;
      Edit;
      FieldByName('fecha_alta').Value := FormatDateTime('DD/MM/YYYY', Date);
      FieldByName('detalle').AsString := Memo1.Lines.Text;
      FieldByName('categoria').AsString := Edit1.Text;
      Post;
    end;
  end;