Merkwürdiges Verhalten des Compilers

[kuba]

Hallo,

ich habe heute in meinem Code 2 Routinen mit gleichem Namen verwendet und der Compiler hat nicht gemeckert:

Delphi-Quellcode:

procedure ReadUsername (var PW: String);
Var
  Registry: tRegistry;
Begin
  Registry := tRegistry.Create(KEY_READ);
  Try
    Registry.RootKey := HKEY_LOCAL_MACHINE;
    Registry.OpenKey ('\Software\KUBA\', true);
    PW := Registry.ReadString ('Username');
    Registry.CloseKey;
  except
    //nix
  end;
    Registry.Free;
End;

und:

procedure ReadUsername (var PW: String);
Var
  Registry: tRegistry;
Begin
  Registry := tRegistry.Create;
  Try
    Registry.RootKey := HKEY_LOCAL_MACHINE;
    Registry.OpenKey ('\Software\KUBA\', False);
    PW := Registry.ReadString ('Username');
    Registry.CloseKey;
  Finally
    Registry.Free;
  End;
End;

Liegt das an meiner Compiler Einstellung ?

KUBA