DBを使わずにform1のeditの中身をQuickReportのQRDBTextやQRLabelなどに代入する方法がわかりません。
かなり初歩的な事だと思いますが、分かる方いらしたらよろしくお願いします。
QRPイベントOnNeedData内で代入したらいけるよ。
procedure TQuickReport2.QuickRepNeedData(Sender: TObject;
var MoreData: Boolean);
begin
TQRLabel(FindComponent('Moji')).Caption := Form1.Edit1.Text;
end;
うろおぼえ様
アドバイスありがとうございました。
大変参考になりました。今後もよろしくお願い致します。
ツイート | ![]() |