紧急求助之三：请帮忙翻译（从VC＋＋到Delphi）？

Question

CPaintDC dc(this);
IPicture *ppic;
IStream *pstrm;
.......OLE_XSIZE_HIMETRIC hmWidth;
OLE_YSIZE_HIMETRIC hmHeight;
ppic->SetWidth(&hmWidth);
ppic->SetHeight(&hmHeight);
....
dc.GetDevicecps(HORZSIZE);
....
if(FAILED(ppic->Render(dc,0,0,(DWORD)fx,(DWORD)fy,0,hmHeigth,hmWidth,-hmHeight,0,0))){
....
}

Answer 1

问题是，我不会用DELPHI，现在必须用DELPHI，这是我以前用VC++写的显示各种图形的程序（包括BMP，JPG，GIF），DELPHI下能用API函数显示BMP文件，但我想知道怎么显示其它类型的图片，所以，最好将这段代码翻译成DELPHI（免得改动大）。

Answer 2

使用 TImage 可以显示其他图象的