delphi lanaguage中的代码程序 [英] code program in delphi lanaguage

问题描述

我需要代码才能读取delphi中的图像

i need code to read image in delphi

推荐答案

您是否尝试 http://mc-computing.com/languages/delphi/images.html [ ^ ]
- http://www.delphidabbler.com/tips/21 [

Did you try to Google[^]? Lots of potential hits, like:
- http://mc-computing.com/languages/delphi/images.html[^]
- http://www.delphidabbler.com/tips/21[^] and so on...

procedure LoadAnImage()
var 
  OleGraphic: TOleGraphic; 
  fs: TFileStream; 
begin 
  try 
    OleGraphic := TOleGraphic.Create; 
    fs         := TFileStream.Create('C:\...\image.gif', fmOpenRead or fmSharedenyNone); 
    OleGraphic.LoadFromStream(fs); 
    SampleImage.Picture.Assign(OleGraphic); 
  finally 
    fs.Free; 
    OleGraphic.Free 
  end; 
end;

Google是您的朋友.

Google is your friend.

这篇关于delphi lanaguage中的代码程序的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！