Club Builder - Foros de discusión Club Builder
Foro de C++Builder en español
 
 FAQFAQ   BuscarBuscar   MiembrosMiembros   Grupos de UsuariosGrupos de Usuarios   RegistrarseRegistrarse 
 PerfilPerfil   Entra para ver tus mensajes privadosEntra para ver tus mensajes privados   EntrarEntrar 

Lio con los forms

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Consultas
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
Mensaje    Asunto: Lio con los forms Responder citando

Hola a todos, he realizado un pequeño programa con conexion a base de datos. Lo que intento hacer es un asistente de configuración donde el usuario introduzca la ip, hasta ahi bien, el problema viene cuando quiero que se me ejecute el form del asistente cuando inicie el programa por primera vez.
Como puedo hacerlo?.
Muchas gracias.
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

Entra en
Project>Options>Forms>MainForm >> Ventana de Configuracion
_________________
Read what I mean, not what I write!
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

Si, eso lo se, lo que deseo hacer es que solo se ejecuten esos forms cuando se inicie el programa por primera vez, despues que se inicie normal, desde el form1.
Gracias
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

Lo puedes hacer en el eventon OnShow del formulario principal, siempre y cuando el indicador de que es la primera vez que se ejecuta el programa, el cual puedes guarda en un fichero *.ini, te diga que es la primera vez que se ejecuta.

Te pongo un ejemplo de lo que yo hago en dicho evento:

if(Tag==0)
{
TfrmContra *frmform = new TfrmContra(this);
frmform->ShowModal();
if(frmform->g_nom_usu.IsEmpty() && frmform->g_usuario.IsEmpty())
{
frmPrincipal->WindowState=wsMinimized;
Application->Terminate();
return;
}
else
{
g_usuario = frmform->g_usuario;
g_nom_usu = frmform->g_nom_usu;
BarraEstado->Panels->Items[3]->Text= g_nom_usu;
}
delete frmform;
BringToFront();


SQL="select DatePart('ww', Now() ) as semana from gen_meses where me_codigo = 1";
EjecutaSQL(DTM1->QryTemp,SQL);
BarraEstado->Panels->Items[0]->Text=BarraEstado->Panels->Items[0]->Text + " (Semana " +
DTM1->QryTemp->FieldByName("semana")->AsString + ")";

Tag=1;

}
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email MSN Messenger
Mostrar mensajes de anteriores:   
Cambiar a:  
No puedes publicar temas nuevos en este foro
No puedes responder a temas en este foro
No puedes editar tus mensajes en este foro
No puedes borrar tus mensajes en este foro
No puedes votar en las encuestas de este foro


Hosting WordPress Indedmedia desde 3,99 €
© 2002–2026 Club Builder · Funciona con phpBB.