delphi - 互換性のない型: 'Byte' と 'String'

Question

次の関数でコンパイラ エラーIncompatible types: 'Byte' and 'String'が発生します。

IntToStr(DiskSize('F:\'))

ディスクサイズを文字列に変換したい。この問題を解決するには？

Answer 1

の引数DiskSizeはバイト (したがって、ではありませんstring) で、0 は現在のドライブ、1=A、2=B などです。ドライブ F の場合DiskSize(6)、より一般的には、これを行う関数は次のようになります。

function DiskSizeL(DriveLetter: Char): Int64;
begin
  DriveLetter := UpCase(DriveLetter);
  Result := DiskSize(1 + Ord(DriveLetter) - Ord('A'));
end;

ただし、文字がAからZの範囲内にあることを確認する必要があります.