Force Picklist in TStringGrid to drop down

[bruce.button]

Is there a method/property that I can use to force a picklist in a TStringGrid cell to drop down?

I've looked quite hard, but I'm not sure if I need to look at the cell or column properties, or at the TStringGrid itself.

Thank you for the help!

[jamie]

Code: Pascal  [Select][+][-]

1. procedure TForm1.Button1Click(Sender: TObject);
2. begin
3.  StringGrid1.Editor :=  StringGrid1.EditorByStyle(cbsPickList);
4.  StringGrid1.Editor.Show;
5.  StringGrid1.Editor.Left := StringGrid1.CellRect(1,1).Left;
6.  StringGrid1.Editor.Top  := StringGrid1.CellRect(1,1).Top;
7.  STringGrid1.Editor.Width:= StringGrid1.CellRect(1,1).Width;
8. end;                                                        
9.  

Something like this ?

[bruce.button]

Code: Pascal  [Select][+][-]

1. procedure TForm1.Button1Click(Sender: TObject);
2. begin
3.  StringGrid1.Editor :=  StringGrid1.EditorByStyle(cbsPickList);
4.  StringGrid1.Editor.Show;
5.  StringGrid1.Editor.Left := StringGrid1.CellRect(1,1).Left;
6.  StringGrid1.Editor.Top  := StringGrid1.CellRect(1,1).Top;
7.  STringGrid1.Editor.Width:= StringGrid1.CellRect(1,1).Width;
8. end;                                                        
9.  

Something like this ?

Almost. I want to force that picklist to drop down - equivalent to pressing Alt-Down on the keyboard.

[jamie]

The onSelectEditor gives you the control that is currently in place as far as Know.

When you reach that event you can do this.

TCustomCombobox(Editor).DroppedDown := true;

Of course it maybe a smart idea to first test it.

 Editor As TCustomCombobox.DroppedDown := True;

[bruce.button]

Yes, that looks like the property I was looking for. I will certainly test it out!

Thanks again.