DBGridde Combobox kullanırken hata..

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
efkan
Üye
Mesajlar: 155
Kayıt: 31 Oca 2004 07:47
Konum: Tekirdağ
İletişim:

DBGridde Combobox kullanırken hata..

Mesaj gönderen efkan »

herkese selam ,
formun gecmisinde Huseyin Beyin verdiği bir kodu denedim ancak olmadı.Programın verdiği hata mesajıda şu ;
"Access violation at address 004CE5A4 in module 'program.exe'.Read of address 00000000." işin aslı ben bir kaç gündür uğraşıyorum bu programla.. biraz daha sıkıntı yaparsam hasta olucam. yardım edebileceklerden cevap bekliyorum.
Kullandığım kodsa şöyle

Kod: Tümünü seç

var
  StringListem,liste: TStrings;

begin

  try
    with StringListem do
    begin
        TABLE1.First;

        while not TABLE1.Eof do
        begin
                Add(TABLE1.FieldValues['KumasAdi']);
                TABLE1.Next;
         end;

    end;


  dbgrid1.Columns[4].PickList:=StringListem;

  finally
    StringListem.free;
      end;
   end;
hata olabilir diye yazdım.Herkese çalışmalarında başarılar...
Bilgisayar Programcısı/Analyst ve Sistem Yöneticisi
Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

StringListem nerde create edilliyor...
create etmeden baska bir nesneye atıyorsun sonra da free etmeye calısıyorsun. hata vemesi normal
ÜŞENME,ERTELEME,VAZGEÇME
Kullanıcı avatarı
efkan
Üye
Mesajlar: 155
Kayıt: 31 Oca 2004 07:47
Konum: Tekirdağ
İletişim:

teşekkürler..

Mesaj gönderen efkan »

haklısınız bende halen birşeyleri bilmediğimi sandığımdan at gözlüğüyle bakıyordum olaya :oops: yinede çömezim.Bu yüzden hiç aklıma gelmemişti database nesnesi kullanmak.Tekrar teşekkürler , iyi çalışmalar...
Bilgisayar Programcısı/Analyst ve Sistem Yöneticisi
Kullanıcı avatarı
efkan
Üye
Mesajlar: 155
Kayıt: 31 Oca 2004 07:47
Konum: Tekirdağ
İletişim:

cevap

Mesaj gönderen efkan »

ileride benim gibi takılabilecek olanlar için yazıyorum.bir tablodan dbgride liste aktarımı...

Kod: Tümünü seç

 while not (table1.Eof) do
  begin
   dbgrid1.Columns[4].PickList.Add(table1.fieldbyname('AlanAdi').AsString);
   table1.Next;
  end;

herkese kolay gelsin...
Bilgisayar Programcısı/Analyst ve Sistem Yöneticisi
Cevapla