overload procedure macht probleme

[Bernhard Geyer]

Immer dieser doppelte Code:

Delphi-Quellcode:

procedure TMap.LoadMap;
var OpenDlg: TOpenDialog;
begin
  OpenDlg := FormMain.dlgOpen;
    if OpenDlg.Execute then
    begin
      LoadMap(OpenDlg.FileName);
    end;
end;