Search code examples
gmlib

GMLib MegaDemo.exe Won't load



The map won't load anymore on the megademo.exe.
The problem start when i put: GMMap1.Active := True;

Thanks for the help.


Solution

  • try this

    var
      FMapLoaded: boolean;
    
    procedure TMainForm.GMMapAfterPageLoaded(Sender: TObject;
      First: Boolean);
    begin
      inherited;
      if First and not FMapLoaded then
      begin
        GMMap.DoMap;
        FMapLoaded := True;
      end;
    end;