OutputDebugString

メソッド内で使用される変数をチェックしたい場合、 OutputDebugString を利用すると便利です。

OutputDebugString に渡された文字列は、「イベントログ」へ 出力されます。

procedure TForm1.Button1Click(Sender: TObject);
begin
  OutputDebugString('Hello');
end;

OutputDebugString が受け取るパラメータが PChar に なっていますので、これを string で受け取る関数で ラップしておくと、少し便利に利用できます。

procedure DebugStr(Str: string);
begin
  OutputDebugString(PChar(Str));
end;

「イベントログ」に出力したい場合には DebugStr を 呼び出すようにします。

procedure TForm1.Button1Click(Sender: TObject);
begin
  DebugStr('Hello');
  DebugStr(IntToStr(1000));
end;

Menu Home Prev Next
Last update 2003/03/15