ComboBox:aItems

[zeasoftware]

Tengo un ComboBox al cual en el TFormInInitialize le quiero anexar unos
valores al :aItems, pero no me los toma, por que?
With Object ::oCBxFiltros
:aItems := { "Todos",;
"Activas",;
"Nota de Crédito Aplicada"}
:Cargo := {"",;
"Status == 'A'",;
"NCred_Tot > 0.0"}
#ifdef _MULTI_SERIES_
aAdd(:aItems, "Serie A") ///esto aunque se ejecute no lo anexa
aAdd(:aItems, "Serie B") //esto igual.
aAdd(:Cargo, "Serie == 'A'")
aAdd(:Cargo, "Serie == 'B'")
#endif
End With
Saludos.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/

[ignacio]

Ramón,
Utilice el método AddItem() en vez de Aadd()
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"ramonzea" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=45909124@news.xailer.com...]45909124@news.xailer.com...[/email]
> Tengo un ComboBox al cual en el TFormInInitialize le quiero anexar unos
> valores al :aItems, pero no me los toma, por que?
>
> With Object ::oCBxFiltros
> :aItems := { "Todos",;
> "Activas",;
> "Nota de Crédito Aplicada"}
>
> :Cargo := {"",;
> "Status == 'A'",;
> "NCred_Tot > 0.0"}
>
> #ifdef _MULTI_SERIES_
> aAdd(:aItems, "Serie A") ///esto aunque se ejecute no lo anexa
> aAdd(:aItems, "Serie B") //esto igual.
>
> aAdd(:Cargo, "Serie == 'A'")
> aAdd(:Cargo, "Serie == 'B'")
> #endif
>
> End With
>
> Saludos.
> --
> Ramón Zea
> ramonzea@yahoo.com
> zeasoftware@hotmail.com
> zeasoft.movil@hotmail.com
> http://www.paginasprodigy.com/zeasoft/
>