ADO Database Delphi

Herkese Merhaba.
Katkim olsun diye yaziyorum.
A tablosundaki bir degiskenenin iceriginii DBGrid bileseninde acilir liste olarak kullanmak icin bir ornek.
While not Table2.EOF do begin
DBGrid1.Comns[1].PickList.Add(Table2ADI.AsString);
Table2.Next;