StringGrid and cbs.....

[asdf]

1. Could StringGrid shows cbsButton, cbsEllipsis and cbsPickList at all times like cbsCheckBoxColumn ? Not only when double click to edit cell data.

2. How can we protect the cells with cbsPickList by using only values in PickList?
    I noticed that I could edit the value by using the keyboard.

[tk]

In KGrid:
1. You have to paint it in OnDrawCell.
2. You can assign your own combo box with csDropDownList style as inplace editor.

[asdf]

By upgrading to v0.9.29, now I've got 1. already  .
But how can I add a tiny picture with text on the buttons  ?

Using cbs...., Grid must be +[goediting].
For cbsPickList, how can I setup the cell to accept "only" a value from PickList?

[asdf]

How can we put a tiny picture with text on the buttons  ?

Using cbs...., Grid must be +[goediting].
For cbsPickList, how can I setup the cell to accept "only" a value from PickList?

[jesusr]

You can use grid event OnDrawCell to draw anything over the button. About the picklist question, see this example:  http://wiki.lazarus.freepascal.org/Grids_Reference_Page#Example:_Working_with_Picklist.2C_How_to_make_it_read_only_and_How_to_fill_it_at_run_time.

[asdf]

About the picklist question, see this example:  http://wiki.lazarus.freepascal.org/Grids_Reference_Page#Example:_Working_with_Picklist.2C_How_to_make_it_read_only_and_How_to_fill_it_at_run_time.

In this example, is there anything to write more ?
I added StringGrid1 into Form1 then StringGrid1.Columns.Add ... but StringGrid1 still stood silent.

[jesusr]

I added StringGrid1 into Form1 then StringGrid1.Columns.Add ... but StringGrid1 still stood silent.

Then you have added a custom column which is what StringGrid1.Columns.Add returns, then you need to change the custom column property ButtonStyle to cbsPickList

Code: [Select]

var
  C := TGridColumn;
....
   C := StringGrid1.Columns.Add;
   C.ButtonStyle := cbsPicklist;
....
or

Code: [Select]

   with StringGrid1.Columns.Add do begin
      ButtonStyle := cbsPickList;
   end;

[asdf]

procedure TForm1.FormCreate(Sender: TObject);
begin
stringgrid1.Columns.Add;
stringgrid1.Columns.Add;
stringgrid1.Columns[0].ButtonStyle:=cbspicklist;
stringgrid1.Options:=stringgrid1.Options+[goediting];
end;

procedure TForm1.StringGrid1SelectCell(Sender: TObject; aCol, aRow: Integer;
  var CanSelect: Boolean);
begin
  if (aCol=1) and (aRow<>3) then CanSelect := true;
end;

procedure TForm1.StringGrid1SelectEditor(Sender: TObject; aCol, aRow: Integer;
          var Editor: TWinControl);
begin
//  if (aCol=1) and (aRow<>3) then begin Editor := nil; // How about this line ?
//end;
//procedure TForm1.gridSelectEditor(Sender: TObject; aCol, aRow: Integer;
//  var Editor: TWinControl);
//begin
  if (aCol=1) and (aRow<>3) then begin
    if (Editor is TCustomComboBox) then // Error: Identifier not found 'TCustomComboBox'

[asdf]

    if (Editor is TCustomComboBox) then

There was an error Error: Identifier not found 'TCustomComboBox'.

[asdf]

Help me please  .

[Laksen]

Try including the stdctrls unit

[asdf]

Now it worked with latest SVN.
I have used StdCtrls since the beginning.

Thank you so much

[asdf]

You can use grid event OnDrawCell to draw anything over the button.

And

http://www.lazarus.freepascal.org/index.php/topic,11695.msg58964.html#msg58964

Kindly help me, please  .