25.05.13, 20:25, Reinier Olislagers пишет:

In the code above, I'm loading the resource from the executable.
However, Paramstr(0) is not reliable on all platforms.
Is there a better way of doing this?

Yes.

Resource := FindResource(HInstance, 'SQLSCRIPT', RT_RCDATA);
if Resource <> 0 then
begin

  Stream := TResourceStream.Create(HInstance, 'SQLSCRIPT', RT_RCDATA);
  ...
end;

TResourceStream is available cross platform in classes.pas unit.

Best regards,
Paul Ishenin
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to