Check the unsaved datawindow data when close window
Write this code on your windows Close Query Event
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Integer li_count,li_ret window aw_window aw_window = This For li_count = 1 To UpperBound(Control[]) If TypeOf(aw_window.Control[li_count]) = Datawindow! Then Datawindow dw dw = Control[li_count] If dw.AcceptText() = 1 And dw.ModifiedCount() > 0 Then li_ret = MessageBox("Warning","Changes Not Saved, Do you Want to Save it?",Question!,YesNo!,1) If li_ret = 1 Then Return 1 End If End If Next |
Good Luck!
https://waterfallmagazine.com
Wow, fantastic blog structure! How lengthy have you been blogging
for? you make blogging glance easy. The overall look of your
site is great, as neatly as the content!