3

FastReportに画像を表示したいと思います。

これがDelphiコードです:

 img_sick.Picture.LoadFromFile(ExtractFilePath(Application.ExeName) +
      'Pictures/' +  Qry_Search.FieldByName('code_personel').AsString + '.jpg');

任意のアイデアをいただければ幸いです。

4

2 に答える 2

9
  1. 画像オブジェクトをレポートフォームに配置します。と呼ばれるとしましょうPicture1

  2. Delphiコードで、画像をロードするメソッドに、次のような行を追加します。

    TfrxPictureView(YourReportObject.FindObject('Picture1')).Picture.LoadFromFile(…)
    

    PictureプロパティはaTPictureであり、例で使用しているのLoadFromFileと同じメソッドです。したがって、対応するファイル名を引数として指定するだけです。

これは、レポートを実行するに実行する必要があります。レポートの実行中に画像をロードする場合は、レポートスクリプトで同様のことを試してみてください。たぶん私は次のようにオブジェクトのOnBeforePrintハンドラーを定義します:Picture1

procedure Picture1OnBeforePrint(Sender: TfrxComponent);
begin
  TfrxPictureView(Sender).Picture.LoadFromFile(…);  // use a reference
          // to the "code_personel" column in the file name expression
          // as appropriate in the context of the report script,
          // like <Qry_Search."code_personel">, perhaps
end;
于 2012-06-23T11:11:31.863 に答える
-1

あなたの問題は「/」ですそれはバックスラッシュであるはずです--->"\"

于 2012-06-23T11:44:39.380 に答える