아래와같이 모달폼을 띄웠습니다.
모달폼에서 종료버튼을 클릭하면 닫히는데
종료버튼을 눌렀을때 Funtion을 실행시켜서
False면 않닫히고 True면 닫히게하고싶은데 어떻게해야하나요?
너무 초보적인 질문인가? 고수님들의 답변부탁드립니다.
Child_Form := TfSim_LinSce.create(self);
try
if (Child_Form.showmodal=mrOk) then
begin
end;
finally
Child_Form.free;
end;
그 모달폼의 CloseQuery이벤트에서 메세지 박스를 띄우시고
그러니까...이렇게...
if MessageDlg('닫으까?',mtInformation, [mbOk, mbCancel], 0) = mrOk then
begin
CanClose := True
end
else
begin
CanClose := False
end;
메세지 박스 자리에 함수를 넣으시고 아님..함수의 결과가 어차피 true, false니까,
그 값을 바로 CanClose에 넣으셔두 될것 같은데...
저두 초보라 확정적이 답은 못해드리겠네요...
멋진 코딩하세요.^^
호야 wrote:
> 아래와같이 모달폼을 띄웠습니다.
> 모달폼에서 종료버튼을 클릭하면 닫히는데
> 종료버튼을 눌렀을때 Funtion을 실행시켜서
> False면 않닫히고 True면 닫히게하고싶은데 어떻게해야하나요?
> 너무 초보적인 질문인가? 고수님들의 답변부탁드립니다.
>
> Child_Form := TfSim_LinSce.create(self);
> try
> if (Child_Form.showmodal=mrOk) then
> begin
>
> end;
> finally
> Child_Form.free;
> end;