Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / ...текст в нескольно строк ... / 6 сообщений из 6, страница 1 из 1
28.08.2003, 15:22
    #32250210
var_max
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...текст в нескольно строк ...
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Привет.
Подскажите как нарисовать на форме текст в нескольно строк за один проход.
Листинг не пашет. Почему?

Canvas.TextOut( 100 ,  100 , 'Здесь первая строка текста'+# 13 # 10 +
'А здесь должна быть вторая');

Так тоже не пашет:

Canvas.TextOut( 100 ,  100 , 'Здесь первая строка текста'+# 13 # 10 +'А здесь должна быть вторая');

Опять пишет все в одну строку!!!

Заранее благодарен.
...
Рейтинг: 0 / 0
28.08.2003, 15:24
    #32250213
JibSkeart
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...текст в нескольно строк ...
интерестно а как енто в графическом режиме он будет переводить какретку на следущюю строчку ????

и ваще какую такую какретку итд ...
...
Рейтинг: 0 / 0
28.08.2003, 16:01
    #32250290
CrazyMihey
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...текст в нескольно строк ...
Код: plaintext
1.
2.
Canvas.TextOut( 100 ,  100 , 'Здесь первая строка текста');
Canvas.TextOut( 100 ,  100  + Canvas.TextHeight('Здесь первая строка текста'){ +  2 }, 'А здесь должна быть вторая');
...
Рейтинг: 0 / 0
28.08.2003, 16:05
    #32250297
Глупый
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...текст в нескольно строк ...
Читай нормально HELP
Там сказано

TextOut method (TCanvas)

Writes a string on the canvas, starting at the point (X,Y), and then updates the PenPos to the end of the string.
...
Рейтинг: 0 / 0
28.08.2003, 16:29
    #32250339
НЕ_БОГ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...текст в нескольно строк ...
А кавадрат для текста определить слабо?
Тогда, при wrap = true все работать будет.
...
Рейтинг: 0 / 0
01.09.2003, 08:29
    #32252287
nester
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...текст в нескольно строк ...
Вуаля:

Код: plaintext
1.
2.
3.
4.
5.
var R: TRect;
...
  R := Rect( 100 ,  100 ,  32767 ,  32767 );
  DrawText(Canvas.Handle, PChar('Строка 1'# 13 'Строка 2'), - 1 , R,
    DT_LEFT or DT_TOP);
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / ...текст в нескольно строк ... / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]