-
源码演示Delphi 如何放大和缩小图像【图片】
源码演示Delphi 如何放大和缩小图像【图片】,我们这个例子可以学习了解如何使用Delphi编程代码,放大或缩小一张图片,这里把放大和缩小图片的基数写在按钮事件中,用户每次单击按钮,就会按照一定的缩放倍数放大或缩小图像,本示例测试图片已写入程序中,编译运行后操作并演示效果,对图像的缩放部分,重点参考以下代码:
图片缩小操作:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if image1.Height>50 then
begin
image1.Height:=image1.Height-10;
image1.Width:=image1.Width-13;
end;
end;
图片放大操作:
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
if image1.Height
- 2023-04-18 03:35:03下载
- 积分:1
-
串口通讯,主要针对单板机进行开发
串口通讯,主要针对单板机进行开发-serial communications, mainly for the development of F14
- 2022-12-16 00:15:03下载
- 积分:1
-
制作帮助文件的一个利程10
制作帮助文件的一个利程10-4-production of a document to help Lee Cheng 10-4
- 2022-08-07 11:33:28下载
- 积分:1
-
嘿嘿,大侠看到不要见笑呀...
大家都知道使用DLL的好处.于是我就想把FORM封装到DLL里面去.
到网上找,发现是MDI和模式窗体的,非模式的也有...
嘿嘿,大侠看到不要见笑呀...
大家都知道使用DLL的好处.于是我就想把FORM封装到DLL里面去.
到网上找,发现是MDI和模式窗体的,非模式的也有很多问题.便想自己解决这个问题.
原来是用DLL创建一个对象返回,但发现有很多的问题.
想了半天就去寻根问柳吧.
找到了类.
我就想把类封装进DLL,到时简单的返回一个类,然后在主程序里操作不就简单了?
找了半天发现了TFormClass,于是试了试从DLL导出来,像一般的程序一样创建窗体发现成功.
接着我又想看看其他的类是不是也能这样,就拿TFrame来实验.
function GetDllFrameClass():TFrame stdcall
第一次是这样声明的,失败.奇怪?!
试了好多次都不行,就想到了TFormClass(Ctrl+左键),进去看看,发现是这样声明的.
TFormClass = class of TForm
哎呀,恍然大悟!!
class(TFrame) 是声明一个类, 这个类继承了TFrame类 f: TFrame 是一个对象
class of TFrame 声明的是类类型, f:TFrameClass 是一个类.
function GetDllFrameClass():TFrame
返回就不是类而是对象了,照TFormClass修改后TFrameClass = class of TFrame
运行...成功,
- 2022-01-31 01:59:09下载
- 积分:1
-
好的程序离不了友好的用户界面 用delphi轻松搞定
好的程序离不了友好的用户界面 用delphi轻松搞定-Procedures can not be good from the friendly user interface easy to get used delphi
- 2022-03-12 22:25:44下载
- 积分:1
-
delphi 调用Tesseract3.0 ocr
delphi7调用Tesseract3.0,源码,可直接编译!delphi7调用Tesseract3.0,源码,可直接编译!
- 2022-05-24 03:41:47下载
- 积分:1
-
Flash
Flash Play Delphi 播放器源码,用在开发程序动态界面最棒了。(Flash Play Delphi player source code, using dynamic interface is the best in the development program.)
- 2016-10-26 11:56:19下载
- 积分:1
-
webbrowser_test
Delphi對於Webbrowser的一些測試,對寫網頁外掛,及處理還算不錯。(Delphi for some of Webbrowser test page to write plug-ins, and to deal with bad.)
- 2009-07-04 00:22:27下载
- 积分:1
-
Delphi_527147
Delphi:Delphi使用Mycopyfile复制文件,带进度条显示,选择好需要复制的文件,点击“复制”按钮,文件即可开始复制,文件复制过程中显示进度条,让用户清楚复制了多少,本程序适合Delphi入门者参考,源码供参考。
(Delphi: Delphi using Mycopyfile copy files with progress bar display, select the need to copy the file, click the "Copy" button to start copying the file, display the file copy process progress bar, so that users know how much copied, this program is suitable Delphi beginners reference source for reference.)
- 2014-07-01 01:05:25下载
- 积分:1
-
纯Win32 API调用Delphi
Pure win32 API calls from Delphi
- 2022-03-22 08:58:39下载
- 积分:1