DBGrid i PickList

Witam kolegów, ma może ktoś pomysł co jest nie tak w kodzie.

if ComboBox1.ItemIndex=2 then
    begin
      Table2.Active:=False;
      Table2.TableName:=nazwa;
      Table2.Active:=True;
      DBGrid1.DataSource:=DataSource2;
      DBGrid1.Columns[2].PickList:=Lista;
    end

W trzeciej kolumnie DBGrid powinna pokazać się rozwijana lista złożona z elementów "Listy", a tu nic. Nie pracowałem jak do tej pory z Rozwijaną listą w BDGrid, nie wiem jak to ugryźć.

http://www.google.com/search?client=opera&rls=pl&q=DBGrid+PickList&sourceid=opera&ie=utf-8&oe=utf-8