Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   ayuda a novato (https://www.clubdelphi.com/foros/showthread.php?t=13398)

cesarjbf 17-08-2004 20:54:01

ayuda a novato
 
estoy tratando de empezar una bd con firebird y los fibplus, ya conecte los componentes a una dbgrid pero lo que quiero saber es como editar los campos desde un dbedit o un edit.

gracias

MaJeSTiC 17-08-2004 21:47:06

un pokito mas claro...
 
a ver... lo ke kieres es por ej: agregar datos desde un form y ke al aceptarlos aparescan en el otro form con el DBGrid?

cesarjbf 17-08-2004 22:02:21

gracias por responder, es mas sencillo, tengo varios dbedits,al llenarlos con datos estos pasan directamente a los campos del dbgrid, ahora lo que pregunto es como logro que los datos permanezcan en la bd, con el post?
tengo un boton para guardar la informacion pero no se que codigo se escribe en su onclick.

MaJeSTiC 17-08-2004 22:46:04

Aaaaahhhhh!!!!! :)
 
bueno amigo hubieses comensado por ahi....
antes ke nada yo trabajo con dos bases : paradox y access.

primero ke nada debes habilitar el dbgrid para ke hacepte los datos, estp se hace con el codigo "Append;"
luego una ves ingresado los datos puedes guardarlos con el "Post"

te mando un codigo a modo de ejemplo

procedure TFrmAgClie.BitBtn1Click(Sender: TObject);
begin
{habilitamos nuevamente los campos}
DBEdit1.Enabled:=True;
DBEdit2.Enabled:=True;
DBEdit3.Enabled:=True;
DBEdit4.Enabled:=True;
DBEdit5.Enabled:=True;
DBEdit6.Enabled:=True;
DBEdit7.Enabled:=True;
DBEdit8.Enabled:=True;
DBEdit9.Enabled:=True;
DBEdit10.Enabled:=True;
DBEdit11.Enabled:=True;
DBEdit12.Enabled:=True;
DBEdit13.Enabled:=True;
DBEdit14.Enabled:=True;
//-*-*-*-*-*-*-
DBComboBox1.Enabled:=True;
//-*-*-*-*-*-*-
ADOTable1.Append;//halilitamos el DBGrid para ingresar datos...
//-*-*-*-*-*-*-
BitBtn1.Enabled:=False;
BitBtn2.Enabled:=True;
BitBtn3.Enabled:=True;
//-*-*-*-*-*-*-
DBEdit1.SetFocus;
BitBtn2.Default:=True;
end;
procedure TFrmAgClie.BitBtn2Click(Sender: TObject);
begin
{Aceptamos los campos en la tabla}
ADOTable1.Post;// Aceptamos loos datos y son guardados en la Tabla
{deshablilitar nuevamente}
DBEdit1.Enabled:=False;
DBEdit2.Enabled:=False;
DBEdit3.Enabled:=False;
DBEdit4.Enabled:=False;
DBEdit5.Enabled:=False;
DBEdit6.Enabled:=False;
DBEdit7.Enabled:=False;
DBEdit8.Enabled:=False;
DBEdit9.Enabled:=False;
DBEdit10.Enabled:=False;
DBEdit11.Enabled:=False;
DBEdit12.Enabled:=False;
DBEdit13.Enabled:=False;
DBEdit14.Enabled:=False;
//-*-*-*-*-*-*-
DBComboBox1.Enabled:=False;
//-*-*-*-*-*-*-
BitBtn1.Enabled:=True;
BitBtn1.Default:=True;
BitBtn2.Enabled:=False;
BitBtn3.Enabled:=False;
//-*-*-*-*-*-
end;


Espero ke este godigo te sea util, no le des mucha bola a lo demas solo a los parametros de "Append;" y "Post;"

Mucha suertte y nos vemos

Mauro code_moon@hotmail.com

cesarjbf 17-08-2004 23:00:59

a lo que me refiero es que no se como utilizar los metodos de los fibplus para editar registros

jachguate 18-08-2004 03:15:53

Si sabes usar los métodos de un TDataSet cualquiera (TTable, TQuery, TAdoTable, TibTable) ya sabes usar la médula de los nuevos componentes que te ocupan, pues precisamente de eso se encarga la herencia y el polimorfismo, que en este caso, derivan de la clase ancestro TDataSet.

TDataSet.Edit, TDataSet.Post, etc.

Hasta luego.

;)


La franja horaria es GMT +2. Ahora son las 09:08:33.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi