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 arrays
Hola amigos estoy empezando con delphi, alguien podria ayudarme con lo siguiente:
procedure TForm1.Button1Click(Sender: TObject); var ar: Array[1..4] of String; begin ar[1] := 'Luis'; ar[2] := 'Juan'; ar[3] := 'Manuel'; ar[4] := 'Jose'; Como puedo hacer para mostrarlo en un TLabel y que se muestren uno por uno y desde el ar[1], hasta el ar[4], y otra vez del ar[1] al ar[4], y asi sucesivamente, alguien me puede sugerir algo?, gracias de antemano. |
#2
|
|||
|
|||
Que es lo que queires que sea tipo un cartel que cambia los nombres sucesivamente???
|
#3
|
||||
|
||||
Puedes usar un Timer pero deberás declarar el arreglo fuera del botón, por ejemplo, como variable del formulario:
En Button1Click llenas el arreglo y activas el Timer:
En el evento OnTimer actualizas la etiqueta:
el mod es para que al llegar a la última persona (3 en este caso), el índice se regrese a 0. La velocidad con la que aparezcan los nombres la controlas con la propiedad Interval del Timer (expresada en milisegundos). Así, si la pones en 500, el nombre cambiará cada medio segundo. // Saludos |
#4
|
|||
|
|||
Gracias Roman ya lo probe y es lo que necesitaba, una constulta mas, ¿pordria hacer lo mismo sin utlilizar el Ttimer?, que me puedes sugerir
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
arrays dinamicos | Chompiras | Varios | 8 | 14-07-2015 22:49:51 |
arrays | nenufer | Varios | 7 | 13-05-2006 21:44:51 |
Arrays asociativos | Bauhaus1975 | Varios | 2 | 27-04-2006 11:25:23 |
Liberar Arrays | altp | OOP | 3 | 27-05-2004 15:39:12 |
Arrays Dinamicos | mauro | Varios | 4 | 05-07-2003 21:14:29 |
|