- Timestamp:
- Jul 21, 2008, 1:26:05 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/UI/ApplicationEvent.sbp
r551 r559 1 1 Public 2 S ub AddThreadExit(h As Handler)2 Static Sub AddThreadExit(h As Handler) 3 3 If IsNothing(threadExit) Then 4 4 threadExit = h … … 7 7 End If 8 8 End Sub 9 S ub RemoveThreadExit(h As Handler)9 Static Sub RemoveThreadExit(h As Handler) 10 10 If Not IsNothing(threadExit) Then 11 11 threadExit -= h … … 13 13 End Sub 14 14 Protected 15 S ub OnThreadExit(e As Args)15 Static Sub OnThreadExit(e As Args) 16 16 If Not IsNothing(threadExit) Then 17 17 threadExit(This, e) … … 19 19 End Sub 20 20 Private 21 threadExit As Handler21 Static threadExit As Handler 22 22
Note:
See TracChangeset
for help on using the changeset viewer.