![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#6
|
|||
|
|||
|
Si solo son 10 tedits, pues...
Edit1.Text := Excel.Cells.Item[Matriz['A','1']] etc... si lo que quieres es encontrar un Edit por su nombre, que es lo que me parece, te dejo una funcion... function TForm.Encontrar_EditBox(string : nombre) : TEdit; var I: Integer; Temp: TComponent; begin for I := ComponentCount - 1 downto 0 do begin Temp := Components[i]; if (Temp is TEdit) then if ((Temp as TEdit).Name = nombre) then Encontrar_EditBox := (Temp as TEdit); end; Econtrar_EditBox := nil; end; Esta funcion debe estar en la form donde estan los EditBoxs... asi, por ejemplo, para poner dentro del Editn el valor de la celda [n,n] seria algo como Encontrar_EditBox('Edit' + inttostr(n)) := Excel.Cells.Item[n,n].Value deberas tener cuidado si no existe el editbox q se busca ya q seria 'null pointer assignment'. Seguro que hay bugs en el codigo espero q pilles la idea. |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| Bucle for de 2 en 2 | douglas | OOP | 9 | 17-10-2007 15:55:53 |
| Pasar demas datos de un DBGRID a TEDIT's | Ericato | Varios | 5 | 09-03-2007 17:44:05 |
| Salir de un bucle do while | RoyTan | Varios | 2 | 28-08-2006 14:25:36 |
| bucle dentro de un bucle | Cosgaya | Varios | 2 | 06-06-2005 07:05:16 |
| Detener un bucle | lfidanza | Varios | 5 | 25-06-2003 00:36:14 |
|