Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-11-2008
Elite237 Elite237 is offline
Miembro
 
Registrado: jul 2007
Posts: 162
Poder: 17
Elite237 Va por buen camino
Osea no me manda ningun error,logro que se visualicen los datos tanto en el grid como en el tchart, lo que quiero saber es como hacer para que se muestre despues de que trajo todos los datos en el grid una fila que diga Resultado Total
Responder Con Cita
  #2  
Antiguo 07-11-2008
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
Hola...

Pues agrega la linea al final de todo el cálculo, algo como:

Código Delphi [-]
// ...
// Aquí el código que realiza el cálculo y agrega las líneas en el StringGrid
// ...
// Agregamos la línea para el resultado total
sgGrafica.RowCount := RowCount + 1;
sgGrafica.Cells[0, Pred(sgGrafica.RowCount)] := 'Resultado Total';
sgGrafica.Cells[1, Pred(sgGrafica.RowCount)] := ResultadoTotal

Saludos...
Responder Con Cita
  #3  
Antiguo 07-11-2008
Elite237 Elite237 is offline
Miembro
 
Registrado: jul 2007
Posts: 162
Poder: 17
Elite237 Va por buen camino
Excelente Maeyanes.Ya me quedo.Tu sabes como hacer para sumar los valores que me aparecen en la grid y que en el renglo resultado total me aparezca me aparezca la suma de las 3 filas(osea el total de la suma).Saludos
Responder Con Cita
  #4  
Antiguo 07-11-2008
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
Hola...

Tienes de dos, sumar los valores al momento de irlos asignando al grid:

Código Delphi [-]
var
  ResultadoTotal: Integer;

begin
  // Inicializamos a cero antes de agregar las filas al StringGrid
  ResultadoTotal :=  0;
  // Aquí se asignan los valores a las 3 filas que quieres sumar:
  ResultadoTotal := ResultadoTotal + ValorAgregado1;
  ResultadoTotal := ResultadoTotal + ValorAgregado2;
  ResultadoTotal := ResultadoTotal + ValorAgregado3;
end;

O también puedes usar las 3 filas anteriores al resultado para sumarlas:

Código Delphi [-]
var
  ResultadoTotal: Integer;
  I: Integer;

begin
  ResultadoTotal := 0;
  for I := sgGrafica.RowCount - 3 to Pred(sgGrafica.RowCount) do
    ResultadoTotal := ResultadoTotal + StrToInt(sgGrafica.Cells[1, I]);
  sgGrafica.RowCount := sgGrafica.RowCount + 1;
  sgGrafica.Cells[0, Pred(sgGrafica.RowCount)] := 'Resultado Total';
  sgGrafica.Cells[1, Pred(sgGrafica.RowCount)] := ResultadoTotal
end;


Saludos...
Responder Con Cita
  #5  
Antiguo 07-11-2008
Elite237 Elite237 is offline
Miembro
 
Registrado: jul 2007
Posts: 162
Poder: 17
Elite237 Va por buen camino
Thumbs up

Muchas Gracias!!!Me sirvio de mucho.Saludos
Responder Con Cita
  #6  
Antiguo 07-11-2008
Elite237 Elite237 is offline
Miembro
 
Registrado: jul 2007
Posts: 162
Poder: 17
Elite237 Va por buen camino
Un ultima ayuda Maeyanes.Me puedes dar una idea de como puedo hacer para que en el StrinGrid pueda hacer una operacion de division.Lo que quiero hacer es lo siguiente.En el StringGrid ya logre mostrar todos los valores y la suma.Pero debo dividir el valor que obtuve en una seccion entre la suma de los valores maximos que tiene una respuesta de cada pregunta.Por ejemplo
Código Delphi [-]
 
+--------+--+-----
Servicio  |12 |92%|
---------+--+-----
Imagen   |2  |70%|
---------+--+-----
Resultado|10 |60%|
---------+--+-----
Total      |24 |74%|
---------+---+-----

El porcentaje se obtiene dividiendo el total de la seccion entre la suma de los valores mas altos, osea por ejemplo la suma de los valores mas altos de la seccion es 25, ya que esa seccion tiene 5 preguntas y los valores mas altos que hay de respuesta para cada pregunta es de 5.Por ejemplo

Seccion Imagen Personal
pregunta1
respuesta1(su valor es 1)
respuesa2(su valor es 3)
respuesta3(su valor es 5)
Entonces como son 5 preguntas y los valores de las respuestas mas altas son de 5..entonces 5x5=25.Espero haberme dado a entender.Gracias por tus comentarios.
Responder Con Cita
  #7  
Antiguo 07-11-2008
Elite237 Elite237 is offline
Miembro
 
Registrado: jul 2007
Posts: 162
Poder: 17
Elite237 Va por buen camino
Un ultima ayuda Maeyanes.Me puedes dar una idea de como puedo hacer para que en el StrinGrid pueda hacer una operacion de division.Lo que quiero hacer es lo siguiente.En el StringGrid ya logre mostrar todos los valores y la suma.Pero debo dividir el valor que obtuve en una seccion entre la suma de los valores maximos que tiene una respuesta de cada pregunta.Por ejemplo


Código Delphi [-]
 Asi me debe de quedar el StringGrid
+--------+--+-----
Servicio  |12 |92%|
---------+--+-----
Imagen   |2  |70%|
---------+--+-----
Resultado|10 |60%|
---------+--+-----
Total      |24 |74%|
---------+---+-----



El porcentaje se obtiene dividiendo el total de la seccion entre la suma de los valores mas altos, osea por ejemplo la suma de los valores mas altos de la seccion es 25, ya que esa seccion tiene 5 preguntas y los valores mas altos que hay de respuesta para cada pregunta es de 5.Por ejemplo

Seccion Imagen Personal
pregunta1
respuesta1(su valor es 1)
respuesa2(su valor es 3)
respuesta3(su valor es 5)
Entonces como son 5 preguntas y los valores de las respuestas mas altas son de 5..entonces 5x5=25.Espero haberme dado a entender.Gracias por tus comentarios.
Responder Con Cita
  #8  
Antiguo 07-11-2008
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
Hola...

No tenías que repetir la pregunta dos veces...

Para obtener esos porcentajes y sumas que necesitas, creo que lo mejor sería que lo hagas de otra forma y no usando el StringGrid. Vamos, que este componente está diseñado para mostrar datos y no para hacer cálculos con la misma.

Todas las operaciones bien las puedes hacer usando directamente los queries.

Puedes hacer queries del tipo:

Código SQL [-]
select sum(x_field) from x_table where condicion

o tal vez:

Código SQL [-]
select sum(x_campo) / x_campo from x_tabla where condicion

Y ya con lo que te devuelva el query entonces si lo muestras en alguna celda del StringGrid...



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
Insertar Boton en StringGrid, seb@ OOP 19 10-04-2016 05:09:21
Error al insertar registros en el StringGrid Elite237 OOP 21 06-11-2008 20:01:17
cambiar color StringGrid, toda una fila, despues de la primera. sakuragi OOP 5 28-11-2005 19:20:33
Ejecutar codigo despues de insertar valor en columna el_barto Conexión con bases de datos 2 30-08-2005 23:20:57
No me inserta despues de un registro con Ñ o tilde JoanKa Firebird e Interbase 2 04-03-2005 09:06:17


La franja horaria es GMT +2. Ahora son las 11:30:38.


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