实在不行就这样把这个BMP文件存在指定路下: 设计时image.picture赋一次初值。再清空(不占地方)。autusize:=true; 这样你可以得到image及splashform(splashform.autosize:=true,formstyle:=bsnone)的大小。 show splashform时image.picture.loadfromfile('c:\a.bmp');要吗你也可以从资源文件中加载。
我是这样显示和卸载的:with TSplahForm.Create(self) do begin showmodal; finally free; end;可是用TaskInfo2000看了,显示和不显示该窗口内存相差几百KB呢 而且把Splash窗口free掉以后,进入主窗口,内存占用显示的还是那个数值不信清大家试验一下。
你那个是启动画面怎么还用 with TSplahForm.Create(self) do begin showmodal; finally free; end; 这样的代码呢? 另外with TSplahForm.Create(Application) do吧?
你那个是启动画面怎么还用 with TSplahForm.Create(self) do begin try showmodal; finally free; end; end; 这样的代码呢? 另外with TSplahForm.Create(Application) do吧?
设计时image.picture赋一次初值。再清空(不占地方)。autusize:=true;
这样你可以得到image及splashform(splashform.autosize:=true,formstyle:=bsnone)的大小。
show splashform时image.picture.loadfromfile('c:\a.bmp');要吗你也可以从资源文件中加载。
begin
showmodal;
finally
free;
end;可是用TaskInfo2000看了,显示和不显示该窗口内存相差几百KB呢
而且把Splash窗口free掉以后,进入主窗口,内存占用显示的还是那个数值不信清大家试验一下。
with TSplahForm.Create(self) do
begin
showmodal;
finally
free;
end;
这样的代码呢?
另外with TSplahForm.Create(Application) do吧?
with TSplahForm.Create(self) do
begin
try
showmodal;
finally
free;
end;
end;
这样的代码呢?
另外with TSplahForm.Create(Application) do吧?