FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Ayuda con un StringGrid
Empezado por maky
ola pus necesto auyada con un StringGird; que se muestre el arreglo en un stringGrid y que vaya recorriendo los renglones para que al final de arreglo sume todas las cantidades ingresadas y saque el promedio por ejemplo algo asi 1|5 2|5 3|5 y promedio mostramos en un label espero me puedad ayuda gracias --se una en edit -- un pboton porel cual seingresan los datos a un StringGrid y otro boton realizar la operacion y el label paramostrar el resulatdo espero e puedan ayudar ok |
#2
|
||||
|
||||
Hola maky,
Espero que no te haya molestado que te haya pedido que al temas lo expongas en el foro en ves de tratarlo en forma privada. Noto que a tu duda la expones en el sub-foro de Kylix, Lazarus, etc. Yo no uso ninguno de estos entornos. Yo uso Delphi, si es Lazarus lo que usas no sabría decir hasta que punto el código sea tan similar desde Delphi. Quería preguntarte, antes de arriesgarme a poner código, si el promedio a obtener es ¿renglón por renglón? Es decir esto: renglón 1: dato1 | dato2 | datoN | Promedio renglón M: dato1 | dato2 | datoN | Promedio ¿O se trata de obtener el promedio de las los renglones, columna por columna? fila 1 | fila 2| Dato1| Dato1 | Dato2 | Dato2 | ... Promedio | Promedio | Saludos, |
#3
|
|||
|
|||
otra vez molestandote jaja
talvez sea muy sencillo pero apenasestoy aperendiendo a menejar delphi
mira esto es lo que llevo hasta ahora de codigo pero presiento que falta algo a ver si puedes ayudarme ok. type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; SGNums: TStringGrid; Button2: TButton; Label1: TLabel; Label2: TLabel; procedure Button1Click(Sender: TObject); procedure FormCreate(Sender: TObject); private nums: array of integer; Tam:integer; // row:integer; { Private declarations } public { Public declarations } rcount:integer; end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var valor:integer; //begin //if (row<Tam) then i, j:Integer; Str:String; begin valor:= StrToInt (Edit1.Text); setLength (nums,20); SGNums.Cells[1,1]:=Edit1.Text; SGNums.RowCount:=SGNums.RowCount+1; for j := 0 to (SGNums.Rows[i].Count - 1) do begin //SGNums.ColsCount:=SGNums.ColsCount+1 //SGNums.ColCount; //SGNums.Row:= SGNums.Row+1; end; end; //edit1.setfocus; procedure TForm1.FormCreate(Sender: TObject); begin SGNums.Cells[0,0]:='Posicion'; SGNums.Cells[1,0]:='Valor'; end; end. |
#4
|
|||
|
|||
Hola...
Veo que eres nuevo en estos foros, así que primero te doy la bienvenida y luego te invito a que leas la Guía de Estilo de estos foros (enlace arriba del banner ) También te pido que cuando publiques código fuente en estos foros, uses las etiquetas [ DELPHI ] [ /DELPHI ] (sin los espacios en blanco). De esta forma tu código se verá más presentable:
¿Ves la diferencia? Saludos... |
#5
|
|||
|
|||
Respuesta
Ok Gracias
|
#6
|
||||
|
||||
Hola Maky, porque quieres guardar los datos en un arreglo, no sería mejor que le permitieras llenar directamente dentro de las celdas y que se vaya sumando y mostrando en tu Label, paar permitir editar la celda del StringGrid debes colocar a True la propiedad Options->goEditing, suponiendo que quieres sumar la columna Valor, puedes hacerlo mas o menos de esta forma
Trata de explicar lo mas que puedas tu problema, para que puedas recibir mas ayuda de todos. Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#7
|
|||
|
|||
ayuda con el SG
Muchas gracias fue de gran ayuda tu respuesta ok
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Trabajando con StringGrid | rgstuamigo | OOP | 11 | 27-08-2008 12:32:55 |
Ayuda con StringGrid | BuenaOnda | Varios | 1 | 10-06-2008 05:30:53 |
Ayuda con Stringgrid | sexshop_3 | Varios | 7 | 24-08-2007 01:01:10 |
Ayuda con StringGrid | BuenaOnda | Varios | 7 | 10-05-2007 08:05:19 |
Ayuda en el Uso del StringGrid | doncowboy | OOP | 2 | 24-04-2007 19:26:33 |
|