serial KeyCodesCNTs,TTreeViewExCNTs Default %Library.TMFormClass 60135,57926 60135,57926 %TMColorDialog %Library.String %Library.TMForm %TMGroupBox %TMLabel %TMLabel %TMLabel %TMLabel %TMLabel %TMLabel %TMPanel %TMButton %TMButton %TMButton %TMCheckBox %TMCheckBox %TMLabel %TMPanel %TMEdit %TMEdit %TMEdit %TMEdit %TMEdit initvalue:%String cache 0 %Status document literal cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal cache 0 document literal initvalue:%String cache 0 MApplication document literal initvalue:%String cache 0 %Library.Status document literal cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal ..txtMaxBufferCount.Text Do Quit . Do MApplication.MessageBox("Pre-buffer count dient kleiner of gelijk aan maximum buffer count te zijn!","TTreeViewEx",$$$MBICONINFORMATION) . Do ..txtPreBufferCount.SetFocus() If (..chkUseFontCorrTable.Checked="True") && '$D(^TTExHeightTable(..txtTVItemHeight.Text)) Do Quit . Do MApplication.MessageBox("Voor de opgegeven 'treeview itemheight' bestaat geen correlatie!","TTreeViewEx",$$$MBICONINFORMATION) . Do ..txtTVItemHeight.SetFocus() Do ..odSaveGP() Do ..Form.Close() ;End of user code s Args=$lb(Sender) q ]]> Program:%String cache 0 document literal cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal %Library.CacheSerialState list "%Library.TMFormClass" Address Form ComboBox1 ComboBox2 Label1 Label2 Label3 Panel1 btnAnnuleren btnOk cbbFetchID cbbProgram lblInfo txtDefName txtLDName LDName Program FLDName FProgram txtItemHeight txtProgram Label4 txtTVItemHeight ColorDialog Label7 pnlBackgroundColor GroupBox1 Label8 Label9 txtMaxBufferCount txtPreBufferCount chkLoadDefaultRows btnMaxPreBuffer chkUseFontCorrTable