Bob
If you hack the main program pas file you can get
no forms autocreated
(It is ideal to have something autocreated such as
a Datamodule or the IDE gets bent)
ie My main programs all look
like
begin
{Attempt to create a named mutex} CreateMutex(nil, false, PChar(AppCentral.AppName)); {if it failed then there is another instance} if GetLastError = ERROR_ALREADY_EXISTS then begin {Send all windows our custom message - only our other} {instance will recognise it, and restore itself} SendMessage(HWND_BROADCAST, RegisterWindowMessage(PChar(AppCentral.AppName)), 0, 0); Halt(0); end; Application.Initialize; Application.CreateForm(TISMainDataModule, ISMainDataModule); SplashForm := TSplashForm.Create(nil); with SplashForm do try if not AppCentral.Developing then begin Show; // show a splash screen Update; // force display end; try AppCentral.AllOk := ISMainDataModule.Initialise(SplashForm.Panel1); if AppCentral.AllOK then Application.CreateForm(TISMainForm, ISMainForm); if not AppCentral.AllOk then Abort; AppCentral.TitleApplication(ISMainForm); AppCentral.CheckOk; AppCentral.HideSplash := true; SplashForm.Release; if AppCentral.AllOK then ISMainForm.Show; except Application.Terminate; end; finally SplashForm.Release; end; Application.Run; end. in which case thew IDE says that ISMainDataModule
is the main form! and ignores the rest
HTH
Neven
|
Title: Message
- [DUG]: Column Names Neven MacEwan
- RE: [DUG]: Column Names Kyley Harris
- Re: [DUG]: Column Names Neven MacEwan
- RE: [DUG]: Column Names Kyley Harris
- Re: [DUG]: Column Names Neven MacEwan
- Re: [DUG]: Column Names Nello Sestini
- Re: [DUG]: Column Names Neven MacEwan
- [DUG]: Persistent Main form Bob Osborn
- RE: [DUG]: Column Names Neven MacEwan
- RE: [DUG]: Column Names Stacey Verner
- Re: [DUG]: Column Names Neven MacEwan
- RE: Re: [DUG]: Column Names Peter Speden
- RE: Re: [DUG]: Column Names Andreas Toth
- Re: Re: [DUG]: Column Names Neven MacEwan
- RE: RE: Re: [DUG]: Column Names Peter Speden
- RE: RE: Re: [DUG]: Column Names Andreas Toth
- RE: Re: Re: [DUG]: Column Names Peter Speden
- Re: Re: Re: [DUG]: Column Names Neven MacEwan
- RE: Re: Re: [DUG]: Column Names Myles Penlington