Форум: "Базы";
Текущий архив: 2003.11.03;
Скачать: [xml.tar.bz2];
Вниз
Quick report Найти похожие ветки
← →
Dimon123 (2003-10-13 16:03) [0]Нужно в DetailBand-е разделить колонки вертикальными линиями. Высота одной строки варьируется в зависимости от значения одной из колонок.
Подскажите как.
← →
DenK_vrtz (2003-10-13 16:08) [1]QRShape
Shape - qrsVertLine
Height - ? (в зависимости от высоты колонки)
← →
Dimon123 (2003-10-13 16:13) [2]Проблема в том что высоту колонки нельзя узнать
← →
stud (2003-10-13 16:27) [3]оставь надежду....))))) многие пытались это сделать, хотя высоту и можно узнать, но все это чревато глюками и т.д. попробуй подобрать высоту фиксированную
← →
Dimon123 (2003-10-13 16:39) [4]а как ее узнать эту высоту?
← →
stud (2003-10-13 16:42) [5]в обработчике онпринт банда посмотреть высоту самого высокого компонента. поищи по форуму.
← →
Dimon123 (2003-10-13 16:45) [6]фишка в том что он в свойстве Height в момент онпринт он показывает не реальную высоту а высоту которую я задал при дезайне
← →
stud (2003-10-13 16:46) [7]поищи в форуме, я тут долго дискутировал на данную тему. там и код есть
← →
dmtr (2003-10-13 16:51) [8]2 Dimon123
Димон, твоя фамилия случайно не Носик?
← →
Dimon123 (2003-10-13 17:15) [9]А не подскажешь шде искать а то я ищу и не найду что-то
← →
Dimon123 (2003-10-13 17:15) [10]Нет не носик
← →
stud (2003-10-13 17:26) [11]наверное уже в архиве все. но я отказался от такой затеи потомучто начались глюки при выводе на печать. т.е. несоответствие между тем что видиш на экране и тем, выходит на принтер
← →
stud (2003-10-13 17:26) [12]наверное уже в архиве все. но я отказался от такой затеи потомучто начались глюки при выводе на печать. т.е. несоответствие между тем что видиш на экране и тем, выходит на принтер
← →
Dimon123 (2003-10-13 17:36) [13]ну это стандартный глюк
он у меня и без этого есть
это не страшно
← →
stud (2003-10-13 17:38) [14]так зачем его усугублять))))))
← →
Dimon123 (2003-10-13 17:39) [15]клыент просит
← →
stud (2003-10-13 17:46) [16]попробуй фастрепорт
← →
dmtr (2003-10-13 17:53) [17]Мой совет - откажись от этой идеи. Я реаизовал прорисовку сетки в зависимости от высоты строки. Прорисовывал сетку при помощи Shape-ов. Вот пример, но учти, что если шрифт TrueType, то могут быть глюки, хотя довольно редко. Но все равно, это все не серьезно.
procedure TOutReportForm.QRBand3BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
var
LinesCount, TempLinesCount: Integer;
CustomHeight: Integer;
BetweenLinesSize: Integer;
AdvancedCoeff: Integer;
begin
BetweenLinesSize := 5;
LinesCount := Ceil(Length(QRDBText1.DataSet.FieldByName("material_name").AsString) / 26);
TempLinesCount := Ceil(Length(QRDBText2.DataSet.FieldByName("sign").AsString) / 25);
LinesCount := Max(LinesCount, TempLinesCount);
if LinesCount = 1 then
AdvancedCoeff := 4
else if LinesCount = 2 then
AdvancedCoeff := 3
else if LinesCount = 3 then
AdvancedCoeff := 2
else if LinesCount = 4 then
AdvancedCoeff := 1;
CustomHeight := ((BetweenLinesSize * LinesCount) + AdvancedCoeff) + (QRDBText1.Font.Size * LinesCount);
QRShape14.Height := CustomHeight;
QRShape15.Height := CustomHeight;
QRShape16.Height := CustomHeight;
QRShape17.Height := CustomHeight;
QRShape18.Height := CustomHeight;
QRShape19.Height := CustomHeight;
end;
← →
Dimon123 (2003-10-13 18:01) [18]спасибо
я тоже нашел более менее приемлемое решение
QRShape.Height := 200 :)
мне больше и не нужно
а видно только ту часть которая попадает в BAND
← →
stud (2003-10-13 18:26) [19]ага, и еще иногда снизу торчать начинают))))
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.11.03;
Скачать: [xml.tar.bz2];
Память: 0.48 MB
Время: 0.009 c
