怎样等图片完全送显后进行其他操作&怎样对一次动态创建的N个Form再进行后续的操作？
如题，在向Image控件加载一张jpg图片时需要一定时间解码然后送显，这让我所需要进行的下一个动作变得失败：
SingleFileName=FileList-> FileName;
PictureView-> Image1-> Picture-> LoadFromFile(SingleFileName);
ShowCalArea(clRed,psDot,10,10,50,50);
其中ShowCalArea（）只是一个画矩形的小函数：
void ShowCalArea(TColor color,TPenStyle style,int x1,int y1,int x2,int y2)
{
PictureView-> Canvas-> Pen-> Width=1;
PictureView-> Canvas-> Pen-> Color=color;
PictureView-> Canvas-> Pen-> Style=style;
PictureView-> Canvas-> Brush-> Style=bsClear;
PictureView-> Canvas-> Rectangle(x1,y1,x2,y2);
}
在运行时是先画出了矩形框，然后显示图片盖住了前面画出的框。用了下面的延时函数（i_love_pc(杰子)在其他贴在中贴的代码）后，哪怕是只Delay(1);都可以同时画出来呢？
void Delay(DWORD DT)
{
long tt;
tt=GetTickCount();
while(GetTickCount()-tt <DT)
{
Application-> ProcessMessages();
if((GetTickCount()-tt) <=0)
{
tt=GetTickCount();
}
}
}

还有就是，加入我用下面这个自己写的函数同时动态创建几个Form，后面怎样再对它进行其他操作？我不大懂怎样取得每个Form的地址，并用这个地址或者其他什么对它进行操作，比如加一些控件，象上面一样话图形等等。哪位强人请教教我吧！
void NewFormCreat(int number)
{
//If PictureView-> FormStyle=fsMDIForm is set at first,
//the picture won 't be shown.
PictureView-> FormStyle=fsMDIForm;

//New a form in PictureView dynamicly.
NewForm=new TForm(Application);
NewForm-> Caption=number;
NewForm-> FormStyle=fsMDIChild;
NewForm-> BorderStyle=bsSingle;

//Removes the maximize button.
TBorderIcons tmpBI=NewForm-> BorderIcons;
tmpBI> > biMaximize;
NewForm-> BorderIcons=tmpBI;

NewForm-> ClientHeight=480;
NewForm-> ClientWidth=640;
//btn-> OnClick=Form1-> MyEvent;

//New a image in the NewForm.
TImage *NewImage=new TImage(NewForm);
NewImage-> Parent=NewForm;
NewImage-> Height=NewForm-> ClientHeight;
NewImage-> Width=NewForm-> ClientWidth;
NewImage-> Stretch=true;
NewImage-> Picture-> LoadFromFile( "d:\\sn.jpg ");
NewForm-> Show();
NewForm-> OnClose=PictureView-> FormClose;
}

[解决办法]
将一个form最大化时触发什么事件啊？
在OnResize里
[解决办法]
1.没看明白
2.使用TList保存窗体对象数组指针，使用的时候动态转换
3.OnResize事件里判断窗体的WindowState属性
[解决办法]
第一个问题:
PictureView的Canvas和PictureView-> Image1-> Canvas不是同一个Canvas,
因而可能会产生时序上的问题.
你把PictureView-> Canvas改为PictureView-> Image1-> Canvas就不会产生上述问题.
另外PictureView应该是个TForm吧,Form的Canvas没有记忆功能,如果必须要在Form的Canvas
中画框,那正确的方法应该在需要重绘窗口的时候(OnPaint,OnResize...)重新ShowCalArea;
第二个问题:
你可以用一个指针数组保存你的Form窗体指针,如:
TPictureView *FormList[100];
for(i=0;i <n;i++)
{ FormList[i]=new TPictureView(this);
FormList[i]-> Formstyle=....
......
}

最后释放:
for(i=0;i <n;i++)
{ delete FormList[i];
}

[解决办法]
你用TJPEGImage对象试试
示例代码
#include <jpeg.hpp>
.....
{
TJPEGImage *Jpeg=new TJPEGImage();
Jpeg-> LoadFromFile(FileName);
Image1-> Width=Jpeg-> Width;
Image1-> Height=Jpeg-> Height;
Image1-> Canvas-> Draw(0,0,Jpeg);
ShowCalArea(clRed,psDot,10,10,500,500); //函数中PictureView-> Canvas应改为PictureView-> Image1-> Canvas
delete Jpeg;
}