[ColorDb]

Есть ячейки с данными, но строка в ячейку не входит, слишком длинная.
И строки по длине разные.
Как сделать авто длинну ячеек??
По форуму искал часа полтора, ответа не нашел.
FAQ на поиск StringGrid не отвечает.

А еще мне надо открыть только 1 и 3 столбцы. Остальное скрыть.

Вот собстно пока все. В литературе разной кстати тоже таких подробностей нет. Или просто не попадалась такая.

[PhoeniX]

Хм... если мне не изменяет память - стринг-грид такого не позволяет, у него только общая ширина ячеек...
А скрыть - так храни все данные в двухмерном массиве, а выдавай нужное...

[ColorDb]

ДА, авто длинны нет, пришлось написать немного.
У меня их Exel переводится в мою прогу.
А там нужно иногда скрывать столбцы.
То есть в опциях проги нужно указывать какие столбцы показывать.
Вот например в основном работа с 1-3 столбцами. Остальные должны быть скрыты. И в любой момент открыты. Вот задача вся в чем состоит.

[Nyctos Kasignete]

При большом желании и «автодлина» (как вы изволите выражаться) может быть запрограммирована.
Это обработчик события OnDrawCell.

Код:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var
  txtWidth: Integer;
begin
  with (Sender as TStringGrid) do
  begin
    txtWidth := Canvas.TextWidth(Cells[ACol, ARow]);
    if ColWidths[ACol] < txtWidth then ColWidths[ACol] := txtWidth + 3;
  end;
end;

[ColorDb]

Ну да вот типа того пришлось сделать.
А лишние столбцы скрылись с помощью нулевой длины ячеек.


Ладно с этим решили спасибо всем за отклик.