Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.07.2009, 17:07   #1
kate158
Форумчанин
 
Регистрация: 01.08.2008
Сообщений: 383
По умолчанию выравнивание столбцов dbgrid по ширине текста

вопрос прост, как выравнить столбцы dbgrida по ширине текста?
kate158 вне форума Ответить с цитированием
Старый 30.07.2009, 17:19   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

В теории примерно так:
Код:
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
var w:Integer;
begin
 w:=DBGrid1.Canvas.TextWidth(Column.Field.AsString);
 if Column.Width<w then Column.Width:=w;
 DBGrid1.Canvas.TextOut(rect.Left,rect.Top,Column.Field.AsString);
end;
Плюс выключить свойство DefaultDrawing.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 30.07.2009, 17:28   #3
kate158
Форумчанин
 
Регистрация: 01.08.2008
Сообщений: 383
По умолчанию

Виталик,спасибо за код.
а почему при запуске смещается сетка грида?
а при изменении записи все жестко виснет..

Последний раз редактировалось kate158; 31.07.2009 в 09:29.
kate158 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Выравнивание текста, моргающий курсор alikon1 Общие вопросы Delphi 6 17.04.2009 00:41
Выравнивание искаженного текста RealKultura Общие вопросы C/C++ 0 19.12.2008 23:25
Выравнивание текста SeregaIRK Общие вопросы Delphi 4 21.07.2008 15:17
выравнивание текста по ширине Алёна Общие вопросы Delphi 6 18.04.2007 11:31