Continue パラメータ

Continue パラメータ

Continueパラメータはフォームを閉じる時の確認に使用します。

CloseQueryEventのContinueパラメータを使って、フォームを閉じるかどうかの確認を行います。 このパラメータには、TrueまたはFalseが設定できます。

次のイベント・ルーチンでは、#Dialogという名前のフォームが閉じられようとする時に別のフォームを表示します。 #Dialogから返されたModalResultの値がNoの場合、フィールド#OptionにFalseが設定され、この値がContinueパラメータの値として使用されるので、フォームは閉じられません。 ModalResultの値がNoでなければ、フォームは閉じられます。

EvtRoutine Handling(#Com_Owner.CloseQuery) Continue(#Option) 

Invoke #Dialog.ShowModalForm
Define #QResult Reffld(#Std_Texts)
Change #QResult #Dialog.modalResult
Case #QResult
When '= No'
Invoke #Com_Owner.RestoreForm
Set #Option Value(FALSE)
OtherWise
Set #Option Value(TRUE)
EndCase
EndRoutine