名前 題名 ▼ Mr.XRAYさん > 今試したらイベント内でも可能なようです． > > procedure TForm1.plTackPrint1BeforePageDraw(Sneder: TObject; DataNo, > Page: Integer); > var > Str : String; > begin > plTackPrev1.AddPageCount:=3: > if Page>plTackPrev1.OriginPageCount then begin > Str:=IntToStr(Page-plTackPrev1.OriginPageCount); > plTackPrev1.FontSize(50); > plTackPrev1.TextOut(100,100,'追加の '+Str+'頁目です'); > exit; > end; > > >いつもリクエストに迅速なご対応を頂き、心から感謝しております。 > > 実は必ずしも迅速ではないんです． > メールでの問合わせ分が溜まっています．メールで問合わせている方， > ゴメンなさい．ぼちぼちやっていますので．m(_ _)m > > 別に優先順位があるわけではないのですが，どうしてもレスポンスがいい > 方に対して反応する様です (^^ゞ > GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link