AYUDA PARA ELIMINAR DATOS DE UN GRID
Publicado por CESARSIMON (13 intervenciones) el 18/06/2009 05:01:53
QUE TAL DE NUEVO TENGO OTRA DUDA
COMO puedo hacerle para que elimine los datos en un grid sin que este oculte todo su contenido
por ejemplo utiliza el siguiente codigo para eliminar:
close all tables
use "c:compumercaderia.dbf"
delete all
pack
thisform.refresh
y los elimina definitivamente pero como tengo los datos de la tabla mercaderia en el grid, el grid solo se muestra como un rectangulo y todo Blanco osea:
si el grid contenia los titulos de codigo,descripcion etc, desaparecen.
pero utilice el siguiente codigo:
para eliminarlos datos pero donde me muestra en una columna pequeña del grid es una columna delgada donde das clic y se muestra la casilla en color negro, eso es lo que hace no lo elimina definitivamente solo temporal
X=MESSAGEBOX("¿Está seguro que quiere eliminar un registro?",4+32+256,"¡ATENCION!")
IF X=6
Select tempvent
DELETE NEXT 1
THISFORM.GRID2.REFRESH
Go top
else
endif
que puedo hacer con el primer codigo si elimina definitivamente pero el grid no queda bien
y con el segundo codigo solo temporalmente espero puedan ayudarme.gracias de antemanto..
ha otra duda si selecciono alguna fila de un grid(si el grid contiene 3 columnas) que contenga datos al momento de dar clic en alguna fila del grid los pase a un cuadro de texto o un text cada columna respectivamente pero solo la fila seleccionada ..estoy trabajando todo en VFP 6.0
COMO puedo hacerle para que elimine los datos en un grid sin que este oculte todo su contenido
por ejemplo utiliza el siguiente codigo para eliminar:
close all tables
use "c:compumercaderia.dbf"
delete all
pack
thisform.refresh
y los elimina definitivamente pero como tengo los datos de la tabla mercaderia en el grid, el grid solo se muestra como un rectangulo y todo Blanco osea:
si el grid contenia los titulos de codigo,descripcion etc, desaparecen.
pero utilice el siguiente codigo:
para eliminarlos datos pero donde me muestra en una columna pequeña del grid es una columna delgada donde das clic y se muestra la casilla en color negro, eso es lo que hace no lo elimina definitivamente solo temporal
X=MESSAGEBOX("¿Está seguro que quiere eliminar un registro?",4+32+256,"¡ATENCION!")
IF X=6
Select tempvent
DELETE NEXT 1
THISFORM.GRID2.REFRESH
Go top
else
endif
que puedo hacer con el primer codigo si elimina definitivamente pero el grid no queda bien
y con el segundo codigo solo temporalmente espero puedan ayudarme.gracias de antemanto..
ha otra duda si selecciono alguna fila de un grid(si el grid contiene 3 columnas) que contenga datos al momento de dar clic en alguna fila del grid los pase a un cuadro de texto o un text cada columna respectivamente pero solo la fila seleccionada ..estoy trabajando todo en VFP 6.0
Valora esta pregunta


0