Скачать: CL | DM;

Работа со StringGrid ом   Найти похожие ветки 

← →
TolikM   (2003-07-08 17:00) [0]

Подскажите как сделать, чтобы текст в ячейке показывался в несколько строк.

---

← →
Игорь Шевченко ©   (2003-07-08 18:04) [1]

На событии OnDrawCell написать DrawText (...., DT_WORDBREAK)
и не забыть сделать высоту строки StringGrid"а такую, чтобы можно было в несколько строк вывести.

---

← →
MBo ©   (2003-07-08 18:04) [2]

по OnDrawCell рисовать текст самому, например, с использованием функции DrawText

---

← →
VAleksey ©   (2003-07-08 18:26) [3]

>
> Игорь Шевченко © (08.07.03 18:04)


> MBo © (08.07.03 18:04)


:-)
Телепаты блин.

---

← →
MBo ©   (2003-07-08 18:44) [4]

>VAleksey
Сам видишь, эту мысль пришлось около часа обдумывать ;)

---

← →
TolikM   (2003-07-09 11:45) [5]

На событие OnDrawCell пишу
DrawText(StringGrid1.Canvas.Handle,PChar(StringGrid1.Cells[ACol,ARow]),-1,Rect,DT_WORDBREAK). Выводится только одна строка.
В чем ошибка?
P.S. Высота строки достаточная.

---

← →
MBo ©   (2003-07-09 12:07) [6]

У меня в несколько строк:

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
StringGrid1.Canvas.FillRect(Rect);
DrawText(StringGrid1.Canvas.Handle,PChar(StringGrid1.Cells[ACol,ARow]),-1,
Rect,DT_WORDBREAK);
end;

---

← →
TolikM   (2003-07-09 12:47) [7]

Теперь работает. Спасибо.

---

← →
TolikM   (2003-07-09 12:51) [8]

Понял! Переносит только при наличии пробела.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.99 c