-
长4大使馆个头儿 长4大使馆个头儿
长4大使馆个头儿 长4大使馆个头儿 -4 head of a long long 4 Embassy Embassy Embassy of 4 months long head head head of a long 4 Embassy
- 2022-07-27 17:28:22下载
- 积分:1
-
Delphi获取BMP图片指定点RGB值
delphi获取图片指定点RGB颜色值,载入一张BMP图像,鼠标单击图像任意处,将获取该处的RGB颜色分量图。任何一种颜色都是由RGB分量值构成,获取这些分量值,就可以改变这些值,从而改变颜色,为程序的进一步处理提供基础保障,获取RGB颜色分量,相关代码如下:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
image1.Picture.LoadFromFile(OpenPicturedialog1.FileName);
Form1.Canvas.Draw(0,0,image1.Picture.Bitmap);
end;
end;
- 2023-09-03 19:00:03下载
- 积分:1
-
一个简单的WEB浏览器
一个简单的WEB浏览器-a simple Web browser
- 2023-01-22 20:10:04下载
- 积分:1
-
jincheng
遍历所有进程,判断内容是否存在的一个方法(Through all processes to determine whether there is a method of content)
- 2011-01-16 22:08:06下载
- 积分:1
-
门禁系统源代码早 下旧是是是是是是是是是是是是是是是晶
门禁系统源代码早 下旧是是是是是是是是是是是是是是是晶-Access Control System source code under the old back yes yes yes yes yes yes yes yes yes yes yes yes yes yes yes yes yes crystal
- 2022-12-24 04:35:03下载
- 积分:1
-
delphil-flashform
1,FlashWindow(Application.Handle, True) 让主程序在任务栏上的图标闪烁
2,FlashWindow(form.Handle, True) 让指定的form状态栏闪烁
3,对于在任务栏上没有图标的form,比如form2可以用下面这个过程模拟一下,
procedure CreateParams(var Params: TCreateParams) override
procedure TForm2.CreateParams(var Params: TCreateParams)
begin
inherited
Params.WndParent := 0 //此段代码的意思是使窗口显示在任务栏中
end
此时FlashWindow(form2.Handle, True) 让form2在任务栏上的图标就会闪烁
(delphil flashform)
- 2013-10-11 11:11:02下载
- 积分:1
-
delphi最新版JEDI插件
delphi最新版JEDI插件delphi最新版JEDI插件
- 2022-07-24 11:05:57下载
- 积分:1
-
binary tree traversal and storage
二叉树的存储与遍历-binary tree traversal and storage
- 2022-07-07 10:49:29下载
- 积分:1
-
zidongdanji
初学DELPHI时候做的模拟鼠标点击的小例程!(Beginners DELPHI simulation time to do a small routine mouse clicks!)
- 2010-01-05 13:04:21下载
- 积分:1
-
PrintText
Delphi PrintText打印文本文件内容,编程学习源码,很好的参考资料。(Delphi PrintText prints a text file content, learning programming source code, a good reference.)
- 2013-12-31 10:16:32下载
- 积分:1