|
▼ Andyさん
こんにちは
> で開放して、再度作成などをしてもいいんでしょうか。
かまわないと思います。
> procedure TForm1.FormCreate(Sender: TObject);
> var i:integer;
> begin
> for i:=1 to 10 do begin
> SetLength(Edit_,i);
> Edit_[i-1]:=TEdit.Create(self);
> Edit_[i-1].Parent:=self;
> のように作成して
は
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
SetLength(Edit_,10);
for i:=1 to 10 do begin
Edit_[i-1]:=TEdit.Create(self);
Edit_[i-1].Parent:=self;
のほうが良いと思います。
思わぬしっぺ返しが貴方を襲うかもしれません。
|