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

Вниз

Выравнивание текста в ячейках StringGrid   Найти похожие ветки 

 
ize ©   (2002-07-10 11:08) [0]

Народ! подскажите, кто знает, как сделать выравнивание текста по правому краю в одном столбце объекта TStringGrid.


 
Skier ©   (2002-07-10 11:28) [1]

>ize
В обработчике OnDrawCell
напиши примерно так :


procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
with Sender as TStringGrid do begin
if ACol = 1 then //для первой колонки
Canvas.TextRect(Rect,
Rect.Right-Canvas.TextWidth(Cells[ACol,
ARow])-2,
Rect.Top+2,
Cells[ACol, ARow]);
end; //with
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
6-70848
Фантом
2002-05-11 10:56
2002.07.22
Преобразование IP


14-70857
MVova
2002-06-21 16:50
2002.07.22
Стиль написания.


14-70864
Алоэ
2002-06-22 22:26
2002.07.22
Как подключить локалку к инету ?


1-70686
tsarevep
2002-07-10 02:41
2002.07.22
Передать параметр первой копии программы


3-70658
ize
2002-07-02 11:32
2002.07.22
DBGrid + ADOTable