Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.17;
Скачать: CL | DM;

Вниз

ширина столбца в TStringGrid...   Найти похожие ветки 

 
LLjo   (2004-09-29 18:36) [0]

как сделать, чтобы  ширина столбца в TStringGrid автоматически выставлялась по максимально длинной строке в этом столце, чтобы видно всю строку было...

спасибо


 
TUser ©   (2004-09-29 18:38) [1]

Как вариант - при изменении Cells проворять Canvas.TextWidth и выставлять нужную длину.


 
Cosinus ©   (2004-09-29 20:17) [2]

Что то типа этого (тоже самое, что и TUser, но развернутее)
begin
 for i := 0 to StringGrid.ColCount - 1 do
 begin
   MaxL := 0;
   for j := 0 to StringGrid.RowCount - 1 do
   begin
     L := StringGrid.Canvas.TextWidth(StringGrid.Cells[i, j]);
     if L > MaxL then
       MaxL := L;
   end;
   StringGrid.ColWidths[i] := MaxL + StringGrid.GridLineWidth + 1;
 end;
end;



Страницы: 1 вся ветка

Текущий архив: 2004.10.17;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.078 c
14-1096277529
panov
2004-09-27 13:32
2004.10.17
Безопасность ICQ.


1-1096873354
V l a d i m i r
2004-10-04 11:02
2004.10.17
Создание экземпляров формы


14-1096438028
fathe
2004-09-29 10:07
2004.10.17
первые сети


3-1095610419
dron-s
2004-09-19 20:13
2004.10.17
Сортировка с помощью SQL


14-1096051536
GanibalLector
2004-09-24 22:45
2004.10.17
Из космоса получен первый искусственный сигнал