Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 19-07-2011
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Poder: 18
jafera Va por buen camino
Error al crear un MDI Form

Estoy con una aplicación en la que he puesto un formulario de login para que me guarde un valor del ID del usuario que se conecte para usarlo en otro proceso del programa, más que por seguridad.

El login funciona bien siempre que la tabla usuarios tenga algún registro.

Si quiero que la primera vez que arranco la aplicación busque en la tabla de usuarios si existe algun valor y en caso contrario me enseñe el form usuarios para poder insertar uno, me da un error de accsess violation

Access violation at address 006BDF5F in module 'Rebuts.exe'. Read of address

Tengo puesto este código en el source del programa
Código Delphi [-]
begin
        F_Splash := TF_Splash.Create(Application);
        F_Splash.Show;
        F_Splash.Update;
        Sleep(2000);
        Application.Initialize;
        Application.Title := 'Rebuts';
        Application.HelpFile := 'C:\Rebuts_1.0\Ajuda\REBUTS_1.0.HLP';
        Application.CreateForm(TF_ModulDades, F_ModulDades);
        Application.CreateForm(TF_Inici, F_Inici);                   //Aqui tambien se para
        F_Splash.Hide;
        F_Splash.Free;
        Application.Run;
end.

con lo que el datamodule ya esta creado y accesible.

En el FormShow del principal tengo el siguiente codigo

Código Delphi [-]
procedure TF_Inici.FormShow(Sender: TObject);
begin
        ComprovaTaules;

        if F_ModulDades.Usuaris.RecordCount = 0 then
        begin
                F_Usuaris.Create(Self);  //Aqui da el error
        end;

        F_Login:=TF_Login.Create(Self);
        try
                F_Login.ShowModal;
        finally
                F_Login.Free;
        end;
end;

ComprovaTaules es una funcion que mira si existe uno o varios campos nuevos en la tabla o si hay que añadir una tabla entera.

El Form Usuarios es fsMDIChild.

Si ignoro el error entro en el programa sin que me pida el login.

Si alguien tiene alguna idea de donde puede estar el error pues muchas gracias por adelantado.

Saludos
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Crear un form en una libreria Dll miguelcba Varios 4 06-10-2008 23:55:30
Error al crear MDI Form Faust Varios 8 23-04-2008 05:12:01
Error Al Crear Varias Veces El Mismo Form ManuelPerez Varios 7 18-09-2007 21:31:02
Error compilacion al crear form MDIChild drykea Varios 4 23-08-2007 16:46:04
Proyecto MDI, error al crear form hija nfrfabian Varios 22 04-07-2007 01:29:47


La franja horaria es GMT +2. Ahora son las 05:44:24.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi