Good.

About file size formatting, do you know this library?
ByteSizeLibPascal <https://github.com/Xor-el/ByteSizeLibPascal>  

Here is an interesting example taken from the documentation.

// ==========
uses
  SysUtils, uByteSize;

var
  b: TByteSize;
  
begin
  b := TByteSize.FromKiloBytes(0.5);
  WriteLn(b.ToString); // 512 B
  WriteLn(TByteSize.FromKiloBytes(1000).ToString); // 1000 KB
  WriteLn(TByteSize.FromKiloBytes(1024).ToString); // 1 MB
end.
// ==========

Maybe you could use it (it's one unit).




--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/


_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Reply via email to