Показать сообщение отдельно
  #2  
Старый 29.07.2014, 23:37
Аватар для Uniq!
Uniq! Uniq! вне форума
Местный
 
Регистрация: 29.09.2010
Сообщения: 539
Версия Delphi: Delphi XE3
Репутация: 374
По умолчанию

Цитата:
Сообщение от aqula
Вложение 4382
Думается, по картинке понятна проблема. Кого не затруднит, помогите пожалуйста.
Ну в вашем случае это
Код:
DbGrid.Columns[1].Width := DbGrid.Width - DbGrid.Columns[0].Width

А в идеале, надо в цикле полистать весь список тестов, найти самое длинное название и выставить первой колонка ее ширину. Если че это Canvas.TextWidth(TString). А потом выставить остаток второй колонке. Если колонок много, то нужно составлять пропорциональное соответствие.
Ответить с цитированием