Fastreport как поднять Memo вверх на место пустых Memo?
Подскажите, пожалуйста.
Есть пять memo. 1-4 memo могут быть пустыми, какие свойства поставить у memo5, чтобы он поднимался наверх вместо memo4 и тд? Я пока в коде прописала в лоб условие отсупа top... но а если будет 4 memo сверху и из них не все пустые, как-то топорный метод. С Child-ами не вижу решения, так как логика не табличная.
Пока так для 2ух memo:
Заранее благодарю за помощь!
Есть пять memo. 1-4 memo могут быть пустыми, какие свойства поставить у memo5, чтобы он поднимался наверх вместо memo4 и тд? Я пока в коде прописала в лоб условие отсупа top... но а если будет 4 memo сверху и из них не все пустые, как-то топорный метод. С Child-ами не вижу решения, так как логика не табличная.
Пока так для 2ух memo:
procedure Memo2OnBeforePrint(Sender: TfrxComponent);
begin
if (Memo1.Text <> '') then
begin
Memo1.Visible:=false;
Memo1.Height:=0;
Memo2.Top:= Memo1.Top+Memo498.Height;
end
else
begin
memo498.Visible:=true;
end;
end;
Заранее благодарю за помощь!
Комментарии