5日目　OS別　条件付きコンパイル

コメントをどうぞ

function ResourceRootDirectory(): String;
begin
  {$IFDEF IOS}
    Result := GetHomePath + PathDelim + 'Documents' + PathDelim;
  {$else}
    Result := ExtractFilePath(ParamStr(0));
  {$ENDIF}
end;

コメントを残すコメントをキャンセル