BD Firebird

[bothy]

Tengo una base de datos en ibexpert tengo una tabla con que se llama
clientes. y sus atributos clave , nombre, appaterno,apmaterno .
y una ventana vcl forms con tres edit cada edit es para cada atributo.
quisiera saver como enlazo la BD com mi ventana para que con un boton se almacenen los datos del cliente en la BD . trate de utilizar modulo de datos
con los componente database ytibtransaction y tambien utilizo tibdataset y datasource y un control navigator pero no me funciono quisiera como enlazarla con codigo...

[bothy]

Tengo delphi 2009

[Neftali [Germán.Estévez]]

Hola.
Tal vez una imagen y algo de código facilitaría las cosas.

Lo primero que se me ocurre es porqué nos estás utilizando controles DataAware (DBEdit) en lugar de Edit's.

Si quieres hacer el guardado "a mano", deberás añadir el registro manualmente, asignar los valores de los Edit's y luego realizar el Insert.

Algo así:

Código Delphi [-]
  // Añadir
  Table1.Append;
  // Asignar valores de los edits
  Table1.FieldByName('nombre').AsString := Edit1.Text;
  Table1.FieldByName('appaterno').AsString := Edit2.Text;
  ...
  // Finalmente guardar el registro
  Table1.Post;

[marcoszorrilla]

También tienes que añadir para que se vean los cambios.

Código Delphi [-]
Table1.CommitReatining;

Puedes poner el código en el evento AfterPost correspondiente, un ejemplo:

Código Delphi [-]
procedure TDmConex.IBDtsContadoresAfterPost(DataSet: TDataSet);
begin
DmConex.IBTransaction.CommitRetaining;
end;

Un Saludo.

[bothy]

algo asi andaba buscando amigo gracias..

[bothy]

me sale un error en ingles cuando no lleno todos los edit y le doy agregar al boton diciendome que me falta algrega valor al siguiente edit..quisiera saber como modificar ese mensage para que salga en español..el algo sobre el mensage NOT NULL

[Neftali [Germán.Estévez]]

Intenta explicar los errores de forma más concreta, sino es difícil saber qué está pasando.