DataSetColumn.st
changeset 3459 6d1feb9745b8
parent 3448 ef7d76d6bcfd
child 3460 a2c21a2e959c
equal deleted inserted replaced
3458:5f9a85c6279a 3459:6d1feb9745b8
   157     |app key|
   157     |app key|
   158 
   158 
   159     ((key := description activeHelpKey) notNil 
   159     ((key := description activeHelpKey) notNil 
   160     and:[(app := dataSet application) notNil]) ifTrue:[
   160     and:[(app := dataSet application) notNil]) ifTrue:[
   161         ^ app flyByHelpTextForKey:key.
   161         ^ app flyByHelpTextForKey:key.
       
   162     ].
       
   163     ^ nil
       
   164 
       
   165     "Created: / 26-03-2007 / 13:39:11 / cg"
       
   166     "Modified: / 26-03-2007 / 17:51:15 / cg"
       
   167 !
       
   168 
       
   169 activeHelpTextForRow:rowNr
       
   170     "get the active helpText or nil"
       
   171 
       
   172     |app key|
       
   173 
       
   174     ((key := description activeHelpKey) notNil 
       
   175     and:[(app := dataSet application) notNil]) ifTrue:[
       
   176         ^ app flyByHelpTextForKey:key row:rowNr.
   162     ].
   177     ].
   163     ^ nil
   178     ^ nil
   164 
   179 
   165     "Created: / 26-03-2007 / 13:39:11 / cg"
   180     "Created: / 26-03-2007 / 13:39:11 / cg"
   166     "Modified: / 26-03-2007 / 17:51:15 / cg"
   181     "Modified: / 26-03-2007 / 17:51:15 / cg"
  1231 ! !
  1246 ! !
  1232 
  1247 
  1233 !DataSetColumn class methodsFor:'documentation'!
  1248 !DataSetColumn class methodsFor:'documentation'!
  1234 
  1249 
  1235 version
  1250 version
  1236     ^ '$Header: /cvs/stx/stx/libwidg2/DataSetColumn.st,v 1.116 2008-06-23 18:13:26 cg Exp $'
  1251     ^ '$Header: /cvs/stx/stx/libwidg2/DataSetColumn.st,v 1.117 2008-06-30 12:34:21 stefan Exp $'
  1237 ! !
  1252 ! !