Как подчеркнуть выбранные банды?
if VarToStr(<FrxPrintSortTbl."pr_print">) <> '' then begin
// подчеркнуть
end else begin
// не надо
end;
1. Пытался как в QR - но в FrBand нет frame
2. Бросил на банд линию - при перемещении на bottom она с него слетает и становится частью Page.
3. Подчеркивать каждые frxText отдельно? Можно ли получить список всех frxText-ов банда?
// подчеркнуть
end else begin
// не надо
end;
1. Пытался как в QR - но в FrBand нет frame
2. Бросил на банд линию - при перемещении на bottom она с него слетает и становится частью Page.
3. Подчеркивать каждые frxText отдельно? Можно ли получить список всех frxText-ов банда?
Комментарии
Memo := TfrxMemoView.Create(Band);
With Memo do
begin
CreateUniqueName;
SetBounds(Band.Left, Band.Top, Band.Width, Band.Height);
Frame.Typ := [ftBottom];
end;
2. Не надо делать с помощью линий. Гимор и работать будет медленне (и неудобно).
3. Да отдельно работай. У тебя же их не 100. У тебя их максимум 20. А список всех полей-текстов можно получить через Parent.
Кроме вышесказанного можно делать через Frame.Typ := [ftBottom]; (как тебе уже подсказали), можно работать со стилем шрифта, можно еще html-тэги использовать (фича 3.* - правда я сам еще ни разу не использовал, только смотрел, проверял - вроде пашет).
Насчёт "нагло врёшь" - я уже привык, такова се ля ви, с меня как с гуся вода.
Но именно у меня почему-то именно вот эта строка не воспринимается:
MasterData1.Frame.Typ := [ftBottom];
Говорит "неопределённый идентификатор Frame".
А в QR сейчас специально глянул
QRBand1.Frame.DrawBottom := true - работает
MasterData1.Frame.Typ := ftBottom;
или для других вариантов........
MasterData1.Frame.Typ := ftTop+ftBottom;
MasterData1.Frame.Typ := ftLeft+ftRight+ftTop+ftBottom;
Скопировал свой текст, а потом не глядя заменил имя моего мемо на имя
из твоего примера... а это было имя бэнда...
Рамки устанавливаются у каждого конкретного TfrxMemoView,
например:
Memo70.Height := 16;
Memo70.Frame.Typ := ftTop;
Memo71.Height := 16;
Memo71.Frame.Typ := ftLeft+ftRight+ftTop+ftBottom;