Página 1 de 1
new DataSet prblem with TBrwColumn:OnDrawCell
Publicado: Lun Ago 10, 2009 9:18 am
por Ingo
Ignacio,
in many TDBBrowses I'm using TBrwColumn:OnDrawCell to modify the text of a
column like this:
METHOD BrwColumn1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite,
hDC, aRect ) CLASS TForm1
cText += " " + ::oDataSet:LAST
RETURN Nil
But when I call AddNew() ::oDataSet:LAST returns NIL because each element of
oDataSet:aFldEdit in FieldGet() contains NIL.
A modified sample (DataControlsDbfData2) is attached.
Regards
Ingo
--
Attached files DbfTest.zip (7 KB)Â
new DataSet prblem with TBrwColumn:OnDrawCell
Publicado: Lun Ago 10, 2009 5:28 pm
por ignacio
Ingo,
Try with:
cText += " " + ::oDataSet:LAST( dsFIELD )
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
http:/xailer.info
"Ingo" <
info@mandantwin.com> escribió en el mensaje de
noticias:4a7fc9c4$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Ignacio,
>
> in many TDBBrowses I'm using TBrwColumn:OnDrawCell to modify the text of a
> column like this:
>
> METHOD BrwColumn1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite,
> hDC, aRect ) CLASS TForm1
> cText += " " + ::oDataSet:LAST
> RETURN Nil
>
> But when I call AddNew() ::oDataSet:LAST returns NIL because each element
> of
> oDataSet:aFldEdit in FieldGet() contains NIL.
>
> A modified sample (DataControlsDbfData2) is attached.
>
> Regards
>
> Ingo
>
>
new DataSet prblem with TBrwColumn:OnDrawCell
Publicado: Lun Ago 10, 2009 5:28 pm
por ignacio
Ingo,
Try with:
cText += " " + ::oDataSet:LAST( dsFIELD )
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
http:/xailer.info
"Ingo" <
info@mandantwin.com> escribió en el mensaje de
noticias:4a7fc9c4$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Ignacio,
>
> in many TDBBrowses I'm using TBrwColumn:OnDrawCell to modify the text of a
> column like this:
>
> METHOD BrwColumn1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite,
> hDC, aRect ) CLASS TForm1
> cText += " " + ::oDataSet:LAST
> RETURN Nil
>
> But when I call AddNew() ::oDataSet:LAST returns NIL because each element
> of
> oDataSet:aFldEdit in FieldGet() contains NIL.
>
> A modified sample (DataControlsDbfData2) is attached.
>
> Regards
>
> Ingo
>
>
new DataSet prblem with TBrwColumn:OnDrawCell
Publicado: Mar Ago 11, 2009 6:56 am
por Ingo JH
Ignacio,
that's it.
Thank you
Ingo
"Ignacio Ortiz de Zúñiga" <
NoNameToAvoidSpam@xailer.com> schrieb im
Newsbeitrag news:4a803c96$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Ingo,
>
> Try with:
>
> cText += " " + ::oDataSet:LAST( dsFIELD )
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
>
http://www.xailer.com
> http:/xailer.info
>
> "Ingo" <
info@mandantwin.com> escribió en el mensaje de
> noticias:4a7fc9c4$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Ignacio,
>>
>> in many TDBBrowses I'm using TBrwColumn:OnDrawCell to modify the text of
>> a
>> column like this:
>>
>> METHOD BrwColumn1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite,
>> hDC, aRect ) CLASS TForm1
>> cText += " " + ::oDataSet:LAST
>> RETURN Nil
>>
>> But when I call AddNew() ::oDataSet:LAST returns NIL because each element
>> of
>> oDataSet:aFldEdit in FieldGet() contains NIL.
>>
>> A modified sample (DataControlsDbfData2) is attached.
>>
>> Regards
>>
>> Ingo
>>
>>
new DataSet prblem with TBrwColumn:OnDrawCell
Publicado: Mar Ago 11, 2009 6:56 am
por Ingo JH
Ignacio,
that's it.
Thank you
Ingo
"Ignacio Ortiz de Zúñiga" <
NoNameToAvoidSpam@xailer.com> schrieb im
Newsbeitrag news:4a803c96$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Ingo,
>
> Try with:
>
> cText += " " + ::oDataSet:LAST( dsFIELD )
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
>
http://www.xailer.com
> http:/xailer.info
>
> "Ingo" <
info@mandantwin.com> escribió en el mensaje de
> noticias:4a7fc9c4$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Ignacio,
>>
>> in many TDBBrowses I'm using TBrwColumn:OnDrawCell to modify the text of
>> a
>> column like this:
>>
>> METHOD BrwColumn1DrawCell( oSender, cText, nClrText, nClrPane, lHighLite,
>> hDC, aRect ) CLASS TForm1
>> cText += " " + ::oDataSet:LAST
>> RETURN Nil
>>
>> But when I call AddNew() ::oDataSet:LAST returns NIL because each element
>> of
>> oDataSet:aFldEdit in FieldGet() contains NIL.
>>
>> A modified sample (DataControlsDbfData2) is attached.
>>
>> Regards
>>
>> Ingo
>>
>>