Текущий архив: 2003.07.07;
Скачать: CL | DM;
Вниз
Растягивание текста по ширине Найти похожие ветки
← →
OHP (2003-06-24 00:07) [0]Как можно растянуть текст по ширине, как это делает ворд?
← →
INCOGNITO © (2003-06-24 00:10) [1]Всмысле?
Графический текст чтоль?
← →
Спрашивающий_ (2003-06-24 01:32) [2]Добавить пробелы между словами.
← →
OHP (2003-06-25 00:14) [3]Не графический, а дается там допустим 400 пикселов ширина текстового поля, напечатал три слова и нужно их по всей строке размазать
← →
ЮЮ © (2003-06-25 05:21) [4]Где напечатал? В какой строке?
Печатать по словам:
1) получить список слов WordsList
2) dX := (<компонент>.Canvas.TextWidht(str) - 400)/(WordsList.Count - 1);
3)
p := 0;
i := 0
While i < WordsList.Count do begin
Canvas.TextOut(p, Y, WordsList[i]);
inc(p, (<компонент>.Canvas.TextWidht(WordsList[i]) + dx);
end;
← →
Song © (2003-06-25 08:21) [5]DrawText()
Страницы: 1 вся ветка
Текущий архив: 2003.07.07;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.012 c
