Changeset 31 for trunk/Form/UFormMain.pas

Timestamp:

Apr 30, 2016, 12:16:19 AM (8 years ago)

Author:

chronos

Message:

• Added: TFileStreamEx experimental class to support flags O_DIRECT and O_SYNC under Linux.

File:

• trunk/Form/UFormMain.pas (modified) (1 diff)

trunk/Form/UFormMain.pas

@@ -520 +520 @@
       BasePrefixMultipliers, SBytes);
     LabelSectorCount.Caption := IntToStr(Project.DriveInfo.SectorCount);
-    LabelSectorSize.Caption := IntToStr(Project.DriveInfo.SectorSize) + ' ' + SBytes;
+    LabelSectorSize.Caption := PrefixMultiplier.Add(Project.DriveInfo.SectorSize, BasePrefixMultipliers, SBytes);
   end else begin
     LabelSize.Caption := '';