Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Работа с Мемо компонентами

Страницы: < 1 2
r900000 © (2009-01-13 08:29:00)
Доброе утро.
У меня возник такой вопрос. Можно ли при использовании Мемо компонентов в виде строки сделать так, чтобы грубо говоря стобцы в этих компонентах располагались начиная одинаково с одной позиции?
Например
Мемо1:
1 rty u qwertyi
Memo2:
20 a dfg e
Такая вещь не помогает:
while not ((strtoint(sleftpr)<=form1.Canvas.TextWidth(s1)+ strtoint(sleft1))) do
s1:=s1+' ';

r900000 (2009-01-13 12:10:00) [21]
Да все в fastreporte рисуется динамически.

clickmaker (2009-01-13 12:09:00) [22]
> А гдеж рисуешь верт полосы?)

наверно, это столбики | :)

{RASkov} (2009-01-13 12:06:00) [23]
> [12] r900000 (13.01.09 12:02)
> А у мемо Canvas разве ест

А гдеж рисуешь верт полосы?)

r900000 (2009-01-13 12:05:00) [24]
А как Format здесь использовать
Да нет я вообще динамически создаю элементы в fastreporte, а так по отдельным элементам выходит долго, пробую создать построчно.

r900000 (2009-01-13 12:02:00) [25]
А у мемо Canvas разве есть и потом для формы я ставлю размер и шрифт моноширный.

{RASkov} (2009-01-13 12:01:00) [26]
Если на то пошло, то лучше ТПаинтБокс в таком плане использовать....

{RASkov} (2009-01-13 12:00:00) [27]
> но у меня еще вертикальные линии рисуются между столбцами

В Мемо.... А гридах мы эти самые линии убираем :)
Зачем такие извраты?)

Сергей М. (2009-01-13 11:57:00) [28]

> while not ((strtoint(sleftpr)<=form1.Canvas.TextWidth(s1)+
> strtoint(sleft1))) do
> s1:=s1+' ';

Что это вообще за беда ?
Причем здесь канва формы, если текст выводится на канву мемо?

r900000 (2009-01-13 11:53:00) [29]
Да сейчас он вроде в строках с одной позиции выводит и вроде вот это условие выполняется:
while not ((strtoint(sleftpr)<=form1.Canvas.TextWidth(s1)+ strtoint(sleft1))) do
s1:=s1+' ';
но у меня еще вертикальные линии рисуются между столбцами
и там почему-то sleftpr отличается от начала значения столбца, в чем может быть ошибка?

Строка 1
73-73
123-129
723-724
843-843
963-969
1083-1088
1203-1207
1323-1326
1443-1445
1563-1564
1683-1683
1803-1809
1923-1928
2043-2047
2163-2166
2283-2285
2403-2404
2523-2523
2643-2649
2763-2768
2883-2887
3003-3006
3123-3125
3243-3244
3363-3363
3483-3489
3603-3608
3723-3727
3843-3846
3963-3965
Строка 2
73-73
123-129
723-724
843-843
963-969
1083-1088
1203-1207
1323-1326
1443-1445
1563-1564
1683-1683
1803-1809
1923-1928
2043-2047
2163-2166
2283-2285
2403-2404
2523-2523
2643-2649
2763-2768
2883-2887
3003-3006
3123-3125
3243-3244
3363-3363
3483-3489
3603-3608
3723-3727
3843-3846
3963-3965

{RASkov} (2009-01-13 11:43:00) [30]
Да, и вместо этого:

> while not ((strtoint(sleftpr)<=form1.Canvas.TextWidth(s1)
> + strtoint(sleft1))) do
> s1:=s1+' ';

лучше использовать Format для моноширных шрифтов.....

MBo (2009-01-13 09:57:00) [31]
courier new

Сергей М. (2009-01-13 09:49:00) [32]

> ещё можно какой-нибудь

Можно. Ищи сам среди имеющихся у тебя.

r900000 (2009-01-13 09:44:00) [33]
А ещё можно какой-нибудь, а то этот жирноват будет?

Сергей М. (2009-01-13 09:38:00) [34]

> какой это шрифт?

Например, Fixedsys

r900000 (2009-01-13 09:31:00) [35]
Можно, если в св-ве Font указать моноширный фонт.
А какой это шрифт? как его название?

Сергей М. (2009-01-13 09:08:00) [36]
Можно, если в св-ве Font указать моноширный фонт.

Страницы: < 1 2

Наверх

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