Работа с Tfrxpreview
Поясните, пожалуйста, как работать с TfrxPreview.
Хотелось чтобы при переходе одной записи в БД на другую показывался небольшой стикер, который создан и храниться в той же БД.
Пишу:
но ничего не отображается..
Хотелось чтобы при переходе одной записи в БД на другую показывался небольшой стикер, который создан и храниться в той же БД.
Пишу:
procedure TMainForm.GridOnSelectRecord(Sender: TTableView; ARecord: TRecord;var AAllow: Boolean);
var ReportStream: Tstream;
begin
ReportStream:=DMForm.DSet1.CreateBlobStream(DMForm.DSet1.FBN('GSTICKER'),bmRead);
frxReport1.LoadFromStream(ReportStream);
frxReport1.Preview := frxPreview1;
frxreport1.PrepareReport();
frxreport1.ShowPreparedReport;
end;
но ничего не отображается..
Комментарии