Delphi 获取所有磁盘盘符列表

本文整理自网络，侵删。

 
uses   System.Generics.Collections,
  System.Math, System.IOUtils;


procedure TForm1.Button5Click(Sender: TObject);
var
  Lst: TStringList;
begin
  Lst := TStringList.Create;
  try
  Lst.AddStrings(TDirectory.GetLogicalDrives);
    Memo1.LineS.AddStrings(Lst);
  finally
    FreeAndNil(Lst);
  end;

end;
 

相关阅读 >>

Delphi 检查注册表键、键值是否存在

Delphi 错误no ftp list parsers have been registered

Delphi控制word添加多行文字

Delphi 调用viewer-windows10 图像浏览器

Delphi 辨析 field、fielddef、fields、fielddefs、fieldlist、fielddeflist

Delphi 刷新桌面函数

Delphi getwebbrowserhtml 获取网页源代码

Delphi下调用有返回值的存储过程

pos、ansipos、fillchar在Delphi2010中unicode的问题

Delphi idhttp实现地址自动转向

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 获取所有磁盘盘符列表