| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
rod Invitado
|
Publicado: Lun 23 Feb, 2004 3:45 pm Asunto: progress bar |
|
|
Hola, alguien me puede explicar como ejecutar una progress bar para que funcione junto con un splash (que la barra se vaya rellenando conforme dure el splash en pantalla)? Agradecería mucho a quien me contestara. Un saludo.
rod  |
|
| Volver arriba |
|
 |
-Spencer- Capt

Registrado: 03 Mar 2003Mensajes: 160Ubicación: Armenia - Colombia
|
Publicado: Lun 23 Feb, 2004 6:45 pm Asunto: Re: progress bar |
|
|
Yo lo haria asi
Si el splash durara 10 segundos, colocaria un timer que se ejecutara cada segundo (o el tiempo que creas necesario), y en el evento del timer incrementaria la posicion del progressbar las posiciones deseadas. _________________ "Cállate, o di algo mejor que el silencio" |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Lun 23 Feb, 2004 8:34 pm Asunto: |
|
|
Mira yo lo realice de esta manera, y si fucniona, por mas que lo intente de muchas maneras, la unica opcion, que pude poner fue lo siguiente, en cada uno de los Forms, que se crean para el proyecto, y en la opcion Create, de los Forms Estableci lo siguiente
| Código: |
void __fastcall TPRINCIPAL::FormCreate(TObject *Sender)
{
Splash->CGauge1->Progress++;
}
|
donde esta la barra de progreso asi, cada vez que se crea un form se agrega en la barra del splash,
bueno en el codigo principal del programa esta asi..
| Código: |
Application->Initialize();
// ESTA PARTE ES PARA HACER EL SPLASH SCREEN
Splash = new TSplash (static_cast<void *>(NULL)); // Añade esta línea
Splash->CGauge1->MinValue=0;
Splash->CGauge1->MaxValue=5; // numero de forms a crear
Splash->CGauge1->Progress=0;
Splash->Show(); // Añade esta línea
Application->ProcessMessages(); // Añade esta línea
Application->Title = "Sistema De Facturacion."; // OJO
Application->HelpFile = "";
Application->CreateForm(__classid(TDataModule1), &DataModule1);
Application->CreateForm(__classid(TDataModule2), &DataModule2);
Application->CreateForm(__classid(TPRINCIPAL), &PRINCIPAL);
Application->CreateForm(__classid(TFSeleccion), &FSeleccion);
Application->CreateForm(__classid(TFVHABITA), &FVHABITA);
Application->Run();
|
_________________
 |
|
| Volver arriba |
|
 |
bosoft Master

Registrado: 23 Oct 2005Mensajes: 342
|
Publicado: Dom 19 May, 2013 8:56 am Asunto: |
|
|
No he probado la barra pero con un statictext no funciona
repesco este post porque es algo muy parecido a mi problema.
yo tengo un splash en el que hay un staticttext donde voy mostrando lo que está cargando la aplicación principal. Pero no funciona.
Dentro del OnCreate | Código: | Splash->Scarga->Caption="Cargando pestañas.....";
Application->ProcessMessages();
|
Le he llegado a poner un sleep(5000) para ver si es que no lo veo, pero no
He dejado solo una linea con el Scarga->Caption para comprobar que en el splash si había cambiado y si que ha cambiado el valor de Scarga | Código: | void __fastcall TForm1::FormShow(TObject *Sender)
{
if (Splash)
{
Form1->Caption=Splash->Scarga->Caption;
delete Splash;
Splash = NULL;
}
} |
¿Que hago?
Gracias
Saludos |
|
| Volver arriba |
|
 |
bosoft Master

Registrado: 23 Oct 2005Mensajes: 342
|
Publicado: Lun 20 May, 2013 8:58 am Asunto: |
|
|
Pues parece ser que si estas dentro del ide en modo debug no funciona muy bien. Pero en modo release y fuera del ide, perfecto
Otra cosa que falla es si intento añadir un item en un listview en el oncreate. Salta un error en el ide, pero si se ejecuta por separado, simplemente el programa no arranca y no dice nada | Código: | TListItem *Elemento;
Elemento=ListView1->Items->Add();
|
Saludos |
|
| Volver arriba |
|
 |
|