Fórum Povoar CheckBox - Access Violation #388587

15/10/2010

0

Olá, estou acompanhando as vídeos do Rodrigo carreiro e parei neste caso.   Antes de inserir o código abaixo, tudo funcionava mas a partir dai começou a dar Access Violation. Mesmo estanto tudo setado conforme a vídeo.   Segue código: procedure TForm1.FormCreate(Sender: TObject);
var
i : integer;
begin
  DM.cdsClientes.Close;
  for I := 0 to Pred(DS.DataSet.FieldCount) do
  begin
    if DS.DataSet.Fields[I].DataType in [ftString,ftWideString,ftFixedChar] then
      cbxFiltro.Items.Add(DS.DataSet.Fields[I].FieldName);
  end; end;   O ClienteDataSet está dom os Fields mas mesmo assim não roda. Se eu tiro o código roda de boa.   Alguém tem um idéia do que seja?  
Adilson Rumao

Adilson Rumao

Responder

Posts

15/10/2010

Eriley Barbosa

Passe o seu código abaixo para o evento onShow do formulário e retire do oncreate do formulário: var
i : integer;
begin
  DM.cdsClientes.Close;
  for I := 0 to Pred(DS.DataSet.FieldCount) do
  begin
    if DS.DataSet.Fields[I].DataType in [ftString,ftWideString,ftFixedChar] then
      cbxFiltro.Items.Add(DS.DataSet.Fields[I].FieldName);
  end; end;
Responder

Gostei + 0

15/10/2010

Adilson Rumao

Cara mais uma vez valew mesmo. Muito obrigado.
Responder

Gostei + 0

18/10/2010

Leonardo Xavier

Você jaresolveu este post?
Responder

Gostei + 0

20/10/2010

America Informatica

Sim, mas não estou conseguindo finalizar ele.
Responder

Gostei + 0

20/10/2010

Wilson Junior

Junto com o post de resposta aparece uma opção para concluir.
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar