我现在BMP.LOADFROMFILE一张图.我觉的精度是300DPI太高,我要降低成200DPI,我如何写呢?请大家给我一段样本代码,谢谢啊
解决方案 »
- DELPHI +ado+sql2005
- delphi的控件限定取值修改的问题?
- 怎么设置快捷键,比如在form1被选中时,再按ctrl+空格,将form2显示?
- 有谁装过crystal report 9.2
- 求改注册表限制用户只能用100次的代码 (加急在线中)!!!
- 有人帮我把下面代码用 delphi写出来吗 ?
- array[0..max_path] of char 中的max_path不是变量,应该等于多少?
- WebServer 与 Application Server 的通讯问题。请问这是不是控件的缺陷?
- 刚学delphi,能给我出几个题目让我做做,让我快点掌握delphi,帮帮忙!
- 请问哪里有比较好的图标
- 紧急求救
- 为何在控制面板内的管理工具测试ODBC连接MYSQL链接成功,但在delphi里用ado组件链接ODBC就不行了???
你不想改变尺寸,那就减少像素了哇。
procedure TForm1.Button1Click(Sender: TObject);
var
image1:TJpegImage;
width,height:Integer;
begin
image1:=TJpegImage.Create;
image1.LoadFromFile('c:\3232323.jpg');
width:=image1.Width ;
height:=image1.Height;
image.free;
end;
以上的width,height都是其具体的尺寸,我可以赋值进去,调整其尺寸,可是如果获取其像素并给其像素赋一个新的值呢?