자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Delphi 폼 생성과 해제.

2019.09.29 19:59

엽기토끼이요 조회 수:489

안녕하세요. 저번에 질문을 올렸는데 이해가 안 되서 또 질문을 합니다...

 

https://opentutorials.org/course/3108/19310

험프리님이 말씀해주신데로 그대로 따라해 보아도. 메모리가 처음 시작 그 용량으로 돌아오질 않습니다.

 

저번에 답 주신 김원경 선생님의 말대로 폼 변수는 생성하지 않았습니다.

또, 동적 생성될 폼을 Availalbe forms으로 변경했습니다.


코드 입니다.

 

메인 폼의 폼 동적 생성 이벤트. (하나의 폼을 500회 생성 후 클로즈 이벤트 발생)

procedure TForm_Main.Button3Click(Sender: TObject);

var

  i : integer;

begin

  for i := 0 to 500 do begin

    Form1 := TForm1.Create(Nil);

    Form1.Show;

 

    Form1.Close;    //이것만 썻을 때는 모든 폼이 생성된 후에 모든 폼이 다같이 종료.

//    Form1.Free;   //이것도 같이 쓰면 생성 즉시 폼이 제거.

  end;

end;

 

동적 생성폼(Form1)의 클로즈 이벤트.

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);

begin

  Action := CaFree;

  Self := Nil;

end;


500회를 다 돌고나면 메모리 용량이 조금 줄어들기는 하는데 처음 실행시 용량으로 돌아가지 않습니다. 

(메모리 확인은 작업관리자의 사용자 탭에서 메모리 카테고리에서 확인 했습니다.)

(추가로 작업 관리자 - 성능 - 리소스 모니터 - 메모리 탭에서도 메모리 사용량을 확인 했습니다. )

 

최초 실행시 1.9MB

500회 실행 후 3.5MB (실행 중간에는 4.0MB까지 증가)

2회 500회 실행 후 3.5MB (실행시 용량이 증가하나 종료된 후에 3.5MB로 돌아옴)

 

제가 원하는 것은 최초 실행시 1.9MB로 돌아가게끔 설계를 하고 싶은데... 1회 실행 후의 용량이 당연한 결과인가요?

제 추측으로는 500회 생성된 변수들이 사라지지 않고 재사용 되고 있기 때문에 3.5MB로 유지되는걸로 보입니다. 메모리에서 완전 해제하는 방법이 없는 것인가요?

 

여러군데 뒤져봐도 생성까지만 설명을 하고 해제에 대해서는 자세한 설명이 없어서 헤메고 있습니다.

귀찮게해드려서 죄송합니다... 너무 궁금한데 물어볼곳이 마땅히 없네요...

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17087
공지 유용한 관련 사이트 관리자2 2014.03.20 55928
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99370
1379 xmpp와 mqtt에 대해서 문의사항있어요 [1] 엠카바데로 2017.05.15 449
1378 Tokyo 에서 컴파일 후 실행파일에 Malware 로 잡히는 증상발생 [3] file 크루노 2017.05.16 481
1377 [공유] FireDAC-MySQL 사용 중 '!abc'와 같이 느낌표와 문자 사용 시 문자가 없어지는 현상이 발생합니다. 험프리 2017.05.16 700
1376 델파이 10 Seattle로 안드로이드 Nougat 개발. [1] hsson 2017.05.19 218
1375 delphi xe10 firemonkey로 개발한 앱 rooting 폰 및 중국폰 에서 사용 가능 유무 당신이먼저 2017.05.19 188
1374 ODBC 조합형으로 한글 처리 가능한지요? file 천공인 2017.05.20 120
1373 도수분포표 관련 Component 추천 [1] file 오짱이 2017.05.22 161
1372 Class TAdvStringGrid not found. Ignore the error and continue? 메시지 원인 [2] file kwy0702 2017.05.23 432
1371 XE3 / 프로젝트 옵션에서 Version Info가 이상해졌습니다. 해결방법 좀 알려주세요... file 마일드몽키 2017.05.23 110
1370 RAD 10.1 Berlin Android 개발관련 [2] 지는게취미 2017.05.23 167
1369 안드로이드 앱 테더링 연결 문제 [2] file YGPOS 2017.05.24 466
1368 TFDQuery 질문 [3] nickname 2017.05.24 956
1367 도쿄로 빌드된 앱을 최소화했다가, 기존 실행되었던 앱을 클릭하면 글자의 배경색이 없어집니다. [4] file 델사냥 2017.05.25 243
1366 TCP Server + Webborker [1] 제트콜 2017.05.25 141
1365 안드로이드 타이머 화면꺼지면 동작이 잘 안되요 [1] 캔나영 2017.05.29 690
1364 FireDAC으로 Oracle 클라이언트 프로그램 배포시 [3] file 나도몰라 2017.05.29 868
1363 db 운영 시 데이터 추가 안되는현상 file 전수정 2017.05.29 146
1362 FMX Edit 오류 패치 안되나요??? [2] 로로봉 2017.05.29 136
1361 ble 관련 질문 드립니다. [1] kimds 2017.05.30 123
1360 델파이xe win 7 64bit 설치문의 file kwy0702 2017.05.30 342