home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1997 May
/
VPR9705A.ISO
/
VPR_DATA
/
PROGRAM
/
Delphi
/
User_vcl
/
All3222
/
Pcd32.txt
< prev
Wrap
Text File
|
1996-10-04
|
4KB
|
84 lines
Photo CD コンポーネント Ver1.0 32Bit版
このたびはダウンロードしていただきましてありがとうございます。
機能
これはPhoto CDのイメージを表示するコンポーネントです。
画像の大きさは、128x192(pcdTiny)、256x384(pcdSmall)、512x768(pcdMedium)の3
通りのみでこれ以外の画像が含まれていても表示されません。
注意
このプログラムは32ビット版なのでDelphi 1.0(J)では動作しません。
OSはWindows95でのみ動作確認しています。
画像ファイルは最低512x768が含まれているものとしています。
コンポーネントのインストールの仕方
このPcd.dcuおよびPcd.dcrを任意のディレクトリにコピーして下さい。
因みにPcd.dcrファイルはVCLのアイコンデータファイルです。
Delphiからコンポーネント-インストールを選択します。
次に追加ボタンを押して、モジュール名のフルパスネームを正確に設定します。
(ファイルのあるディレクトリ\Pcd.dcu)。
このプログラムにはソースはなくオブジェクトのみなので注意してください。
追加ボタンを押したあとに参照ボタンを押すとファイルの種類として(*.pas)
のみが表示されますがファイルの種類コンボボックスの下矢印をクリックして
選択項目を「ソースファイル(*.pas)」から「ユニット(*.dcu)」に変更させる
とPCD.DCUを選択できるようになります。
この後は開くボタンを押すとインストールされるようになります。
詳しくはHelpをご参照下さい。
使用法
コンポーネントライブラリのSamplesページにPCDの文字のアイコンで登録
されているはずなのでそれをフォームにおきます。
設計時に画像ファイルを変更するにはString型のPictureNameプロパティの
右をダブルクリックしてダイアログ上で変更します。
実行時はプログラム上で
Pcd1.PictureName := 'PCDファイル名.PCD';
などとします。
画像サイズはデフォルトで512x768になっています。
画像サイズの変更はPictureSizeプロパティで行います。(設計時にも実
行時にも有効です。)
画像の大きさは、128x192(pcdTiny)、256x384(pcdSmall)、512x768(pcdMedium)です。
実行時に変更するには、
PictureSize := pcdSmall;
などとします。またはpcdTiny、pcdMedium。
特殊機能としてPCDファイルの中には外枠が黒色で塗られているものがありますが、
これを削除する機能があります(カットオフ機能)。正確なアルゴリズムではない
のですが、ある程度正しく認識され削除されるようになります。ただしこの機能を
オンにすると外枠が黒でないときでも勝手に外周を切ってしまいますのでご注意を。
これはCufOffプロパティをTrueにすることで実現されます。(設計時にも実行時に
も変更は有効です。)デフォルトはFalseです。
注意点
TImageを親としているため通常は必要のないPictureプロパティが残っています。
このためPicture Propertyの右や画像エリアををダブルクリックするとTImageと
全く同じでBMPファイルのロードができます。(全然意味がない)
しかしこれを使うとPCDロード後にBMPファイルとしてセーブすることができます。
それには
Pcd1.Picture.SaveToFile('BMPファイル名.BMP');
とします。
あとがき
この表示アルゴリズムはさんざんいろいろな資料を探しまくってようやくみつけだ
したものです。ということなのでソースはお見せできません。一応有料とお考えく
ださい。
またこのプログラムを利用してなんらかの損害が起きた場合でも当方は
関知しません。(念のため)
またこのプログラムについてのご感想や問題点などがございましたら作者
である みけお(Nifty Serve SGV02642)までメールにてお知らせ下さい。
わかる範囲でお答えします。
Q&A
Q.カットオフ機能が正しく働かない。
A.これは相当に手間を省いて、(つまり実行時間を早くするため)作ってあるので
正しくないこともあると思います。その辺はご理解を。
Q.色が正しくでない。
A.減色処理をしていないので256色以下の環境では色が正常に出ません。
連絡先
mikeo@airnet.or.jp
またはSGV02642@niftyserve.or.jp(こちらは余り巡回していません)
みけお