Einzelnen Beitrag anzeigen

Willie1

Registriert seit: 28. Mai 2008
618 Beiträge
 
Delphi 10.1 Berlin Starter
 
#1

TDirectory.GetLogicalDrives

  Alt 11. Nov 2020, 18:00
Hallo Leute,
das
Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
var
  drives: TStringDynArray;
  drive: string;
begin
  lbDrives.Items.Clear;
  drives:=TDirectory.GetLogicalDrives;
  for drive in drives do lbDrives.Items.Add(drive);
end;
liefert die logischen Laufwerke. Um die Lw besser unterscheiden zu könen will ich noch die Laufwerksnamen hinzufügen Gibt es da bei den schönenn IOUtils oder sonst wo eine Funktion oder muss ich da auf die alte Tipp-Sammlung von Michael Puff zurückgreifen?
Gruß Willie.
Gut hören kann ich schlecht, schlecht sehen kann ich gut - Ersteres stimmt nicht, das zweite schon.
  Mit Zitat antworten Zitat