Am Freitag, den 19.10.2007, 20:00 -0700 schrieb Jeff Steinkamp:

> program splog;
> 
> {$mode objfpc}{$H+}
> 
> uses
>   {$IFDEF UNIX}{$IFDEF UseCThreads}
>   cthreads,
>   {$ENDIF}{$ENDIF}
>   Interfaces, // this includes the LCL widgetset
>   Forms,
>   Unit1,  //contains the main form
>   Unit2,  //contains the splashscreen
>   pers, selfile, lnetvisual, config, dup,
>   flags, sdf, chapsetup, listinput;
> 
> begin

  Application.Initialize;

>   frmSplash := TfrmSplash.Create(application);
>   frmSplash.Show;                               //fails on this line
>   frmSplash.update;


>   Application.CreateForm(TfrmMain, frmMain);
>   Application.CreateForm(TfrmChapterSetup, frmChapterSetup);
>   Application.Run;
> end.

Try that order.

HTH (only guessing),
Marc

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to