有没有解决方案呢?非常感谢!解决方法 您应该创建.rc文件并将其添加到项目中. RC文件的内容如下:
FIXED48 IMAGE ..\Resources\Fixed48x48.pngMENU16 IMAGE ..\Resources\Menu16x16.pngTICK SOUND ..\Resources\Tick.wavPing SOUND ..\Resources\Ping.wav
现在,在进行构建之后,您可以使用TResourceStream加载其中一个fikles:
procedure TdmReportGeneral.Insertlogo(Memo: TStringList; VIEw: TfrVIEw);var S: TResourceStream;begin if (VIEw is TfrPictureVIEw) and (VIEw.name = 'logo') then begin S := TResourceStream.Create( 0,'FIXED48','IMAGE' ); try // do something useful... TfrPictureVIEw(VIEw).Picture.Metafile.LoadFromStream( S ); finally S.Free(); end; end;end;总结
以上是内存溢出为你收集整理的嵌入式文件到delphi exe应用程序(不作为应用程序的单独文件)全部内容,希望文章能够帮你解决嵌入式文件到delphi exe应用程序(不作为应用程序的单独文件)所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)