[Delphi:90777] gif画像が読み込めるTImageのようなコンポーネント
Knockwood
Delphi6か7で使える、gif画像が読み込めるTImageのような
コンポーネントがどこかにないでしょうか？
Delphi2007では、gifも読み込めるのはわかったのですが、今のところ
私には軽いD6か7で充分なので、探しています。
画像が読み込めて表示できるだけでOKなんですが、ご存じの方
情報いただけると助かります。
よろしくお願いいたします。
小林
詳細は不明ですが
TGIFImage
http://www.tolderlund.eu/delphi/
Tsuneaki Nakagawa
Knockwood
小林 様、中川 様、
回答ありがとうございます。
早速ダウンロードしましたところ、無事GIF画像が表示できるように
なりました。
最初はインストールが必要なものと思っていたので焦ってしまい
ましたが、中川さんがおっしゃるように入れておくだけでいいのですね。
また何かありましたらよろしくお願いいたします。
ちなみに最新版は↓こちらのページのほうでした。
> TGIFImage
> http://www.tolderlund.eu/delphi/
Takuo Nakamura
余計なお世話かも知れませんが、インストールすると
設計時にも TImage に GIF を表示できるようになります。
これが必要なければ uses するだけで OK です。
インストール方法は
http://www.tolderlund.eu/delphi/gif-faq.txt
の
「Can you tell me how to install GifImage as a component in delphi 7?」
に載っています。設計時パッケージにユニットを加えるだけです。
"[Delphi:90780] Re: gif画像が読み込めるTImageのようなコンポーネント" において
Knockwood <knoc...@inter7.jp> さんは書きました
+---------------------------------------------+
|Takuo Nakamura from Hino City, Tokyo JAPAN |
+---------------------------------------------+
Knockwood
Takuo Nakamura 様、
コメントありがとうございます。
はい、usesするだけで、うまく動作いたしました。
教えていただいたインストール法を見ると、パッケージに入れて
コンパイルしておくと、デザイン時にもgifが読み込めるんですね。
ところで今頃になって気がついたのですが、TImageってデザイン時には
jpegファイルの読込はできますが、下記のようなコードではjpegって
読込できないんですね。これは仕様でしょうか？
if OpenDialog1.Execute then
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
MoonDoldo
>ところで今頃になって気がついたのですが、TImageってデザイン時には
>jpegファイルの読込はできますが、下記のようなコードではjpegって
>読込できないんですね。これは仕様でしょうか？
>
>if OpenDialog1.Execute then
> Image1.Picture.LoadFromFile(OpenDialog1.FileName);
こう書くとうまく動くと思います。
もうちょっと色々なフォーマットに対応できる、スマートな方法があったような
気もするのですが…。
そっちのほうは今夜調べてみます。
var
wJPEGImage: TJPEGImage;
begin
try
wJPEGImage.LoadFromFile(OpenDialog1.FileName);
Image1.Picture.Bitmap.Assign(wJPEGImage);
finally
wJPEGImage.Free;
end;
end;
--
ムーンドルド
do1...@king-postman.com
MoonDoldo
>>ところで今頃になって気がついたのですが、TImageってデザイン時には
>>jpegファイルの読込はできますが、下記のようなコードではjpegって
>>読込できないんですね。これは仕様でしょうか？
>>
>>if OpenDialog1.Execute then
>> Image1.Picture.LoadFromFile(OpenDialog1.FileName);
>
すみません、スマートな方法思い出しました。
Delphi7では、usesに「Jpeg」を追加する事によって、上記のコードが正常に動
きます。
Knockwood
MoonDoldo 様、
ありがとうございます。
usesするだけでいいんですね。うまくいきました。
また、よろしくお願いいたします。
(株)ブレーン 中村拓男
TPicture が拡張子によって画像フォーマットを判別して読む
機能は、通常グラフィッククラスのユニットの Initialization 部で
拡張子とそれを読み込むクラスを TPicture に登録することで
実現されています。実行時も設計時もです。
ですので、設計時パッケージに JPeg ユニットが登録されていれば
TImageへの読み込みが可能になり、アプリケーションに JPegユニットが
uses されていれば実行時に TPicture.LoadFromFile で読み込み
できるようになります。
尚、設計時に TImage に JPEG を読み込むと IDE が自動的に
Uses に JPEG を加えます。そうでない場合は手で 加えておく
必要があります。
Quoting Knockwood <knoc...@inter7.jp>:
----------
(株)ブレーン 中村拓男
Knockwood
(株)ブレーン 中村拓男 様、
コメントありがとうございます。
そういう仕組みだったのですか。勉強になりました。
それではまたよろしくお願いいたします。