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 程序运行提示 “database login”对话框，让输入adoconnection1 的username和password

Delphi fdmemtable1内存表字段排序

Delphi 用updateresource修改exe文件图标(已修正)

Delphi 同时激活两个窗体

Delphi 获取系统服务列表

Delphi使用mcisendstring播放背景音��

minsperday：一天中有多少分钟

Delphi messagebox 和 messagedlg用法

Delphi的获取某坐标的颜色值

Delphi四舍五入问题解决

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

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