Программирование Delphi

Как сделать так, чтобы раскрывающийся список PickList открывался быстрее, не щелкать на нем 4 раза?

В обработчике события OnCellClick Вашего TDBGrid напишите следующее:

keybd_event(VK_F2, 0, 0, 0);
keybd_event(VK_F2, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_MENU, 0, 0, 0);
keybd_event(VK_DOWN, 0, 0, 0);
keybd_event(VK_DOWN, 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP, 0);

Это то же самое, что и нажатие F2, сопровождаемое Alt + Стрелка Вниз.