我用以下代码动态生成了N个窗口，如何得到每个窗口的句柄呢？谢谢

Question

我新建了一个窗体为TForm2存为Unit2.pas，窗体内有一个TImage控件，然后我在Unit1.pas里有一段这样的代码，是可以动态生成N个窗口的，我如何可以在TFrom1里通过句柄修改每个动态生成的窗口里面的TImage里面的Picture属性？谢谢，感激不尽
procedure TForm1.Button1Click(Sender: TObject);
var
  FormN : TForm2;
begin
  ACC := ACC + 1;
  FormN := TForm2.Create(nil);
  with FormN do
    begin
    Name := 'Form' + IntToStr(ACC);
    Caption := Name;
    Position := poMainFormCenter;
    Show;
    end;
end;

Answer 1

var
  ss : TForm;
  hwd : HWND ;
begin
  ss := TForm.Create(nil);
  try
    hwd := ss.Handle ;
    ss.ShowModal;
  finally
    ss.Free;
  end;
end;
你把hwd放到数组或者list里面就可以循环用了

Answer 2

为什么不用TForm2的数组，来记录创建的窗口信息呢？
这样还方便操作TFORM2上的东东

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var
  FormN : TForm2;
begin
  ACC := ACC + 1;
  FormN := TForm2.Create(nil);
  with FormN do
    begin
    Name := 'Form' + IntToStr(ACC);
    Caption := Name;
    Position := poMainFormCenter;    Image1.Picture.LoadfromFile('.......');
   
    Show;
    end;
end;