Information générale
Catégorie:
Codage, syntaxe et commandes
Much too easy! Thank you!
>Joe,
>
>If it's a readonly display of the date you can make the ControlSource iif(table.field, "Yes", "No " )
>
>>I was hoping that with the following code I could display "Yes" or "No" in place of T or F in a grid.
>>My textbox is just blank though. Any tips?
>>
>>define class MyTextYesNo as TextBox
>> procedure init
>> if evaluate(this.parent.parent.controlsource)
>> this.value='Yes'
>> else
>> this.value='No'
>> endif
>> endproc
>>enddefine
>>
>>define class MyGridYesNo as Column
>> ADD OBJECT Header1 AS Header
>> Add Object Text1 as MyTextYesNo with Borderstyle=0
>> readonly=.t.
>> bound=.f.
>> procedure init
>> PARAMETER tcCaption, tcControlSource, tnWidth
>> this.Header1.Caption = tcCaption
>> this.resizable=.f.
>> this.ControlSource = tcControlSource
>> this.width=tnWidth
>>enddefine
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement