Q&A
- EventHandler에서 Default 동작을...
EventHandler에서 Default 동작을 수행하지 않으려면..?
System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당
Form을 끝낼것이가 그렇지 않을 것인가 판단을 하고 싶습니다.
아래 코드처럼 작성을 하였느데... compile error가 발생합니다.
procedure TfrmMain.FormHide(Sender: TObject);
var
result: Word;
begin
result := MessageDlg('종료?', mtConfirmation,[mbYes, mbNo], 0);
if result = mrYes then
halt(0);
// frmMain.visible := true;
end;
frmMain.visible := true라는 부분에서 error발생됩니다.
error는 visible을 수정하는 Handler에서 user program에서 변경할 수가 없다고
하네요. 고수님의 한수를 부탁드립니다.
미리 감사드리며...
System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당
Form을 끝낼것이가 그렇지 않을 것인가 판단을 하고 싶습니다.
아래 코드처럼 작성을 하였느데... compile error가 발생합니다.
procedure TfrmMain.FormHide(Sender: TObject);
var
result: Word;
begin
result := MessageDlg('종료?', mtConfirmation,[mbYes, mbNo], 0);
if result = mrYes then
halt(0);
// frmMain.visible := true;
end;
frmMain.visible := true라는 부분에서 error발생됩니다.
error는 visible을 수정하는 Handler에서 user program에서 변경할 수가 없다고
하네요. 고수님의 한수를 부탁드립니다.
미리 감사드리며...
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- Heaven
- 1999.06.16 08:50
- 0 COMMENTS
- /
- 0 LIKES
-
- 이호선
- •
- 1999.06.16 07:06
- 4 COMMENTS
- /
- 0 LIKES
-
문창완•1999.04.01 01:36비디오 화상위에 투명 이미지를 씌우고자 하는데 잘 안돼네요... 통신상에 있는 컴포넌트를 이용했는데도 ...
-
안치봉•1999.06.16 18:48이호선 께서 말씀하시기를... > 안녕하세요 > 한 폼에서 ShowModal로 폼을 띄웠습니다. 이 Modal폼에서 ...
-
안치봉•1999.04.01 23:02문창완 wrote: > 비디오 화상위에 투명 이미지를 씌우고자 하는데 잘 안돼네요... > 통신상에 있는 컴포...
-
문창완•1999.04.03 19:02그 문제는 안치봉님 께서 알려준 방법으로 해결하기 보다는 인터넷에서 컴포넌트를 구해서 해결했습니다...
-
- 손창근
- 1999.04.01 01:11
- 0 COMMENTS
- /
- 0 LIKES
-
- 이 소라
- 1999.06.16 06:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- •
- 1999.06.16 06:05
- 2 COMMENTS
- /
- 0 LIKES
-
신인재•1999.06.17 01:08테이블이 어떤 테이블인지..... 만약 파일시스템에서 사용하는 파라독스같은 것이면 delzip을 이용하...
-
초보•1999.06.17 03:14감사합니다. 근데 바쁘신가봐요 자료실에 확인해 봤는데 없더라구요 빨리 올려주세요 그럼.. 신인...
-
- 밍시
- •
- 1999.03.31 19:25
- 3 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.03.31 21:52밍시 wrote: > TChartFX를 사용하여 차트를 구성했습니다. > InstallShield를 사용해 인스톨 프로그램을 ...
-
밍시•1999.03.31 22:33총무과에서 사용을 합니다. 여긴 전산실이지요 설치할때라면 언제를 예기하는지요 > 안녕하세...
-
안치봉•1999.04.01 01:52밍시 wrote: > 총무과에서 사용을 합니다. > 여긴 전산실이지요 > > 설치할때라면 > 언제를 예기하는...
-
- 이주흥
- •
- 1999.06.16 06:04
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.06.16 18:54이주흥 께서 말씀하시기를... > 이거 여기 질문해도 되나 모르겠습니다.. > 다름이 아니고 레지스트리에 ...
-
- 홍성원
- •
- 1999.06.16 05:27
- 5 COMMENTS
- /
- 0 LIKES
-
밍시•1999.03.31 19:25TChartFX를 사용하여 차트를 구성했습니다. InstallShield를 사용해 인스톨 프로그램을 생성하여 현업에 ...
-
안치봉•1999.06.16 18:57홍성원 께서 말씀하시기를... > 델파이에서의 '폼 디자인'을 그대로 > 모사할 수 있는 방법을 알고 싶습...
-
안치봉•1999.03.31 21:52밍시 wrote: > TChartFX를 사용하여 차트를 구성했습니다. > InstallShield를 사용해 인스톨 프로그램을 ...
-
밍시•1999.03.31 22:33총무과에서 사용을 합니다. 여긴 전산실이지요 설치할때라면 언제를 예기하는지요 > 안녕하세...
-
안치봉•1999.04.01 01:52밍시 wrote: > 총무과에서 사용을 합니다. > 여긴 전산실이지요 > > 설치할때라면 > 언제를 예기하는...
-
- 서현승
- 1999.06.16 04:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 밍시
- •
- 1999.03.31 19:25
- 3 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.03.31 21:52밍시 wrote: > TChartFX를 사용하여 차트를 구성했습니다. > InstallShield를 사용해 인스톨 프로그램을 ...
-
밍시•1999.03.31 22:33총무과에서 사용을 합니다. 여긴 전산실이지요 설치할때라면 언제를 예기하는지요 > 안녕하세...
-
안치봉•1999.04.01 01:52밍시 wrote: > 총무과에서 사용을 합니다. > 여긴 전산실이지요 > > 설치할때라면 > 언제를 예기하는...
-
- 최기훈
- •
- 1999.06.16 03:10
- 1 COMMENTS
- /
- 0 LIKES
EventHandler에서 Default 동작을 수행하지 않으려면..? System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당 Form을 끝낼것이가 그렇지 않을 것인가 판단을 하고 싶습니다. 아래 코드처럼 작성을 하였느데... compile er...-
조복기•1999.06.16 03:45최기훈 께서 말씀하시기를... > System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당 > ...
-
- 강윤환
- •
- 1999.06.16 02:15
- 2 COMMENTS
- /
- 0 LIKES
-
김철현•1999.03.31 03:38안녕하세요 이정욱씨 저는 김철현입니다. 그동안 별고 없으셨는지요. 다름이 아니라 난관에 봉착한 나머...
-
민성기•1999.03.31 03:39안녕하세요~ 철현씨~ 이곳에서 만나니 반갑구만요~ ^^; 잘 지내셨죠~?? 재부팅을 하지 않고도 레지스트...
-
- 김철현
- •
- 1999.03.31 03:38
- 1 COMMENTS
- /
- 0 LIKES
-
민성기•1999.03.31 03:39안녕하세요~ 철현씨~ 이곳에서 만나니 반갑구만요~ ^^; 잘 지내셨죠~?? 재부팅을 하지 않고도 레지스트...
-
- 최선기
- •
- 1999.06.16 02:08
- 2 COMMENTS
- /
- 0 LIKES
-
김우철•1999.06.16 09:35고수님의 답변에 덧붙여 몇자 적습니다. 일반적으로 Application을 만들때 젤 먼저 결정해야할 문제중 하...
-
안치봉•1999.06.16 03:55최선기 께서 말씀하시기를... > Project메뉴/option의 Forms 페이지의 기능에 대해 자세히 알고 싶습니다....
-
- 최종근
- 1999.03.31 00:17
- 0 COMMENTS
- /
- 0 LIKES
-
- 이영범
- •
- 1999.06.16 01:44
- 1 COMMENTS
- /
- 0 LIKES
-
신호성•1999.06.17 17:42이영범 께서 말씀하시기를... > 안녕하십니까?... > 퀵리포트에서는 Query컴포넌트(이후 Query)를 1개밖...
-
- 이호선
- •
- 1999.03.27 21:21
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.03.30 01:59이호선 wrote: > 안녕하세요 > 다름이 아니라 대략 Active-X페이지에서 해야된다는 것은 알겠지만 > 단...
-
- 서영환
- •
- 1999.06.16 01:23
- 5 COMMENTS
- /
- 0 LIKES
-
구민오•1999.03.29 08:47원도우즈가 시작될때 실행되도록하려고 하거든요... 즉 시작프로그램으로 등록시키려고요... 어떻게 해야...
-
안치봉•1999.06.16 03:31서영환 께서 말씀하시기를... > Active Form에서 다운 받은 OCX를 설치하면, > 버전업을 해도 다시 다운...
-
안치봉•1999.03.30 01:56구민오 wrote: > 원도우즈가 시작될때 실행되도록하려고 하거든요... > 즉 시작프로그램으로 등록시키려...
-
서영환•1999.06.16 04:52안치봉 께서 말씀하시기를... > 서영환 께서 말씀하시기를... > > Active Form에서 다운 받은 OCX를 설치...
-
공대규•1999.06.29 17:18> codebase="http://210.116.3.220/t3/tProj1.cab"#version=1,0,0,0 위 부분의 따옴표가 혹시 "htt...
-
- 하명훈
- •
- 1999.06.16 01:16
- 3 COMMENTS
- /
- 0 LIKES
-
밍시•1999.03.29 18:32"델파이 팁/강좌" 에서 이메일 프로그램 실행하기를 따라했는데 음... 제 자리에서는 잘 되는데 다른 ...
-
조복기•1999.06.16 01:27하명훈 께서 말씀하시기를... > procedure TSearch.Button1Click(Sender: TObject); > 쿼리를 엑세스하...
-
안치봉•1999.03.30 01:46밍시 wrote: > "델파이 팁/강좌" 에서 이메일 프로그램 실행하기를 따라했는데 > 음... > > 제 자리에...
-
- 박성훈
- •
- 1999.06.16 01:10
- 3 COMMENTS
- /
- 0 LIKES
-
밍시•1999.03.29 18:32"델파이 팁/강좌" 에서 이메일 프로그램 실행하기를 따라했는데 음... 제 자리에서는 잘 되는데 다른 ...
-
안치봉•1999.06.16 04:16박성훈 께서 말씀하시기를... > procedure Button1Click(Sender: TObject); > begin > Self.Close; ...
-
안치봉•1999.03.30 01:46밍시 wrote: > "델파이 팁/강좌" 에서 이메일 프로그램 실행하기를 따라했는데 > 음... > > 제 자리에...
> System Menu에서 X로 표시된 버튼을 누르면 User에서 물어본다면 해당
> Form을 끝낼것이가 그렇지 않을 것인가 판단을 하고 싶습니다.
> 아래 코드처럼 작성을 하였느데... compile error가 발생합니다.
>
> procedure TfrmMain.FormHide(Sender: TObject);
> var
> result: Word;
> begin
> result := MessageDlg('종료?', mtConfirmation,[mbYes, mbNo], 0);
> if result = mrYes then
> halt(0);
> // frmMain.visible := true;
> end;
>
> frmMain.visible := true라는 부분에서 error발생됩니다.
> error는 visible을 수정하는 Handler에서 user program에서 변경할 수가 없다고
> 하네요. 고수님의 한수를 부탁드립니다.
>
> 미리 감사드리며...
>
>
안녕하세요..
프로그램 종료시 사용자에게 물어보고 종료한다는 얘기인가요?
Form 이벤트중에
FormCloseQuery(Sender: TObject; var CanClose: Boolean) 이벤트를
사용하세요..
canclose가 true이면 종료됩니다.
**
if MessageDlg(' 프로그램을 끝내겠습니까?,
mtCustom, [mbYes, mbNo], 0) = mrYes then
canclose := true
질문에 대한 답변이 정확했는지 모르겠네요..그럼.