Kod: Tümünü seç
AdoDataSet2.First;
While not AdoDataSet2.Eof Do
Begin
DbGrid1.Columns[0].PickList := AdoDataSet2.FieldByName('CariKod').AsString;
AdoDataSet2.Next;
End;
Bu arada Kandilinizi kutlar hayırlara vesile olmasını dilerim.
İyi Çalışmalar.