>173 yes
意固地です。
function wsprintf(Output: PChar; Format: PChar): Integer; stdcall;

自分で定義しなおすしかないです。
function wsprintf(Output: PChar; Format: PChar): Integer; cdecl; varargs;
インプリメント節
function wsprintf(Output: PChar; Format: PChar): Integer; cdecl; varargs; external user32 name 'wsprintfA';