Оригинальный DVD-ROM: eXeL@B DVD !
eXeL@B ВИДЕОКУРС !

Курс видеоуроков «Программирование и взлом 2O18»
Выпущен 13 августа 2O18 года
Свежие инструменты, новые видеоуроки!

  • 300+ видеоуроков
  • 800 инструментов
  • 100+ свежих книг и статей

УЗНАТЬ БОЛЬШЕ >>
Домой | Статьи | RAR-cтатьи | FAQ | Форум | Скачать | Видеокурс
Новичку | Ссылки | Программирование | Интервью | Архив | Связь

БОЛЬШОЙ FAQ ПО DELPHI



Авторазмер для StringGrid

...да, реально это утомляет, но эту проблему можно решить программным путем (это нужно делать после того, как вы загрузите данные, или же, если вы загружаете данные по столбцам, их загружать в самом цикле, приведенном ниже):


 var
   i, j, temp, max: integer;
 begin
   for i := 0 to grid.colcount - 1 do
   begin
     max := 0;
     for j := 0 to grid.rowcount - 1 do
     begin
       temp := grid.canvas.textWidth(grid.cells[i, j]);
       if temp > max then
         max := temp;
     end;
     grid.colWidths[i] := max + grid.gridLineWidth + 1;
   end;
 end;
 

Вероятно, вам необходимо будет добавить +1, чтобы текст не прилипал к границам ячеек.




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Оригинальный DVD-ROM: eXeL@B DVD !


Вы находитесь на EXELAB.rU
Проект ReactOS