关于文件流的问题{帮帮忙啊} 我做好了一个程序 带启动画面{JPG} 我想做个生成器 这个生成器带改启动画面JPG的 请问怎么弄呢? 一点头绪没有 文件流也没弄过大侠们帮帮忙 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 直接读文件不就行了Image.Picture.LoadFromFile('文件路径'); 把jpg文件做成一个流保存到本地如Splash.dat,自定义一个协议头一个字节文件个数n, n*(文件序号,文件大小,文件二进制流)当然也可以最简单的一个流只包括jpg的二进制文件. Image.Picture.LoadFromFile('带路径的jpg文件名'); 用流可以达到动态生成EXE的,但你这点分不足以让我费事给你写代码。 先将资源文件的jpg文件释放到指定路径->再从指定路径读入(Image.Picture.LoadFromFile('带路径的jpg文件名'))稍候,给你代码... procedure TSplash.FormCreate(Sender: TObject);var res: TResourceStream;begin res:= TResourceStream.Create(hInstance,'jpg','resName');//resName: 资源文件中jpg的名字 res.SaveToFile(ExtractFilePath(Application.Exename)+PChar('jpg.jpg'));//将资源文件中的jpg文件保存到应用程序所在路径下的jpg.jpg res.Free; //释放资源. Image1.Picture.LoadFromFile(ExtractFilePath(Application.Exename)+PChar('jpg.jpg'));end; 7楼的代码当然可以,而且稍改一下,直接把流读到Image里面,就不用再生成临时文件了。但是:代码必须依赖Delphi编译器。我可以给你写一段不需要编译器的动态生成EXE的代码。 系统设计问题 高分求解? 如果有多块网卡,使用TIDUdpServer无法实现互连网通讯????(给1000分,毛主席教导我们从不骗人) 大家分析乡镇企业对软件的需要。 再三问:建个索引,用Table.AddIndex()方法!谁会?需上机通过验证代码! 终于扔掉了沉重的五座大山,放分了!!来者有份!! pe文件的装载过程。。。。 请问:在SQL中,以下程序段如何设置查询备件? 使用OpenDialog后,ExpandFileName解出的路径变了 获取wan口IP dbgrideh的这个高级功能谁能实现? Pointer(Result)^ 的意思??
Image.Picture.LoadFromFile('文件路径');
自定义一个协议
头一个字节文件个数n, n*(文件序号,文件大小,文件二进制流)当然也可以最简单的一个流只包括jpg的二进制文件.
稍候,给你代码...
procedure TSplash.FormCreate(Sender: TObject);
var
res: TResourceStream;
begin
res:= TResourceStream.Create(hInstance,'jpg','resName');//resName: 资源文件中jpg的名字
res.SaveToFile(ExtractFilePath(Application.Exename)+PChar('jpg.jpg'));//将资源文件中的jpg文件保存到应用程序所在路径下的jpg.jpg
res.Free; //释放资源.
Image1.Picture.LoadFromFile(ExtractFilePath(Application.Exename)+PChar('jpg.jpg'));
end;