Tengo un lote de TDBEdits y tambien combos conectados a un datasource y este a un TClientDataSET.
Y quiero que al hacer click en un boton se vacien(el texto) de los TDBEdit y luego de escribir en los mismos guardar con otro boton.
De momento hice lo siguiente:
procedure TFPRODUCTOS.BAgregarClick(Sender: TObject);
begin
with DataModule1.cdsproductos do
begin
Open;
Append;
Close;
end;
end;
procedure TFPRODUCTOS.BGuardarClick(Sender: TObject);
begin
with DataModule1.cdsproductos do
begin
Open;
FieldByName('IdProducto').AsInteger:=StrToInt(DBEdit1.Text);
FieldByName('NomProducto').AsString:=DBEdit2.Text;
Post;
ApplyUpdates(0);
end;
end;