On Friday 19 August 2011 12:14:48 Julio Jiménez wrote: > Yes, I understand it.. just wondering why it got stucked in auto-cancel not > allowing to change the data. > " function twindow.close: boolean; begin if fmodalresult = mr_none then begin fmodalresult:= mr_windowclosed; end; fowner.beforeclosequery(fmodalresult); result:= (fmodalresult <> mr_none) and fowner.canparentclose(nil); <<<----- abort if result then begin deactivate; fowner.hide; destroywindow; end else begin fmodalresult:= mr_none; <<<<---- will not be done in case of abort end; end;
procedure twindow.setmodalresult(const Value: modalresultty); begin fmodalresult:= Value; if (value <> mr_none) {and (tws_modal in fstate)} then begin close(); end; end; " Martin _______________________________________________ MSEide-MSEgui-talk mailing list MSEide-MSEgui-talk@lists.berlios.de https://lists.berlios.de/mailman/listinfo/mseide-msegui-talk