Limpiar DBEdit

[vtdeleon]

Saludos

Si lo que quieres es que se muestre vacio solo usa CLEAR: DBedit1.Clear;
Ten en cuenta que solo hara eso, limpiar la casilla del DBedit1!! y usalo despues de abrir la BD.

No modifica, ni agrega nada a la base de datos. Al menos que manejes el Dataset.

[Ade]

hOla a todos tengo la misma duda,
solo que tengo los dbedit dentro de un groupbox,pero a mi en un principio los dbeditt me salen en blanco solo q al escribir en ellos y pulsar en el boton limpiar datos cuyo codigo es:

Código Delphi [-]
procedure TProveedores.LimpiarClick(Sender: TObject);
var
   I:integer;
begin
     for I:=0 to InsertarGroupBox.ControlCount do begin
         if (Components[i] is TDBEdit) then
         begin
           TDBEdit(Components[i]).Clear;
           NumInsertado.visible:=false;
         end;//if TDBedit
     end;
end;

aparentemente estan limpios , pero cuando me situo nuevamente en los dbedit me aparecen esos datos q trate de limpiar
alguien tiene una sugerencia??
gracias

[[Caral]]

Hola
Hay que tener en cuenta que el DBEdit es simplemente un capturador de la informacion que contiene la tabla, como dice arriba Roman.
Podras limpiarlo las veces que quieras, pero siempre saldra el dato de lo contrario para que sirve?.
Cuando suceden cosas asi es mejor usar un simple edit, que se mantendra vacio mientras uno quiera y trabajara como un DBEdit, tambien cuando uno quiera.
Esa es mi humilde opinion, por lo menos es mas facil que lidiar con limpieza de componentes.
Saludos

[Ade]

ok gracias, use los dbedit para luego simplemente hacer un Ztable1.insert, pus con los edit deberia d ehacerlo manualmente para cada campo, estoy equivocada?

[[Caral]]

Hola Ade
Es algo asi:
En el from create Pones:

Código Delphi [-]
 Edit1.Clear;

Con esto el edit estara limpio al entrar
y
En el sitio donde grabas los datos

Código Delphi [-]
Ztable1.Open;
Edit1.Text:= DBEdit1.Text;
Ztable1.insert
Edit1.Text;
Ztable1.Post;

Saludos

[Ade]

hola caral, lo siento pero no te entendi , edit, dbedit o los dos??

soy novata con delphi y esta es mi 1º aplicacion.
de todas formas mencionarte q tengo un from en el cual tengo pestañas (ttabbednotebook), una para insertar,otra eliminar/modificar, otra listar y otra para salir.
en la de insertar tengo un groupbox (InsertarGroupBox) y en el los label (12)y dbedit(12) , un label (NumInsertado) para ir mostrando si se insertó o faltan datos y un boton insertar, y al pulsar este boton ya valido los campos y si son correctos inserto y se quedan los dbedit en blanco.
todo eso ok

pero veo la pantalla algo sosa y pense q si el usuario introducia datos y no deseaba insertar q??
pues un boton , ya fuera cancelar o limpiar, cuya funcionalidad fuera esa la de limpiar los dbedit.
pero no tengo ningun edit,pensaba q con ellos deberia de hacer:

Código Delphi [-]
ZTable.FieldByName('Codigo').AsString:=edit.text;

y asi para cada campo
gracias por tu ayuda

[[Caral]]

Hola Ade
En donde vas a insertar el registro pones:

Código Delphi [-]
if MessageBox(Handle, 
                PChar('Esta Seguro de que desea' + #13#10 + 
                      'Insertar El Nuevo Registro'), 
                PChar('Registros'),
                MB_OKCANCEL + MB_DEFBUTTON1 + MB_SYSTEMMODAL) = IDOK 
then
// Esto si no quiere insertar, osea Cancelar, limpia los DBEdit y da el foco al DBedit que necesites, yo puse DBEdit1 por poner algo, tu eliges
     DBEdit1.Clear;
     DBEdit1.SetFocus;
 begin
// Aqui pones la sentencia que usas para insertar en la tabla, Ejemplo
ZTable.Insert;
DBEdit1.Text;
DBEdit2.Text;
DBEdit3.Text; // Etc, Etc, Etc
ZTable.Post;

Espero te sirva
Saludos