Dbgrid en blanco

[[gatosoft]]

hola de nuevo lafourcade,


Como aporte te comento que puedes "mejorar" tu codigo de limpieza de TEdits haciendo algo como:

for i := 0 to form1.ComponentCount - 1 do
if form1.Components[i] is TEdit then
(form1.Components[i] as TEdit).Text := '';

Lo anterior se explica asi:

Linea 1) Recorres con un for la lista de componentes de tu formulario (Form1 o como se llame)
Linea 2) Evaluas si el componente es un TEdit
Linea 3) Si cumple con la condición entonces cambias la propiedad text del componente: text:=''
o como en tu caso ejecutas un metodo Clear (Self.Components[i] as TEdit).Clear


Si no quieres borrar TODOS los controles TEdit, si no solamente una parte de ellos podrias valerte d ela propiedad Tag que tienen todos los controles, asi:

Para cada TEdit que tengas que limpiar, busca en el Object Inspector la propiedad Tag, que por defecto estará en cero y cambiala por cualquier valor, por ejemplo 3.. y modificas el codigo anterior con:

for i := 0 to form1.ComponentCount - 1 do
if form1.Components[i] is TEdit then
if (form1.Components[i] as TEdit).Tag = 3 then
(form1.Components[i] as TEdit).Text := '';


Por otro lado "me preocupa" que tengas un componente llamado Edit83... eso quiere decir que muy probablemente tu pantalla este llena de Edits y seria bueno que replantearas usar otro componente como un DbGrid, o un stringGrid para una captura masiva de datos... bueno no concemos tu codigo pero si nos comentas como es tu pantalla, (y si nos queda tiempo) te asesoramos...

un saludo,