Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Обрезание строки в ячейке stringgrida [D6, WinXP]


Gurd ©   (2008-10-30 11:39:00) 

Здравствуйте, подскажите как можно реализовать визуальное обрезание строки в ячейке stringgrida, т.е. есть текст

'спасибо за помощь' --- он не помещается в ячейке, надо сделать
'спасибо за по...' --- как-то так

Размер ячейки не меняется.


Gurd   (2008-10-30 12:29:00) [1]

Спасибо, разобрался DrawText + DT_END_ELLIPSIS, оказалось асе просто.


{RASkov}   (2008-10-30 12:20:00) [2]

> [3] Gurd   (30.10.08 12:14)
> что возвращает функция  Cells[i,j] .Text

Это не функция, а свойство стринггрида.... более точным - содержимое конкретной ячейки. Только Text не нужно...

> и по символьно сравнивать ее с шириной ячейки

Посмотри на [2] и попробуй найти примеры(их куча) с использованием Api DrawText....


Gurd   (2008-10-30 12:14:00) [3]

Не совсем понятно, что возвращает функция  Cells[i,j].Text, как то не получается ее вызвать.

Как я понял надо взять строку и по символьно сравнивать ее с шириной ячейки, как только она нужной длины, то добавляем '...' и выводим?


{RASkov}   (2008-10-30 12:03:00) [4]

Альтернатива [1]
DrawText + DT_END_ELLIPSIS ну и F1
OnDrawCell


Johnmen   (2008-10-30 11:55:00) [5]

Кури следующие число-буквенные последоватьности:
Cells[i,j].Text
Canvas.TextWidth
Copy
+'...'
if


Наверх

Титульная страница Поиск, карта сайта Написать письмо