IWCImage を利用する - Delphi 2010

Delphi2010で導入されたTIWCImageを使ってみます。
フォームにボタンを一つ配置します。

ボタンのonClickイベントに以下のコードを記述します。

procedure TForm1.Button1Click(Sender: TObject);
var
  Img:TWICImage;
begin
  Img:=TWICImage.Create;
  Img.LoadFromFile('C:\Archive\test.tif');
  Form1.Canvas.Draw(60,100,Img);

end;
実行結果は以下の通りです。tiffファイルも読み込むことができました。

著者
iPentecのメインプログラマー
C#, ASP.NET の開発がメイン、少し前まではDelphiを愛用
掲載日: 2009-10-28
iPentec all rights reserverd.