MultiFilesAndDirsOpenDialog
1.0.0
Delphi Multi Files and Dirs Open Dialog ، ودعم FMX و VCL (تعديل بنفسك) فوق Windows Vista ، في حالة WinXP ، يمكنك تطبيق SelectDirectory ()
الاستخدام:
var
list := SelectDirsAndFiles(self.Handle, ' Select your folders and files ' , ' Upload ' );
for var s in list.Keys do
showmessage( ' Path: ' + s + ' , Is Folder: ' + list[s].ToString(TUseBoolStrs.True));
list.Free;