Q&A
- 버튼 클릭시 자신을 Free 시키기
디자인시 판넬위에 버튼 컴포넌트를 두고 자신을 클릭했을 경우
procedure TMainForm.Button1Click(Sender: TObject);
begin
Button1.Free; <-- 에러가 발생하지 않습니다.
end;
그런데 동적생성을 하고
NewBtn := TButton.Create(Self);
with NewBtn do begin
Parent := Panel1;
Name := 'Btn1';
Top := 100;
Left := 100;
Visible := True;
OnClick := NewBtnClick;
end;
procedure TMainForm.NewBtnClick(Sender: TObject);
begin
TButton(Sender).Free; <- Access Violation 에러 발생
end;
이유가 무엇일까요?
디자인시에 생성했던 버튼은 자신을 클릭시 Free가 가능하고
프로그램 실행시 동적생성했던 버튼은 자신을 클릭했을 때 Violation 에러가 발생하는데,
어떤 해결 방법이 없을까요?
한번 봐주세요.. ^^;;;
procedure TMainForm.Button1Click(Sender: TObject);
begin
Button1.Free; <-- 에러가 발생하지 않습니다.
end;
그런데 동적생성을 하고
NewBtn := TButton.Create(Self);
with NewBtn do begin
Parent := Panel1;
Name := 'Btn1';
Top := 100;
Left := 100;
Visible := True;
OnClick := NewBtnClick;
end;
procedure TMainForm.NewBtnClick(Sender: TObject);
begin
TButton(Sender).Free; <- Access Violation 에러 발생
end;
이유가 무엇일까요?
디자인시에 생성했던 버튼은 자신을 클릭시 Free가 가능하고
프로그램 실행시 동적생성했던 버튼은 자신을 클릭했을 때 Violation 에러가 발생하는데,
어떤 해결 방법이 없을까요?
한번 봐주세요.. ^^;;;
3
COMMENTS
-
-
질문을 제대로 못보고 답변을 달았다가 지웠네요...^^*
소나기님 답변처럼 저도 아무이상이 없었습니다...
-
전 델파이 5.0에서 테스트 해봤는데 문제 없이 잘되던데요. ^^
(NOTICE) You must be logged in to comment on this post.
-
- Doli
- 2004.11.20 07:11
- 0 COMMENTS
- /
- 0 LIKES
-
- 우용우
- 2004.11.20 01:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 박성준
- •
- 2004.11.20 00:39
- 1 COMMENTS
- /
- 0 LIKES
-
석주현•2004.11.20 02:16sibling 이란게 별게 아니고 한 노드를 기준으로한 형제 노드를 말하는 거죠. 그러니깐 TreeView1.Ite...
-
- 메니아
- 2004.11.19 22:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 정동문
- •
- 2004.11.19 20:41
- 2 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2004.11.19 21:51안녕하세요 하얀까마귀 입니다. 그런류의 프로그램들이 많죠?? 일단 그림은 TPaintBox 또는 TImage를...
-
정동문•2004.11.19 21:53자세한 설명 감사..
-
- 이두형
- •
- 2004.11.19 20:19
- 4 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2004.11.19 21:45안녕하세요 하얀까마귀 입니다. 영역의 핸들입니다. HRGN이라는 ...
-
이두형•2004.11.20 02:04하얀까마귀님 우선 답변 감사드립니다. 꾸벅 (__)(^^) 폼을 투명하게 하는 것이 아니라, 콘트롤(콘트롤...
-
하얀까마귀•2004.11.23 02:34안녕하세요 하얀까마귀 입니다. 늦게 봤네요.. 먼저 이런 소스를 구하셧으면 한줄 한줄 정말 명령어 ...
-
최용일•2004.11.19 21:06안녕하세요. 최용일입니다. 흠... 투명폼이라기보다는 구멍뚫린 폼이라고 할까나... 유리창에 창틀만 있...
-
- 박준영
- •
- 2004.11.19 19:48
- 2 COMMENTS
- /
- 0 LIKES
-
석주현•2004.11.19 20:22뭔가 잘못하신게 아닌지 전 잘되는데요. 타이머에 넣어서 시간으로 계속 바꾸어도 잘되고요.. 에러도...
-
박준영•2004.11.19 20:30답변 감사합니다.. 전 프로젝트 파일에서만 바꾸려고 해서.. ^^ 다른 곳에서 하니 잘 되더군요.. 감사합...
-
- 소원석
- •
- 2004.11.19 18:24
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2004.11.19 19:31안녕하세요 하얀까마귀 입니다. dos 명령 프롬프트를 실행하거나 쉘로 하셔도 되구요.. 아니면 간단하...
-
- 최민호
- •
- 2004.11.19 09:52
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2004.11.19 19:53안녕하세요 하얀까마귀 입니다. try Database1.Open; &...
-
- 김종균
- •
- 2004.11.19 06:30
- 2 COMMENTS
- /
- 0 LIKES
-
최용일•2004.11.19 20:27안녕하세요. 최용일입니다. 흠... DelphiX가 델파이7에 있다는 말은 못들어본것 같은데요... 토리사...
-
석주현•2004.11.19 20:25제가 알기론 이 컴포넌트는 일본 분이 만드신거고 Delphi 7.0에 기본 컴포넌트가 아닌걸로 알고 있는데.. ...
-
- 노계섭
- •
- 2004.11.19 02:14
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2004.11.19 20:24안녕하세요. 최용일입니다. ShellExecute와 마찬가지로 CreateProcess호출할 때 적으신 파라매터가 넘어...
-
- 강동민
- •
- 2004.11.19 02:11
- 2 COMMENTS
- /
- 0 LIKES
-
석주현•2004.11.19 03:39아래와 같은 방법이 있겠네요.. ^^ 두가지 중에 편한걸로 하세요.. 그럼이만 /////////////...
-
사하라•2004.11.19 02:29TEdit 속성에서 MaxLength값을 8로 셋팅, 개발자가 원하는 값을 입력하세요... var TempStr...
-
- 공왕주
- 2004.11.19 01:51
- •
- 0 COMMENTS
- /
- 0 LIKES
-
- 김종환
- •
- 2004.11.19 00:21
- •
- 1 COMMENTS
- /
- 0 LIKES
-
이정관•2004.11.19 02:06델파이 메뉴, Component에서 Install Component가 있습니다. 실행시키면 unit file name를 선택하는 란이 ...
-
- 양성근
- 2004.11.18 23:30
- 0 COMMENTS
- /
- 0 LIKES
-
- 무심객
- •
- 2004.11.18 22:44
- 2 COMMENTS
- /
- 0 LIKES
-
권태훈•2004.12.01 22:51어싱크프로의 voip.dpr을 보십시요. 원하시는 장치의 리스트가 화면으로 나옵니다.
-
하얀까마귀•2004.11.19 22:31안녕하세요 하얀까마귀 입니다. 먼저 장치알아내는건 저도 모르구요. ㅎㅎ 소리를 끄거나 켜고 또는 ...
-
- 양성근
- •
- 2004.11.18 20:23
- 1 COMMENTS
- /
- 0 LIKES
-
석주현•2004.11.18 21:20C:\Program Files\Borland\Delphi5\Help 전 여기 있는 데요 ? 음 그리고 델파이 IDE에서 메뉴 맨끝...
-
- ㉳㉥ㅗ㉣ㅐ㉧ㅛ
- •
- 2004.11.18 20:00
- 2 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2004.11.19 21:57안녕하세요 하얀까마귀 입니다. ㅠㅠ 아마 그 답변 제가 한것 같은데. ㅎㅎ 어케 작업하셧는지 조금...
-
㉳㉥ㅗ㉣ㅐ㉧ㅛ•2004.11.19 23:04
-
- 윤창진
- •
- 2004.11.18 03:53
- 1 COMMENTS
- /
- 0 LIKES
-
석주현•2004.11.18 17:19전 문제가 없었습니다. 플래임을 사용하면 오히려 작업면에서 편하더군요. 저번에 어느분은 버그가 ...
-
- Doli
- •
- •
- 2004.11.18 02:15
- 3 COMMENTS
- /
- 3 LIKES
디자인시 판넬위에 버튼 컴포넌트를 두고 자신을 클릭했을 경우 procedure TMainForm.Button1Click(Sender: TObject); begin Button1.Free; <-- 에러가 발생하지 않습니다. end; 그런데 동적생성을 하고 NewBtn := TButton.Create(Self); ...-
하얀까마귀•2004.11.19 22:24안녕하세요 하얀까마귀 입니다. 조금 다른문제 아닐까요? 다른 두분은 에러안나는게 맞을듯 합니다만...
-
정찬희•2004.11.18 02:36질문을 제대로 못보고 답변을 달았다가 지웠네요...^^* 소나기님 답변처럼 저도 아무이상이 없었습니다......
-
석주현•2004.11.18 02:31전 델파이 5.0에서 테스트 해봤는데 문제 없이 잘되던데요. ^^
조금 다른문제 아닐까요?
다른 두분은 에러안나는게 맞을듯 합니다만....
만약 님의 말씀처럼만으로 한다면 에러가 안나는게 맞을듯 하군요...
두분이나 해보셧으니 저까지는 안해도 될것같구요..
님이 소스의 전체내용을 올려주지 않았다는 가정하에서요..
제생각은 이렇습니다.
마우스의 이벤트가 onClick이외에 onMouseup도 있지 않냐는거죠..
아니면 TButton이 아닌 다른 버튼 이라던지...
뭐 답변을 보고 생각난거라서.. ㅎㅎ
일단 마우스 이벤트는 혼자 다니지 않죠..
그러니까.. 델파이의 소스에 보면 MouseDown 에서 마우스를 캡쳐합니다.
따라서 반드시 MouseUp이 발생을 하게 되죠..
문제는 님의 소스에서는 Click에서 Free를 시켰기 때문에 이때는 이미
콘트롤이 존재하지 않는다는거죠..
음. 그러니까..
밑의 소스에서
MouseUp 이벤트에서
NewBtn.Left := 5;
뭐 이런식으로 넣으면 에러날꺼라는거죠..
보통은 TButton(Sender).Left 뭐 이렇게 쓰거나 첵크 루틴이 있을꺼니까
이 이벤트 내에서는 에러나지 않을수도 있습니다만.
Tbutton이 아닌 다른 버튼이라면 그 버튼의 기능에서 MouseUp할때
어떤 동작을 할것이므로 이때 에러날수도 있을것 같네요.. ㅎㅎ
에구 쓰다보니 길어졌다. ㅋㅋ 그것말고는 솔직히 저 소스에서 에러날 부분은 생각나지 않는군요. . 그럼. 즐델하세요