delphi 取图片宽高

转载 2007年09月24日 20:43:00

Var  
      Bmp:TBitMap;  
      Stream:TMemoryStream;  
  begin  
      Bmp   :=TBitMap.Create;  
      Bmp.LoadFromFile('XX.BMP');  
  //尺寸  
      PX   :=Bmp.Width   ;  
      PY   :=Bmp.Height;  
      Stream:=TMemoryStream.Create;  
      Bmp.SaveToStream(Stream);  
  //大小  
      Size   :=Stream.Size;  
      Stream.Free;  
      Bmp.Free;  
  end;   

可以用TBITMAP得到BMP文件  
  TICON得到ICO文件  
  TJPGIMAGE得到JPEG,JPG文件,DELPHI现只支持这些格式,如要用其它的,呵呵,你自己作解码算法吧,就没这么简单了

delphi中让图片大小随TImage控件大小变化

需求:如题 实现如下: Anchors   下面的全部设为True  AutoSize   :=   False;  Strech   :=   True; 特此鸣谢资料:http://...
  • nanfeiyannan
  • nanfeiyannan
  • 2011年08月16日 00:18
  • 4782

用Delphi改变图片的像素,即大小

用Delphi改变图片的像素,即大小.需代码!急用,谢谢!我给你讲一种非常简单的方法:第一步:在窗体上放上image1和image2两个图片控件。再放一个Button按钮控件。第二步:在image1的...
  • xwchen
  • xwchen
  • 2007年09月24日 21:04
  • 10555

Delphi 中获取文件大小

大概有这些方法可以获得文件大小  FileSizeByName(需要引用IdGlobal单元)  GetFileSize  FileSize(不能获得正在使用的文件大小)  FileSeek ...
  • my98800
  • my98800
  • 2016年09月05日 09:43
  • 278

delphi 中获取文件大小

delphi 中获取文件大小 2008年05月15日 星期四 上午 11:35 大概有这些方法可以获得文件大小 FileSizeByName(需要引用IdGlobal单元) GetFile...
  • beyondqd
  • beyondqd
  • 2011年11月08日 13:41
  • 5148

delphi 图片处理

  • 2010年12月04日 23:08
  • 270KB
  • 下载

Delphi图象截取编程示例(7)

(七)抓取窗体或控件图片窗体创建一个新的Form2,保存为Capture2.pas。设置属性BorderIcons的四个属性为false.BorderStyle设为bsNone,FormStyle设为...
  • LuckyJan
  • LuckyJan
  • 2004年11月02日 10:45
  • 6227

使用pytorch进行图像的顺序读取。

使用pytorch进行图像的顺序读取。 产生此次实验的原因:当我使用pytorch进行神经网络的训练时,需要每次向CNN传入一组图像,并且这些图片的存放位置是在两个文件夹中: A文件夹:图片1a,图片...
  • whyymlm
  • whyymlm
  • 2017年08月18日 10:16
  • 1398

需要这样一个记录本-3 Delphi调用Windows自带图片查看器

ShellExecute(handle, 'open', 'rundll32.exe', 'c:\WINDOWS\system32\shimgvw.dll,ImageView_Fullscreen F...
  • juns6
  • juns6
  • 2014年09月19日 14:16
  • 1401

Delphi 截取被遮挡窗口图片

(对最小化窗口无效) (对斗地主无效,截出来的是黑屏,肯定是它做处理了,可以用另外的方法,先显示出窗口,在截屏) Delphi截图,Delphi 截取被遮挡窗口图片,Delphi遮...
  • xiuzhentianting
  • xiuzhentianting
  • 2015年09月15日 19:50
  • 460

delphi 取图片宽高

Var         Bmp:TBitMap;         Stream:TMemoryStream;     begin         Bmp   :=TBitMap.Create;    ...
  • xwchen
  • xwchen
  • 2007年09月24日 20:43
  • 2505
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:delphi 取图片宽高
举报原因:
原因补充:

(最多只允许输入30个字)