MotlawaTech:Jak ukryć kartotekę w menu po lewej

Trzeba wejść do D_Motlawa.pas i odszukać :

 function TDMotlawa.EnabledFrameForSysId(aSysId: Integer;
   aWithMessage: Boolean): Boolean;

podpisać na końcu funkcji swoją sekwencję (przykład dla atestu stali):

 if (aSysId = IdSAtestyStali) then
  {$IFDEF ATESTY}
   if User60.UprawnienieExist('UstawianieAtestyStali') then
     Result := (User60.GetUprawnienie('UstawianieAtestyStali') > uprDSDisabled);
  {$ELSE}
   Result:= False;
  {$ENDIF}
 if (aSysId = IdRejestrDostaw) then
  {$IFDEF ATESTY}
   if User60.UprawnienieExist('UstawianieAtestyStali') then
     Result := (User60.GetUprawnienie('UstawianieAtestyStali') > uprDSDisabled);
  {$ELSE}
   Result:= False;
  {$ENDIF}

Po tym zabiegu odpowiednia kartoteka pojawi sie tylko osobom z uprawnieniami lub jeśli jest ifdef.