VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2004/07/26(Mon) 17:11
投稿者Yuuko
Eメール
URL
タイトルPictureに縮小表示すると 画質が悪くなる。

Tif画像(設計図面)を表示し その上に任意の文字を表示させるプログラムを作っています。

Tifを Kodak ImageEditコントロールの .SaveAs で Jpgに変換し
Jpgを Pictureコントロールに表示 
その上に 透過の Labelコントロールを貼り付けて文字を表示すると言う方法をとっています。


問題は
下記のように Picture1に取り込んだ 元の画像を Picture2に縮小表示させていますが
    Picture2.PaintPicture Picture1.Picture, 0, 0, p1sw, p1sh

縮小表示すると画質が悪く 設計図面の 一部の線などが消えてしまいます。
せめてWindowsのビュアーくらいの画質が欲しいのですが
画質を良くする方法は無いでしょうか?


また・・
Jpgを作る際に 画面を綺麗に縮小するフリーソフトを使用し
Pictureには 縮小しないで表示してみようと思いましたが
Kodak ImageEditコントロールで作成した Jpgは受け付けてくれません。
下記のようにSaveしていますが 方法にまずい点があるのでしょうか?

    ImgEdit1.Image = "Test.tif"
    ImgEdit1.Display
    ImgEdit1.SaveAs "Test.jpg", 3


以上 どなたかご存知の方 よろしくお願いします。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -