Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-12-2010
juaarias juaarias is offline
Miembro
NULL
 
Registrado: nov 2010
Posts: 50
Poder: 0
juaarias cantidad desconocida en este momento
dephi 10 lite grid

hola gente soy novato nose si es el sitio indicado,pero no me doy cuenta como controlar si todos los campos de un grid estan vacios o no. lo que hago es pedir datos para que el usuario ingrese en un grid y quiero saber si estos han sidos cargados sino pedir que los cargue.saludos espero pueda ayudarme
Responder Con Cita
  #2  
Antiguo 01-12-2010
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Hola, juaarias, bienvenido a clubdelphi, por favor, lee nuestra guía de estilo para que conozcas nuestras normas, muchas gracias.
Como ves, cada pregunta distinta debe ir en un nuevo tema, no los mezcles. Ya he movido yo este a "varios", debes fijarte en qué foro pones cada pregunta, dependiendo de la temática del mismo.
Responder Con Cita
  #3  
Antiguo 01-12-2010
juaarias juaarias is offline
Miembro
NULL
 
Registrado: nov 2010
Posts: 50
Poder: 0
juaarias cantidad desconocida en este momento
gracias

hola gracias disculpas
Responder Con Cita
  #4  
Antiguo 01-12-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola juaarias y bienvenido.

A ver si estos ejemplos te sirven...

Para controlar si todas las celdas del StringGrid (creo que a ese componente te referís) podés hacer:
Código Delphi [-]
function TForm1.FaltanDatos: Boolean;
var
  c,f: Integer;
begin
  Result:= False;
  for c:= StringGrid1.FixedCols to StringGrid1.ColCount -1 do
    for f:= StringGrid1.FixedRows to StringGrid1.RowCount -1 do
      if StringGrid1.Cells[c, f] = '' then
        Result:= True;
end;

Ejemplo de llamada:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if FaltanDatos then
    ShowMessage('Faltan ingresar valores');
end;

Para avisar en cada celda si se sale de editar sin un valor podés usar el evento OnSetEditText del TStringGrid:
Código Delphi [-]
procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol, ARow: Integer; const Value: String);
begin
  if Value = '' then
  ShowMessage('Ingrese un valor');
end;

Un saludo.
Responder Con Cita
  #5  
Antiguo 01-12-2010
juaarias juaarias is offline
Miembro
NULL
 
Registrado: nov 2010
Posts: 50
Poder: 0
juaarias cantidad desconocida en este momento
holaa

como veras soy muy novato en delphi, se me habia ocurrido algo asi pero completaba las celdas e igual me slataba el showmessage.
//CONTROLO QUE ESTEN LOS DATOS EN EL GRID//
b:=false;
for i := 1 to stgDatos.rowCount do
if (stgDatos.Cells[1,i]='')or((stgDatos.Cells[2,i]='')or ((stgDatos.Cells[3,i]=''))) then
b:=true;
if b=true then
showmessage('FALTAN IGRESAR DATOS');
Responder Con Cita
  #6  
Antiguo 01-12-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Poder: 17
rgstuamigo Va por buen camino
Arrow

Solo agregar que si estas trabajando con campos obtenidos de una base de datos pues lo más apropiado para visualizarlos es usar un componente TDBGrid que te lo hace todo.
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita
  #7  
Antiguo 01-12-2010
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cita:
Empezado por juaarias Ver Mensaje
hola gracias disculpas
No hay problema, si no conoces nuestras normas es normal que no lo hagas bien al principio.
Por cierto, además de nuestra guía de estilo, también puedes ver las etiquetas para formatear código.

Con las etiquetas tu código lo verás así:

Código Delphi [-]
//CONTROLO QUE ESTEN LOS DATOS EN EL GRID//
b:=false;
for i := 1 to stgDatos.rowCount do
  if (stgDatos.Cells[1,i]='')or((stgDatos.Cells[2,i]='')or ((stgDatos.Cells[3,i]=''))) then
  b:=true;
if b=true then
showmessage('FALTAN IGRESAR DATOS');[/quote]
Responder Con Cita
  #8  
Antiguo 02-12-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por juaarias Ver Mensaje
como veras soy muy novato en delphi, se me habia ocurrido algo asi pero completaba las celdas e igual me slataba el showmessage.
//CONTROLO QUE ESTEN LOS DATOS EN EL GRID//
b:=false;
for i := 1 to stgDatos.rowCount do
if (stgDatos.Cells[1,i]='')or((stgDatos.Cells[2,i]='')or ((stgDatos.Cells[3,i]=''))) then
b:=true;
if b=true then
showmessage('FALTAN IGRESAR DATOS');
Hola de nuevo.

Si sólo tenés 3 columnas tu código es lógicamente correcto, y es más eficiente que recorrer todas las celdas ya que verificas 3 columnas por ciclo.

El mensaje te sigue apareciendo por que en el for haces:
Código Delphi [-]
for i := 1 to stgDatos.rowCount do

y debería ser:
Código Delphi [-]
 for i := 1 to stgDatos.rowCount -1 do

Al estar verificando una fila de más que no tiene ningún dato, 'b' toma el valor True y muestra el mensaje.

Saludos.
Responder Con Cita
  #9  
Antiguo 02-12-2010
juaarias juaarias is offline
Miembro
NULL
 
Registrado: nov 2010
Posts: 50
Poder: 0
juaarias cantidad desconocida en este momento
graciasss

muchas gracias gente, la verdad es un gran acierto ser parte de esto espero algun dia yo poder ayudar como uds a mi.por el momento vuelvo a molestar estoy intentando hacer que en determinada cela solo se pueda ingresar uno de tres numero (22,26,28),alguna recomendacion?
Responder Con Cita
  #10  
Antiguo 02-12-2010
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cita:
Empezado por juaarias Ver Mensaje
muchas gracias gente, la verdad es un gran acierto ser parte de esto espero algun dia yo poder ayudar como uds a mi.por el momento vuelvo a molestar estoy intentando hacer que en determinada cela solo se pueda ingresar uno de tres numero (22,26,28),alguna recomendacion?
Recuerda leer nuestra guía de estilo, juaarias, una de las normas es: "Pregunta distinta... en hilo nuevo". No mezcles cosas distintos en un mismo hilo/tema ya que así luego es imposible hacer consultas coherentes y recuerda poner títulos descriptivos a las preguntas.
Saludos.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Comparativa Turbo Delphi vs Dephi Delphius Varios 12 20-09-2007 01:06:13
Han hackeado la página web de Dephi 3000 railback Noticias 11 29-12-2006 17:55:45
Se volvio loco mi Dephi DTAR Varios 2 07-11-2006 16:34:49
smtp en dephi soyhugo Internet 17 15-05-2004 00:27:07
Busco Libros en PDF de Dephi kgenao Varios 3 05-12-2003 17:25:40


La franja horaria es GMT +2. Ahora son las 03:07:18.


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
Copyright 1996-2007 Club Delphi