Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Bitmasken prüfen

   
    by Hawkeye219, 19. Mär 2006
  Etwa so? (ungetestet!)
  
  
  function ServerTypeToStringArray(svType: DWORD): TStringDynArray;
  const cStrings : array of string
  = ('LAN Manager workstation', 'LAN Manager server',...);
  var ii : Integer;
  begin
  for ii := 0 to 31 do
  begin