(Resolvido) Erro ao preencher um TComboBox

[nsouza]

Colegas,

o código abaixo é para preencher uma TCombobox com os campos do dataset. O código funciona quando é colocado

no evento click de um bitBtn, mas onde eu preciso, ou seja, no evento onCreate da a seguinte mensagem:

'Acess violation at address 0049B634 in module'

procedure TF_Modelo.FormCreate(Sender: TObject);

var

i: integer;

begin

for i := 0 to Pred(Ds.DataSet.FieldCount) do

begin

if Ds.DataSet.Fields.DataType in [ftString,ftWideString,ftFixedChar] then

cbxField.Items.Add(Ds.DataSet.Fields.FieldName);

end;

end;

Como posso resolver este problema?

[Jhonas]

o código abaixo é para preencher uma TCombobox com os campos do dataset. O código funciona quando é colocado no evento click de um bitBtn, mas onde eu preciso, ou seja, no evento onCreate da a seguinte mensagem:

'Acess violation at address 0049B634 in module'

Isso acontece se este form onde tem o TCombobox não foi criado automaticamente. Se ele está sendo criado em tempo de execução o melhor evento seria o OnActive desse form.

abraço

[nsouza]

o código abaixo é para preencher uma TCombobox com os campos do dataset. O código funciona quando é colocado no evento click de um bitBtn, mas onde eu preciso, ou seja, no evento onCreate da a seguinte mensagem:

'Acess violation at address 0049B634 in module'

Isso acontece se este form onde tem o TCombobox não foi criado automaticamente. Se ele está sendo criado em tempo de execução o melhor evento seria o OnActive desse form.

abraço

(Resolvido) Obrigado