chdebug.pas

双色球矩阵计算程序

unit CHDebug;

interface
uses
  Windows, SysUtils;

procedure DebugStr(const AFormat: string; const Args: array of const);

implementation

procedure DebugStr(const AFormat: string; const Args: array of const);
begin
  OutputDebugString(PChar(Format(AFormat, Args)));
end;

end.