掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
QRShapeの動的生成 (ID：21550)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
やってみましたが、新たな問題があります。 サイズの変更に際して、動的に位置決めをしたいので、アプリ起動時にCreateしたものをPrint&Preview前に再度呼び出してプロパティを設定したいのです。 が、以下のコードだとメモリーエラーになります。 ログを探しているのですが、自分に理解できる内容のモノがみつかりません。 //起動時(Form2にQuickReportを配置) procedure TForm2.FormCreate(Sender:TObject); var CreateLabel: TQRLabel; begin CreateLabel := TQRLabel.Create(QuickRep); CreateLabel.Parent := QuickRep; CreateLabel.Name := 'QLabelX'; end; //印刷前 //procedure TForm2.BeforePrint(Sender: TCustomQuickRep;var PrintReport: Boolean); begin TQRLabel('QLabelX').Caption := '出力文字'; TQRLabel(FindComponent('QLabelX')).Caption := '出力文字'; end; procedure TForm1.PreviewButton(Sender:TObject); begin QucikRep.Preview; end; 自分でも「FindComponent」や「動的生成」などで探してはいるんですが… f(^_^;)
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.