Как изменить в QReport положение TQRDBTEXT на лету?

← →
Zigs © (2003-07-01 15:41) [0]

Нужно при печати (предпросмотре) изменять положение некоторых таких компонентов, в зависимости от текста, в них содержащихся. В какое событие запихнуть эту обработку?
Спасибо

← →
Johnmen © (2003-07-01 15:46) [1]

BeforPrint для бенда...

← →
Zigs © (2003-07-01 16:00) [2]

Да НЕ работает так, к сожалению

← →
Семен Сорокин © (2003-07-01 16:10) [3]

Zigs © (01.07.03 16:00)
а у меня работает

← →
Anatoly Podgoretsky © (2003-07-01 16:14) [4]

Zigs © (01.07.03 16:00)
Может у тебя ошибка?

← →
Zigs © (2003-07-01 16:35) [5]

Да, действительно работает, наверное где то в расчетах ошибка
Всем спасибо.

← →
Семен Сорокин © (2003-07-01 16:37) [6]

:))

← →
Zigs © (2003-07-01 17:32) [7]

Вот проблема, двигать научился, но не могу рассчитать значение.
Нужно напечатать так: text1 / text2. Text1 - может быть разный и слеш и второй текст должен быть в конце первого. Вот и не могу вычислить это значение.
Помогите пожалуйста.

← →
Семен Сорокин © (2003-07-01 17:39) [8]

используй:
1. AutoSize=true
2. Canvas.TextWidth()

← →
Zigs © (2003-07-01 17:42) [9]

AutoSize почему то не работает в меньшую сторону, т.е. если текст больше, чем размер компонента, то он увеличивается, но не уменьшается если меньше.

← →
Семен Сорокин © (2003-07-01 17:49) [10]

Zigs © (01.07.03 17:42)
неправда твоя, может у тебя там пробелы, тогда Trim поставь

← →
Zigs © (2003-07-01 17:56) [11]

Нету там пробелов. Кстати, а почему тогда Width не изменяется.
И еще, на каком канвасе делать TextWidth?

TRIM(text1) + " / " + TRIM(text2)

Хе, было бы все так просто было бы не интересно, но один из этих текстов должен быть подчеркнутым при печати :)

Нету там пробелов. Кстати, а почему тогда Width не изменяется.
он и не должен изменяться, ведь AutoSize=true, и Width подбирается по длине текста
на каком канвасе делать TextWidth?
на любом (я делал на Canvas"e формы), только Font не забудь при Assignить

я сделал более извращеннее :)
var
_TextWidth: integer;
textMetrica: tagTEXTMETRICA;
begin
GetTextMetrics(GetDC(qrContract.Handle), textMetrica);
_TextWidth := length(text1) * textMetrica.tmAveCharWidth;

Скачай книги по Quick Report 2/3 и также FAQ, полегчает.

Как изменить в QReport положение TQRDBTEXT на лету? Найти похожие ветки