FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
mostrar archivos en Label
Hola amigos, tengo un problemita para mostrar los nombres de los archivos en Label1, me ayude con un codigo en está página para listar archivos, pero ahora quisiera mostrarlos en tiempo real en label1 con un timer1, un ejemplo que hice es este:
------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { if(Contador <= 10) { Timer1->Enabled = true; // habilito el Timer1 Timer1->Interval = 500; Label1->Caption = Contador; // intervalo de tiempo ProgressBar1->Min = 0; ProgressBar1->Max = 9; ProgressBar1->Position = Contador; // muestro el contador en el label1 Contador++; // aumento el contador en 1 } else { Timer1->Enabled = false; // Deshabilito el Timer1 Contador = 0; //Pongo el contador a 0 } } ----------------------------------------------------------------- lo que hace el programita en cuestión es ir mostrando los numeros del 1 al 10 en label1 en un intervalo de 500. Lo que no puedo hacer que salga pero con nombres de archivos de un código que está en está misma página de c++, el código en cuestión es este: ------------------------------------------------------------------- #include <io.h> #include <dir.h> void ListFiles(char *Dir, TListBox *LB) { struct _finddata_t fdt; long hFile; char tmp[MAX_PATH]; chdir(Dir); fdt.attrib = _A_SUBDIR; if( (hFile = _findfirst("*.*", &fdt) ) != -1) { do { if (fdt.attrib == _A_SUBDIR) { if (strcmp(fdt.name,".")!= 0 && strcmp(fdt.name,"..") != 0) { strcpy(tmp, Dir); strcat(tmp, "\\"); strcat(tmp, fdt.name); ListFiles(tmp, LB); } } else LB->Items->Add(String(fdt.name)); } while (_findnext(hFile, &fdt) == 0); _findclose(hFile); }; } void __fastcall TForm1::Button1Click(TObject *Sender) { ListFiles("C:\\UNA_CARPETA", ListBox1); } --------------------------------------------------------------------- He tratado de esta manera pero no funciona: void ListFiles(char *Dir) { Timer1->Enabled = true; // habilito el Timer1 Timer1->Interval = 500; AnsiString concatena; struct _finddata_t fdt; long hFile; char tmp[MAX_PATH]; chdir(Dir); fdt.attrib = _A_SUBDIR; if( (hFile = _findfirst("*.*", &fdt) ) != -1) { do { if (fdt.attrib == _A_SUBDIR) { if (strcmp(fdt.name,".")!= 0 && strcmp(fdt.name,"..") != 0) { strcpy(tmp, Dir); strcat(tmp, "\\"); strcat(tmp, fdt.name); ListFiles(tmp); Form1->ListBox1->Items->Add(tmp); // listo los directorios //SetFileAttributesA(tmp, FILE_ATTRIBUTE_NORMAL); } } else { concatena = String(Dir)+ "\\" + String(fdt.name); //Form1->ListBox1->Items->Add(concatena); // listo los archivos //SetFileAttributesA(concatena.c_str(), FILE_ATTRIBUTE_NORMAL ); } } while (_findnext(hFile, &fdt) == 0); _findclose(hFile); }; Timer1->Enabled = false; // Deshabilito el Timer1 Contador = 0; } agradesco la ayuda posterior. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Mostrar mas archivos de un sitio por FTP | ctronx | Varios | 3 | 03-03-2012 00:48:56 |
Mostrar en una label un item de un ChekListBox | cslbcn | OOP | 2 | 23-01-2009 18:07:38 |
Como mostrar Resultados de una consulta en componentes como los Edit,Label y DbGrids! | danny | Conexión con bases de datos | 2 | 08-05-2008 23:35:46 |
Mostrar archivos 3ds | Drake | OOP | 1 | 04-08-2006 20:40:13 |
Mostrar archivos y directorios en TListView | Drake | C++ Builder | 1 | 12-01-2006 15:48:54 |
|