初めての投稿になります、本田です。

現在、Crystal Report for Visual Studio .NET（.NETに標準でついていたもの）を使用して、帳票を作成しています。 

「CrystalReport」に図面Pdfファイルを表示させ、文字情報を付与し、
出力させたいのですが、いろいろと調べてますがわかりません。

Adobe ActiveX Controlを参照設定しましたが、
フォームには貼り付けられてもCRには貼り付けできません。
ツールボタンが使用不可状態になってしまいます。

CR上にPdfファイルを表示する方法を教えて頂けないでしょうか？  

よろしくお願いします。

【開発環境】

OS　                  ：　WindowsXP Pro(SP2)

.NET　                ：　Microsoft Visual Studio .NET 2002（VB使用）

クリスタルレポート　：　Crystal Report for Visual Studio .NET

 

はじめまして、うにと申します。

CrystalReportでいくつか帳票を作成していましたが、
タイトルのような帳票は今まで作成したことがありませんでした。
お客様からどうしてもこのレイアウトで出力してほしいといわれています。

例１／
｜　１ページ目　｜
------------------
列１　列２　合計
値　　値　　値
値　　値　　値
------------------

例２／
｜　１ページ目　｜　２ページ目　｜
----------------------------------
列１　列２　列３　列４　合計
値　　値　　値　　値　　値
値　　値　　値　　値　　値
----------------------------------

横の列の数が可変なためにクロス集計で出力しようとしています。
実現する方法があるのかないのかもわからず、
検索などをしているのですが途方に暮れています。

また、その際にヘッダーやフッターなどを表示する方法も不明です。
一応公式FAQに似たようなことは書いてありますが、あらかじめページ数が分かっていないと設定できないようです。
http://japan.crystaldecisions.com/support/crystalreports85/faq.asp

追加で必要な情報がありましたら書き込みますので何卒よろしくお願いします。

すみません。マジボケでしたそして解決しちゃいました。

実は、レポートのテーブルを変更して、(保存先を変更)
エリアスを元の名前にしていたのですが、それだともともと定義していた
20文字がデータ長でずっと変わりませんでした。

テーブルを削除して、もう新しいテーブル追加し、エリアス名も変更し、フィールドを追加しなおしたら24文字で表示できました。

保存先の変更だけだとデータ長って変わらないんですね・・・

もっとやったこともちゃんと書けばよかったです。

猿町 様 ありがとうございました。

初めまして、山と申します。

この度、始めてクリスタルレポートの開発をすることになり、こちらにお邪魔させていただきました。
まったくクリスタルレポートの入り口すら分からなかったのですが、こちらのホームページのおかげでかなり理解することができました。

さて、ここで質問なのですが、あらかじめテーブルのフィールド名やフィールド数が分かっている場合は問題ないのですが、動的にテーブルを追加することは可能ですか？
今現在、プログラム実行中にTable（DataSetは始めからあり）を作成して、それをクリスタルレポートで印刷しようと検討しております。
クリスタルレポートのソースなどを表示して修正できるものなのでしょうか？
動的に作成するため当然、デザインも動的にプログラム内部で作成する必要があるので無理なのでしょうか？

文章がヘタなのでわかりにくいと思いますが、どうぞお教え願います。

自己レスです。問題解決しました。http://groups.yahoo.com/group/CrystalReportsDotNet/message/2214ここにそのままやり方がのっていました。どうもご迷惑おかけしました。

すいません。再度基本的な質問です。入門編を見て、DataSetをつくり、それをクリスタルレポートに表示できるようにしているのですが、データグリッドには表示できてもクリスタルレポートには表示できませんでした。CrystalReport Rep = new CrystalReport();
      RepDataset Repds = new RepDataset();
   Repds.Clear();
   RepDataset.table1Row TR = (RepDataset.table1Row)Repds.table1.NewRow();
   TR.BeginEdit();
   TR.element1= "1";
   TR.EndEdit();
   Repds.table1.Rows.Add(TR);
          
            Rep.SetDataSource(Repds);
   dataGrid1.DataSource = Repds.table1;
   crystalReportViewer1.ReportSource = Rep;という風にしたのですがなにかおかしいんでしょうか？

はじめまして、タグチといいます。
2004/09/27　の『フジ』さんの投稿と同じなのですが、

開発環境とテスト環境で印刷する用紙設定が違ってくるという現象が発生しています。
開発環境ではデザイン時に右クリック→デザイン→プリンタの設定で用紙サイズを設定し
デバッグでは設定したサイズでプレビュー、印刷ができます。
しかし、テスト環境へインストールすると用紙サイズがまったく違ってプレビュー、印刷されます。ロジックでは用紙サイズは設定していません。
対策方法などご存知の方はご教授ください。

用紙は『連続紙　たて4　1/2インチ』です。
ロジックで用紙設定出来ませんでしょうか?

はじめまして、私はクリスタルレポートを使うのは初めてなのですが、使っていて気になることがあったので質問します。クリスタルレポートには一ミリごとに目盛がついていて大変わかりやすく線オブジェクトなどミリ単位で配置できるのはいいのですが、そこに配置するフィールドは一ミリ単位で配置することはできないのでしょうか？

詳しく説明します。ミリ単位の帳票を作る必要があって、線オブジェクトやボックスオブジェクトでかなり細かい枠を作ったのですが、それにうまく当てはまるフィールドが書式の変更などで調整してもできません。書式の変更を使うよりさらに細かく調整する方法はあるのでしょうか？

始めまして。
　.NET、クリスタルレポート、SQLServerで開発が始まりました。
　.NETは今回初めてです。さっぱりわからなくて困ってます。
　ODBCを使わず、INIファイルを取得しServerにログインし、
　DBからデータを取得しクリスタルレポートでプレビューしろとの事です。

　上位プログラムでWORKファイルを作成し、ODBC経由でサクッと
　作表するつもりだったのにー！！！

　どうすればいいんだろう？？？INIファイル取得は共通関数があるようなのですが
　どうすればいいか教えてください！

ご回答、ありがとうございます。
やってみます！

猿町さん、ありがとうございました。
ＯＫでした。感謝します。

解決しました。お騒がせして申し訳ないです。

まずはグリッドを調節してみてください。グリッドにあわせて調整してくれるのでレイアウトは割としやすいと思われますが・・。グリッドが邪魔なのであれば　”グリッドにあわせる”のチェックをはずせばいいと思います。

有り難うございました。グリッドのチェックをはずしたところ
微調整が出来ました。「デフォルト」というところにグリッド
調整があったので発見できませんでした。
作業もとてもはかどるようになりました。
本当に有り難うございます。

僕も始めたばかりなんですよ。この掲示板にはかなり助けられています。お互い頑張りましょう。

むらちゃん様、

最初の質問のレポート、ページ、グループ、詳細等と上記の帳票レイアウトの関係
が見えないため、上記の帳票レイアウトから考えられる方法で回答します。
例えば、本体、追加、合計が同一グループ（枝番フィールド）でグループ挿入できる
と仮定して、枝番でグループを挿入することで罫線を挿入することでできるのではないでしょうか。
そのときに、以下の式フィールドでグループを挿入します。
WhileReadingRecords;
if {xxx.枝番} = 0 then
"本体"
else if {xxx.枝番} >= 1 and {xxx.枝番} <= 99 then
"追加"
else if
{xxx.枝番} = -1 then
"合計"
その結果、枝番は３つに分類でき、さらにグループの変更オプションから
指定順序で本体、追加、合計の順で設定します。
このグループヘッダーにもう一つセッションを下に挿入します。
グループヘッダーaに罫線を挿入します。
グループヘッダーbに以下の式を挿入します。
if {@上記の式フィールド名}= "本体" then "本 　体"
else if {@上記の式フィールド名}= "追加" then "追　加"
else if {@上記の式フィールド名}= "合計" then "合　計"
この式フィールドの書式設定で複数行に出力のオプションをチェックします。
また、横幅を1文字表示できるサイズに調整します。
グループヘッダーbで続くセクションをアンダーレイのオプションをチェックします。
次に、詳細にもセクションを下に挿入します。詳細aに表示するフィールドを挿入し、
詳細bに罫線を挿入します。その結果、以下のようなデザインイメージになります。
(枝番でグループ)
グループヘッダーa　------------------------------------------
グループヘッダーb  式フィールド（本体、追加、合計の表示）
詳細a　　　　　　　  　　　表示するフィールド
詳細b　　　　　　　　　  　------------------------------------
グループフッター     ----------------------------------------
このままでは、詳細の罫線とグループフッターの罫線がダブって表示されるところがあります。
そこで、以下の式を詳細bの非表示のオプションの条件式に挿入します。
OnLastRecord  or　{@グループヘッダーbに挿入した式フィールド名}<>next({@グループヘッダーbに挿入した式フィールド名})

ページヘッダー、フッター、他のグループ、改ページの条件、改ページの条件等に
ついては考慮していませんが、上記の帳票レイアウトに近い表示ができると思います。

もり様、

サブレポートにグループヘッダとフッタを挿入して、そのグループの表示が２ページ以上に跨る場合、グループヘッダはページ毎に表示されるがグループフッタは最後のページしか表示されないという問題でしょうか。
ページ毎にグループヘッダを出力のオプションを利用しているわけですね。
このオプションを設定してもグループフッタは、グループヘッダのようにページ毎に表示することはできません。
同一グループ内の最後のデータを表示した後にグループフッタを表示することになります。
そこで、2ページ以降のページ毎にグループフッタの内容を表示する方法ですが、
例えば、詳細セクションを利用します。この詳細セクションにグループフッタの内容をコピーし、挿入します。
ただ。デザインのイメージが分かりませんので、新しく挿入した詳細セクションで実現可能であるか自信はありません。
あと、1ページに表示する件数を固定にします。これは、グループフッタの内容を詳細セクションで表示させるために、同一ページ内で表示する最後のデータを判別できるようにします。
以下は、本掲示版のNo.195の応用です。（1ページに20行(レコード)の場合）
グループヘッダに以下の式フィールドを挿入します。
NumberVar lineNumber := 20;
NumberVar lineCounter := 0;

次に詳細aに以下の式フィールドを挿入します。
NumberVar lineNumber;
NumberVar lineCounter;
lineCounter := lineCounter + 1;
lineCounter := Remainder(lineCounter, lineNumber);

詳細bの出力後に改ページのオプションの条件式に以下の式を挿入します。
WhilePrintingRecords;
NumberVar lineNumber;
NumberVar lineCounter;
// 余り０の場合、
If Remainder(lineCounter, lineNumber) = 0 Then
// グループ内の最後のデータ ?
(If lineCounter = Count({xxxx.field1},{xxx.grfield1}) Then
// 改ページしない
   False
  Else
// 改ページする
   True
)
Else
// 改ページしない
False

さらに詳細bの非表示の条件式に以下の式を挿入します。
WhilePrintingRecords;
NumberVar lineNumber;
NumberVar lineCounter;
// グループ内のレコード件数が20以下か？
If Count({xxxx.field1},{xxx.grfield1}) < lineNumber Then
True
// グループ内の最後のデータか？
Else if lineCounter = Count({xxxx.field1},{xxx.grfield1}) Then
True
Else
// 1ページで表示可能な場合も非表示
lineCounter < lineNumber

この結果、以下の表示イメージとなると思います。
同一グループの内容が1ページで表示される場合、
グループヘッダ
詳細a
詳細b (非表示)
グループフッタ

同一グループの内容が2ページ以上で跨って表示される場合、
(1ページ目〜最終ページ−1まで)
グループヘッダ
詳細a
詳細b (ページの最後のデータのみ表示)

(最終ページ)
グループヘッダ
詳細a
詳細b (非表示)
グループフッタ

簡単なレポートで試したので複雑なもので期待されるような表示できるかわかりません。
上記を参考にして、応用して見てください。

む
ら
ち
ゃ
ん

むのあとに改行　らのあとに改行・・・
テキストオブジェクトをたてに長くすればいいんじゃないでしょうか

い 様、

Crystal Reports 9 では、挿入されたテキストオブジェクトの書式設定から複数行に出力をチェックし、そのオブジェクトの横幅を1文字のみ表示できるように調整します。さらに、テキストオブジェクトのフォントは、縦書きフォントを選択し、
書式設定からテキストの回転を270度とすることでできました。
但し、縦書きフォントは全角文字のみ対象のため、半角文字は270度回転された状態で表示されますので注意してください。

便乗質問で申し訳ないです。

縦書きフォントって名称を教えていただけませんでしょうか？
よろしくお願いいたします。

猿町様ありがとうございます。

結局、長いステップで見た目もよくないですが、強引に作成しました。
いろんな関数が充実していれば工数も削減できるんですがねえ。

--------------
--------------
--------------
--------------
上記のように、帳票ではじめから罫線を引いておく方法を教えて下さい。
データが0件の場合でも表示させたいです。
テーブルからデータをただ引っ張ってくるだけなんすが・・・。

ari様、

レポートに罫線を予め引いておく方法ですが、
Crystal Reports 9 では、ページヘッダーに罫線を引くことでできます。
1. ページヘッダーの領域に罫線を必要な行数分挿入します。
2. この時、行間は、詳細で表示したいデータの高さに合わせます。
3. ページヘッダーには、以下の式フィールドを作成し、挿入します。
(例えば、1ページに20行表示する場合)
WhilePrintingRecords;
NumberVar lineNumber := 20;
NumberVar lineCounter := 0;
4. 1ページに表示する行数を計算する式を作成し、詳細に挿入します。
WhilePrintingRecords;
NumberVar lineNumber;
NumberVar lineCounter;
lineCounter := lineCounter + 1;
lineCounter := Remainder(lineCounter, lineNumber);
5. ページヘッダーの続くセクションをアンダーレイのオプションをチェックします。
6.詳細の出力後に改ページのオプションの条件式に以下の式を挿入します。
WhilePrintingRecords;
{@上記4の式フィールド名} = 0
固定行数は、予め上記の変数lineNumberに設定することで変更可能です。
また、グループヘッダーでも同様に罫線を挿入して実現することもできます。

前回の回答は、ちょっと説明が間違ってましたね。
>２．ページヘッダーあるいは、ページフッターに挿入する式フィールド
>WhilePrintingRecords;
>NumberVar　全体ページ番号;
>全体ページ番号:=全体ページ番号+1;
これは、各ページのページ番号を表示します。
それと同時にページ全体の総ページ数は、以下のように表示します。
WhilePrintingRecords;
NumberVar 全体ページ番号;
全体ページ番号:=全体ページ番号+1;
全体ページ番号 & "/" & Totalpagecount
式フィールドのTotalPageCount関数を利用します。
お試しください。

ゴルゴ様へ、

すみません。TotalPageCount関数を利用しても駄目でした。
レポートにグループ毎のページ番号（N/M）と全体のページ番号(N/M)を表示することはできないようです。

猿町様

回答ありがとうございました。
早速、試してみます。

教えてください。

列単位に前の行と同一レコードを非表示にしたいのですが、出来るでしょうか？

 L1    | L2           | L3       |
--------------------
0001 | AAAAA   |   001   |
0001 | AAAAA   |   002   | 
0002 | AAAAA   |   001   | 

↓

 L1    | L2           | L3       |
--------------------
0001 | AAAAA   |   001   | 
         |                |   002   | 
0002 | AAAAA   |   001   |

という具合にしたいのですが・・・・

更に、L1がKEYなのでL2が全ての行一緒でも
KEY（L1）の先頭行は全て表示したいです。

よろしくお願いします。

TAKE様、

フィールドの書式設定の非表示オプションの条件式を利用することで
できると思います。
こんなかんじです。
//L1の場合
WhilePrintingRecords;
{xxx.L1} = Previous({xxx.L1})
なお、非表示オプションのチェックは不要です。

//L2の場合
WhilePrintingRecords;
{xxx.L1} = Previous({xxx.L1}) AND {xxx.L2} = Previous({xxx.L2}) 
なお、非表示オプションのチェックは不要です。

それぞれのフィールドの非表示の条件式を利用することになります。

はじめまして。クリスタルレポートは殆ど初心者です。
(VB4付属のものは使ったことがあるのですが、余りにも変わっていて
 以前の知識は役に立たないと思います。)
先週から色々試しながら開発を行っているのですが、どうしても
上手くいかず困っていたところ、この掲示板に出会いました。
お忙しいところ申し訳ございませんが、どなたかご教授頂けませんでしょうか？
宜しくお願い致します。

開発環境
　ＯＳ：Windows2000 SP4
　言語：ASP(HTML・VBS・JavaScriptを組み合わせて使用。.NETではありません。)

質問内容
　「CrystalReportsの7から9へのバージョンアップ方法について」

　現在、CrystalReports7で動作しているWEBシステムを、9で動作できるよう
　バージョンアップ対応を行っているのですが、上手くいきません。
　修正を行ったプログラムを動作させると、実行時エラー等は発生しないの
　ですが、WEB画面にCrystalReportsの枠のみ表示され、内容が表示されません。
　(枠の中には、WEB上で画像等の読み込みに失敗したときに表示されるような
　 ×マークが表示されます)

　修正した箇所は以下の通りです。
　　(1)参照するDLLの変更(「CRViewer.dll」から「crviewer9.dll」に変更)
　　(2)プロパティ名をバージョンアップ対応
　　　 (プロパティ「Has Stop Button」を「EnableStopButton」に変更する、等)
　　(3)9になって無くなったプロパティ「MorePrintEngineErrorMessages」を
　　　 記述してある部分を全てコメント化
　　(4)プロパティ「ParameterPromptingEnabled」を記述した部分でエラーが
　　　 発生したが、恐らくこのプロパティも9で無くなったものと
　　　 思われたためコメント化
　　(5)CrystalReportsオブジェクトの変更
　　　(今まで「Server.CreateObject("Crystal.CRPE.Application")」と
　　　 していた記述を
　　　「Server.CreateObject("Crystalruntime.Application.9")」に変更)
　　(6)7で作成した「.rpt」ファイルを9上で開いて上書き保存し、
　　　 9対応させる

　　(実際のコーディングの一部)
　　　　------------ 修 正 前 ------------------
　　　　<OBJECT ALIGN = LEFT ID="CRViewer"  WIDTH=100% HEIGHT=95%
　　　　 CLASSID="CLSID:C4847596-972C-11D0-9567-00A0C9273C2A"
　　　　 CODEBASE="/viewer/activeXViewer/CRViewer.dll#Version=1,2,0,30">
　　　　 <PARAM NAME="Report Name" VALUE="rptserver.asp">
　　　    <PARAM NAME="Show Group Tree" VALUE=1>
　　　    <PARAM NAME="Show Toolbar" VALUE=1>
　　　　　<PARAM NAME="Has Group Tree" VALUE=1>
　　　　　<PARAM NAME="Has Navigation Control" VALUE=1>
　　　　　<PARAM NAME="Has Stop Button" VALUE=1>
　　　　　<PARAM NAME="Has Print Button" VALUE=1>
　　　　　<PARAM NAME="Has Zoom Control" VALUE=1>
　　　　　<PARAM NAME="Has Close Button" VALUE=0>
　　　　　<PARAM NAME="Has Progress Control" VALUE=1>
　　　　　<PARAM NAME="Has Search Button" VALUE=1>
　　　　　<PARAM NAME="Has Refresh Button" VALUE=1>
　　　　　<PARAM NAME="Can Drill Down" VALUE=1>
　　　　　<PARAM NAME="Has Animation Control" VALUE=1>
　　　　</OBJECT>

　　　　------------ 修 正 後 ------------------
　　　　<OBJECT ALIGN = LEFT ID="CRViewer"  WIDTH=100% HEIGHT=95%
　　　　 CLASSID="CLSID:8767A745-088E-4CA6-8594-073D6D2DE57A"
       　CODEBASE="/crystalreportviewers/ActiveXViewer/
         crviewer9.dll#Version=9,2,1,175"">
　　　　　<PARAM NAME="Report Name" VALUE="rptserver.asp">
　　　　　<PARAM NAME="DisplayGroupTree"         VALUE=1>
　　　　　<PARAM NAME="DisplayToolbar"           VALUE=1>
　　　　　<PARAM NAME="EnableGroupTree"          VALUE=1>
　　　　　<PARAM NAME="EnableNavigationControls" VALUE=1>
　　　　　<PARAM NAME="EnableStopButton"         VALUE=1>
　　　　　<PARAM NAME="EnablePrintButton"        VALUE=1>
　　　　　<PARAM NAME="EnableZoomControl"        VALUE=1>
　　　　　<PARAM NAME="EnableCloseButton"        VALUE=0>
　　　　　<PARAM NAME="EnableProgressControl"    VALUE=1>
　　　　　<PARAM NAME="EnableSearchExpertButton" VALUE=1>
　　　　　<PARAM NAME="EnableRefreshButton"      VALUE=1>
　　　　　<PARAM NAME="EnableDrillDown"          VALUE=1>
　　　　　<PARAM NAME="EnableAnimationControl"   VALUE=1>
 　　　</OBJECT>

以上です。
上記の手順で間違っている部分や、まだ不足している手順等がありましたら
ご指摘頂けませんでしょうか？
また、こういったバージョンアップの方法等は確立されている
ものなのでしょうか？
お手数をお掛けして申し訳ございませんが
ご回答の程、宜しくお願い申し上げます。

はじめまして。クリスタルレポートの初心者です。

今、集計表をクリスタルレポートで作成しています。

各支社毎に[分類]がありまして、支社毎に合計を出力します。
また、レポートの最後には、全社の合計を[分類]毎に計算し出力します。

●イメージ
　支社　　　　分類　　　点数　
　東京支社　　A　　　　  70
             　　　B　        80
             　　　C          65
             　　　D          90
             　　合計　　   305
                       ・
　　　　　　　       ・
　　　　　　       　・
  全支社　　　A　　　　　600
　　　　　　　  B　　　　　800
　　　　　　　  C　　　　　400
　　　　　　　  D　　　　　900
　　　　　　  合計　　　　3700　

この場合の、レポートの最後の[分類]毎に出力する方法が良く分かりません。
ご存知の方、ご教授ください。

この場合、式フィールドを利用して、分類毎に集計する方法でできると思います。
こんな感じで式フィールドを詳細セクションに挿入します。

//集計したい分類の数分の変数を用意する必要があります。
WhilePrintingRecords;
NumberVar a;
NumberVar b;
NumberVar c;
NumberVar d;
if {xxx.分類}="A" then
a:=a+{xxx.点数}
else if {xxx.分類}="B" then
b:=b+{xxx.点数}
else if {xxx.分類}="C" then
c:=c+{xxx.点数}
else if {xxx.分類}="D" then
d:=d+{xxx.点数}

上記の変数で集計された値を表示するための式フィールドを
分類の数分を用意して、レポートの最後に、以下の式を挿入します。
変数a の場合、以下のようになります。
WhilePrintingRecords;
NumberVar a;

あと、上記で利用している変数の初期化の宣言をレポートの先頭に挿入します。
WhilePrintingRecords;
NumberVar a:=0;
NumberVar b:=0;
NumberVar c:=0;
NumberVar d:=0;

集計結果を表示する式フィールド以外は計算のみに利用しているだけなので
非表示にします。