我提前为新手问题道歉,但为什么我的代码出现"访问冲突"错误(在"Create(SelectorForm);"行上)?我尝试使用主窗体作为所有者,但它没有任何区别.
var
SelectorForm: TSelectorForm;
ArrayOfImages: Array [1..10] of TImage;
implementation
procedure TSelectorForm.FormCreate(Sender: TObject);
var
Loop: Byte;
begin
for Loop := 1 to 10 do
begin
with ArrayOfImages[Loop] do
begin
Create(SelectorForm);
end;
end;
end;
Run Code Online (Sandbox Code Playgroud)