PDA

Ver la Versión Completa : ayuda a novato


cesarjbf
17-08-2004, 20:54:01
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
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
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.

;)