<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">TEngo un dbgrid con un picklist en la primera columna, para llenarlo uso el siguiente código:</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)"><span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">procedure TfrmPedVen.dbgLinFacCellClick(Column: TColumn);</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">begin</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">ZqryArt.Open;</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">ZqryArt.First;</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">dbgLinFac.Columns[0].PickList.Clear;</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">while not ZqryArt.EOF do</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">begin</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">dbgLinFac.Columns[0].PickList.Add(ZqryArt.FieldByName('codigo').AsString);</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">ZqryArt.Next;</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">end;</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">ZqryArt.Close;</span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">end; </span><br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">
<br style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)"><span style="font-family:verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif;font-size:13px;background-color:rgb(245,245,255)">El caso es que el picklist no carga hasta que se escribe algo en la celda. He probado con varios eventos sin resultado. Muchas gracias.</span>