master-detail
Здравствуйте! Подскажите что делать. Delphi 6, FastRepotr 2.47
Есть два запроса, связанные между собой IBQuery1 и IBQuery2. Связь работает! Мне необходимо получить отчёт типа:
мастер1
детаил1
детаил2
детаил3
мастер2
......
В отчёте на секцию Master Data кинул поля из IBQuery1, а на Detail Data из IBQuery2. При формировании отчета master-detail записи мастера отображаются, а DETAIL СТОЯТ НА МЕСТЕ, примерно так:
мастер1
детаил(последняя запись)
мастер2
детаил(последняя запись)
......
Подскажите, где моя ошибка! Облазил весь форум, нашёл несколько подобных тем, но конкретных ответов там не было. Вот код для запуска отчёта, может здесь допустил ошибку:
procedure Totpuskf.Button5Click(Sender: TObject);
var
b: string;
begin
inherited;
b := IBQuery1.Bookmark;
try
IBQuery1.First;
IBQuery1.DisableControls;
frReport8.PrepareReport;
finally
IBQuery1.EnableControls;
frReport8.ShowPreparedReport;
IBQuery1.Bookmark := b;
end;
Заранее благодарю!
Есть два запроса, связанные между собой IBQuery1 и IBQuery2. Связь работает! Мне необходимо получить отчёт типа:
мастер1
детаил1
детаил2
детаил3
мастер2
......
В отчёте на секцию Master Data кинул поля из IBQuery1, а на Detail Data из IBQuery2. При формировании отчета master-detail записи мастера отображаются, а DETAIL СТОЯТ НА МЕСТЕ, примерно так:
мастер1
детаил(последняя запись)
мастер2
детаил(последняя запись)
......
Подскажите, где моя ошибка! Облазил весь форум, нашёл несколько подобных тем, но конкретных ответов там не было. Вот код для запуска отчёта, может здесь допустил ошибку:
procedure Totpuskf.Button5Click(Sender: TObject);
var
b: string;
begin
inherited;
b := IBQuery1.Bookmark;
try
IBQuery1.First;
IBQuery1.DisableControls;
frReport8.PrepareReport;
finally
IBQuery1.EnableControls;
frReport8.ShowPreparedReport;
IBQuery1.Bookmark := b;
end;
Заранее благодарю!
Комментарии
b := IBQuery1.Bookmark;
try
IBQuery1.First;
frReport8.PrepareReport;
finally
frReport8.ShowPreparedReport;
IBQuery1.Bookmark := b;
end;
Тоже самое!