Página 1 de 1

triggering TBrwColumn:OnHeaderClick

Publicado: Lun Sep 01, 2008 10:26 am
por Ingo JH
Dear Xailers,
if the TDBBrowse-property lAutoOrder is .T. the event
TBrwColumn:OnHeaderClick will be triggered AFTER the browse is automatically
sorted, therefore it is not possible to deactivate this behaviour for a
single column.
Could you change the sequence in this way that the OnHeaderClick-event is
triggered at first and e.g. when '0' is returned the AutoOrder-function
will be discontinued for this single column?
Or have you any workaround to stop autoordering for only one column without
setting lAutoOrder to .F..?
Regards
Ingo

triggering TBrwColumn:OnHeaderClick

Publicado: Lun Sep 01, 2008 10:58 am
por ignacio
Ingo,
Modified this way:
METHOD HeaderClick( nPosX, nPosY ) CLASS XBrwColumn
LOCAL xRet
xRet := ::OnHeaderClick( NIL, nPosX, nPosY )
IF ( Valtype( xRet ) != "L" .OR. xRet ) .AND. ::oParent:lAutoOrder
::oParent:Sort( Self )
ENDIF
RETURN xRet
Regards,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]
[Xailer support]
"Ingo" <support@mandantwin.com> escribió en el mensaje
news:48bba736$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Dear Xailers,
>
> if the TDBBrowse-property lAutoOrder is .T. the event
> TBrwColumn:OnHeaderClick will be triggered AFTER the browse is
> automatically sorted, therefore it is not possible to deactivate this
> behaviour for a single column.
>
> Could you change the sequence in this way that the OnHeaderClick-event is
> triggered at first and e.g. when '0' is returned the AutoOrder-function
> will be discontinued for this single column?
>
> Or have you any workaround to stop autoordering for only one column
> without setting lAutoOrder to .F..?
>
> Regards
>
> Ingo

triggering TBrwColumn:OnHeaderClick

Publicado: Lun Sep 01, 2008 10:58 am
por NoName
Ingo,
Modified this way:
METHOD HeaderClick( nPosX, nPosY ) CLASS XBrwColumn
LOCAL xRet
xRet := ::OnHeaderClick( NIL, nPosX, nPosY )
IF ( Valtype( xRet ) != "L" .OR. xRet ) .AND. ::oParent:lAutoOrder
::oParent:Sort( Self )
ENDIF
RETURN xRet
Regards,
--
Ignacio Ortiz de Zúñiga
[Soporte Xailer]
[Xailer support]
"Ingo" <support@mandantwin.com> escribió en el mensaje
news:48bba736$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Dear Xailers,
>
> if the TDBBrowse-property lAutoOrder is .T. the event
> TBrwColumn:OnHeaderClick will be triggered AFTER the browse is
> automatically sorted, therefore it is not possible to deactivate this
> behaviour for a single column.
>
> Could you change the sequence in this way that the OnHeaderClick-event is
> triggered at first and e.g. when '0' is returned the AutoOrder-function
> will be discontinued for this single column?
>
> Or have you any workaround to stop autoordering for only one column
> without setting lAutoOrder to .F..?
>
> Regards
>
> Ingo

triggering TBrwColumn:OnHeaderClick

Publicado: Lun Sep 01, 2008 1:19 pm
por Ingo JH
Ignacio,
I modified BrwCol.prg that way. That's what I needed.
Thank you very much.
Ingo
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> schrieb im Newsbeitrag
news:48bbaebf$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Ingo,
>
> Modified this way:
>
> METHOD HeaderClick( nPosX, nPosY ) CLASS XBrwColumn
>
> LOCAL xRet
>
> xRet := ::OnHeaderClick( NIL, nPosX, nPosY )
>
> IF ( Valtype( xRet ) != "L" .OR. xRet ) .AND. ::oParent:lAutoOrder
> ::oParent:Sort( Self )
> ENDIF
>
> RETURN xRet
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> [Soporte Xailer]
> [Xailer support]
>
>
> "Ingo" <support@mandantwin.com> escribió en el mensaje
> news:48bba736$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Dear Xailers,
>>
>> if the TDBBrowse-property lAutoOrder is .T. the event
>> TBrwColumn:OnHeaderClick will be triggered AFTER the browse is
>> automatically sorted, therefore it is not possible to deactivate this
>> behaviour for a single column.
>>
>> Could you change the sequence in this way that the OnHeaderClick-event is
>> triggered at first and e.g. when '0' is returned the AutoOrder-function
>> will be discontinued for this single column?
>>
>> Or have you any workaround to stop autoordering for only one column
>> without setting lAutoOrder to .F..?
>>
>> Regards
>>
>> Ingo
>
>

triggering TBrwColumn:OnHeaderClick

Publicado: Lun Sep 01, 2008 1:19 pm
por Ingo JH
Ignacio,
I modified BrwCol.prg that way. That's what I needed.
Thank you very much.
Ingo
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> schrieb im Newsbeitrag
news:48bbaebf$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Ingo,
>
> Modified this way:
>
> METHOD HeaderClick( nPosX, nPosY ) CLASS XBrwColumn
>
> LOCAL xRet
>
> xRet := ::OnHeaderClick( NIL, nPosX, nPosY )
>
> IF ( Valtype( xRet ) != "L" .OR. xRet ) .AND. ::oParent:lAutoOrder
> ::oParent:Sort( Self )
> ENDIF
>
> RETURN xRet
>
> Regards,
>
> --
> Ignacio Ortiz de Zúñiga
> [Soporte Xailer]
> [Xailer support]
>
>
> "Ingo" <support@mandantwin.com> escribió en el mensaje
> news:48bba736$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Dear Xailers,
>>
>> if the TDBBrowse-property lAutoOrder is .T. the event
>> TBrwColumn:OnHeaderClick will be triggered AFTER the browse is
>> automatically sorted, therefore it is not possible to deactivate this
>> behaviour for a single column.
>>
>> Could you change the sequence in this way that the OnHeaderClick-event is
>> triggered at first and e.g. when '0' is returned the AutoOrder-function
>> will be discontinued for this single column?
>>
>> Or have you any workaround to stop autoordering for only one column
>> without setting lAutoOrder to .F..?
>>
>> Regards
>>
>> Ingo
>
>