******************************************************************************* * THIS FILE LISTS THE CHANGES NEEDED TO TURBO VISION SOURCE FILES TO USE ALL * * THE FEATURES OF TV TOOL BOX. * ******************************************************************************* FILE : STDDLG.PAS. LINE # OLD NEW =============================================================================== 0102 procedure ReadDirectory(...); procedure ReadDirectory(...); virtual; ------------------------------------------------------------------------------- 0153 private {private} ------------------------------------------------------------------------------- ******************************************************************************* * UNLESS YOU HAVE THE RUNTIME LIBRARY AND TURBO VISION SOURCE YOU CANNOT MAKE * * ANY OF FOLLOWING CHANGES!!!! * ******************************************************************************* FILE : VIEWS.PAS. LINE # OLD NEW =============================================================================== 0260 procedure Select; procedure Select; virtual; ------------------------------------------------------------------------------- FILE : DIALOGS.PAS. NOTE : These changes make the TInputLine, TCluster descendants of TEditView. This enables all the edit control features of TV TOOL BOX for all input lines, check boxes, and radio buttons. LINE # OLD NEW =============================================================================== 0017 uses Objects, Drivers, Views; uses Objects, Drivers, Views, TvViews; ------------------------------------------------------------------------------- 0104 TInputLine = object(TView) TInputLine = object(TEditView) ------------------------------------------------------------------------------- 0168 TCluster = object(TView) TCluster = object(TEditView) ------------------------------------------------------------------------------- 0553 TView.Init(Bounds); TEditView.Init(Bounds); ------------------------------------------------------------------------------- 0563 TView.Load(S); TEditView.Load(S); ------------------------------------------------------------------------------- 0573 TView.Done; TEditView.Done; ------------------------------------------------------------------------------- 0666 TView.HandleEvent(Event); TEditView.HandleEvent(Event); ------------------------------------------------------------------------------- 0786 TView.SetState(AState, Enable); TEditView.SetState(AState, Enable); ------------------------------------------------------------------------------- 0793 TView.Store(S); TEditView.Store(S); ------------------------------------------------------------------------------- 1034 TView.Init(Bounds); TEditView.Init(Bounds); ------------------------------------------------------------------------------- 1060 TView.Load(S); TEditView.Load(S); ------------------------------------------------------------------------------- 1070 TView.Done; TEditView.Done; ------------------------------------------------------------------------------- 1141 TView.HandleEvent(Event); TEditView.HandleEvent(Event); ------------------------------------------------------------------------------- 1247 TView.SetState(AState, Enable); TEditView.SetState(AState, Enable); ------------------------------------------------------------------------------- 1266 TView.Store(S); TEditView.Store(S); -------------------------------------------------------------------------------