478 isDeveloperMode:= false;

   478 isDeveloperMode:= false;

   479 

   479 

   480 TryDo(InitStepsFlags = cifAllInited, 'Some parameters not set (flags = ' + inttostr(InitStepsFlags) + ')', true);

   480 TryDo(InitStepsFlags = cifAllInited, 'Some parameters not set (flags = ' + inttostr(InitStepsFlags) + ')', true);

   481 

   481 

   482 MainLoop;

   482 MainLoop;

   484 end;

   483 end;

   485 

   484 

   486 /////////////////////////

   485 /////////////////////////

   487 procedure GenLandPreview;

   486 procedure GenLandPreview;

   488 var Preview: TPreview;

   487 var Preview: TPreview;