I have still same error: acces violation...
{ for i := i to ParamCount do begin scan_image(PansiChar(ParamStr(i))); end;}
you need to add mode delphi directive in your source code because it come from delphi