| Версия для печати
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум на Исходниках.RU > Delphi: Базы данных > Пододвинуть мемо-компонент под другой (QReport) |
| Автор: sanik 05.11.03, 23:23 |
| Привет! QREPORT (переход на другие продкуты не предлагать) никак не могу заставить поддвигать два мемо бокса один под другой в зависимости от содержимого. Смысл всего этого такой делать минимального размера адекватный бокс для первого текста и ессно следущий блок должен начинаться сразу после этого блока (через название блока в виде QRLabel) "обычно" везде делается заранее большой frame для обоих мемо-полей - но в случае маленького текста в таблице = 90% пустоты - этого и надо избежать dbDetails - мемо 1 потом идет QRLabel - название следущего блока dbServices - мемо 2 я пытаюсь на событие OnBeforePrint для моего detailbanda навесить QRBand2.Refresh; QRBand2.Repaint; Service_Label.Top:=dbDetails.Top+dbDetails.Height + 17; dbServices.Top :=Service_Label.Top+Service_Label.Height + 17; пытался выводить в QRDBText, QRLabel пытался на событие OnAfterPrint она как-то дико обрабатывает ситуацию для новой строки из таблицы первую, может-быть, обработает - но потом уже замораживается и не реагирует на размер первого мемо-блока то етсь помнит первое вычисление и никакие усилия не помогают снести из памяти эти "константы" |