|
mensaje de error al dar el botón.
Hola
Gracias.
Lo he puesto pero al dar el botón me salta el siguiente error:
Table1: Cannot perform this operation on a closed dataset. El code quedaría así:
procedure TForm4.Button1Click(Sender: TObject);
begin
Table1.Append; //agregar o editar un registro
Table1.FieldByName('name').value:=Edit1.text; //ten en cuenta los tipos de datos si son int, string, real, etc
Table1.FieldByName('lastname').value:=Edit2.text; // para cada uno de los campos
Table1.Post; //guardar el registro en la tabla
end;
procedure TForm4.FormClose(Sender: TObject; var Action: TCloseAction);
begin
table1.Active := False;
|