Commits

Shinya Okano committed 7ec3860

ヘルプメッセージを修正

Comments (0)

Files changed (1)

delphi/hexdump/hexdump.dpr

   (* コマンドライン引数が無ければ終了 *)
   if ParamCount = 0 then
   begin
-    Writeln(Format('%s <filepath>', [ParamStr(0)]));
+    Writeln(Format('%s <filepath>', [ExtractFileName(ParamStr(0))]));
     Exit;
   end;
   (* ファイルを読み込み専用で開く *)