我有一个包含 4 个资源的项目。我的要求是将它们保存在 4 个不同的路径中。所以我定义了以下代码:
procedure TMainForm.FormCreate(Sender: TObject);
var
ResStream: TResourceStream;
begin
ResStream := TResourceStream.CreateFromID(HInstance, 00001, RT_RCDATA);
try
ResStream.Position := 1;
ResStream.SaveToFile('C:\MyFile.dll');
finally
ResStream.Free;
end;
end;
我从这个论坛得到它。然后我阅读了http://docs.embarcadero.com/products/rad_studio/radstudio2007/RS2007_helpupdates/HUpdate4/EN/html/delphivclwin32/!!MEMBEROVERVIEW_Classes_TResourceStream.html。但我不清楚TResourceStream.Position 。第一个资源是否应该为 1,第二个资源是否应该为 2,依此类推。