이 문장을 추가하세여

if Assigned(sPanel) sPanel.Free;

동급최강바보 wrote:

> 이 문장을 추가하세여

> if Assigned(sPanel) sPanel.Free;



if Assigned(SPanel) then SPanel.Free; 문장을 추가 했는데도 걍 죽어버리네여

(ㅠㅠ)

참고로

PCount := 0;

PCount := Rec + 1;

PName := 'Panel' + IntToStr(PCount);

Spanel := Tpanel.Create(Self) ;

Spanel.parent := self;

--> if Assigned(SPanel) then SPanel.Free;

요기에 추가 Spanel.Name := PName;

했습니다. Spanel.Font.Size := 15;

Spanel.Left := 50;

Spanel.top := 50;

Spanel.width := 150;

Spanel.Height := 80;

Spanel.Color := $00CFCFA0;

Spanel.Caption := '강남';

PCount := 0;

PCount := Rec + 1;

PName := 'Panel' + IntToStr(PCount);

--> if Assigned(SPanel) then SPanel.Free;



Spanel := Tpanel.Create(Self) ;

Spanel.parent := self;

Spanel.Name := PName;

꼴통 wrote:

> 안녕하세여 꼴통입니다.

> 또 도움을 받아야 겠네여

> 아래와 같이 Panel을 몇개 생성을 했습니다.

> 그런데 Form을 Close했다가 다시 Form을 띄우니까

> 그전에 생성되었던 Panel이 있다느 메시지가 나오면서

> 프로그램이 걍 죽어버리더군여

> 해결방법을 알고 싶습니다.

>

> PCount := Rec + 1;

> PName := 'Panel' + IntToStr(PCount);

> Spanel := Tpanel.Create(self) ;

> Spanel.parent := self;

> Spanel.Name := PName;

> Spanel.Font.Size := 15;

> Spanel.Left := 50 ;

> Spanel.top := 50;

> Spanel.width := 150;

> Spanel.Height := 80;

> Spanel.Color := $00CFCFA0;

> Spanel.Caption := '강남';



제 생각인데여..



동적으로 생성시켰으니..



동적으로 메모리에서 날려줘야 되지 않을까요??