Foros Club Delphi - Ver Mensaje Individual

marcoev · #10 08-09-2005

Intena lo siguiente

Código Delphi [-]procedure TForm2.BitBtn2Click(Sender: TObject);
begin
  Database1.Connected := True;
  Table1.Open;
  Table1.Insert;
  Table1.FieldByName('Titulo').AsString := Form2.Edit1.Text;
  Table1.FieldByName('Arancelado').AsBoolean := if Form2.CheckBox1.State;
  Table1.Post; 
end;

nose para que necesitas abrir y cerrar tanto las tablas y conexiones, por cierto para BD de access te recomiendo utilizar componentes de Ado y en lugar de un componente de Database utilizar el componente de conection.

TAdoConnection
TAdoTable

por cierto para editar solo cambia el insert por Table1.Edit, y para borrar solo pon Table1.Delete, espero y te sirva de algo