Need some more help please.
I have (for simplicity sake) 2 units UserSettingsUn and MainFm.
In UserSettingsUn I have the following:
unit UserSettingUn;
interface
uses DBTables, DB, Classes, SysUtils, Dialogs, Graphics,
MainFm, DataMod;
{$DEFINE AR}
.
.
etc
In MainFm I have the following:
procedure TMainForm.FormShow(Sender: TObject);
begin
{$IFDEF AR} Showmessage('MainForm before OnStartUp'); {$ENDIF}
end;
.
.
etc
The message doesn't show.
The same message placed in the implementation part of UserSettingsUn
does show.
What am I missing? This is driving me mad!
Thanks
Mark
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
