登录
首页 » Delphi源码 » Delphi 百叶窗的方式显示图像

Delphi 百叶窗的方式显示图像

于 2022-02-04 发布 文件大小:2.22 MB
0 200
下载积分: 2 下载次数: 1

代码说明:

百叶窗效果的图像显示,这个效果我觉得大家不会陌生吧,在电视上、电脑上,这种切换图片显示的方式还是挺常见的,像百叶窗的样式,本效果重在演示图像的解析。

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • Delphi 判断字符串是否为日期或时间
    Delphi 判断字符串是否为日期或时间,检查用户输入的时间格式是否正确,判断用户输入的是否是时间字符串,这个虽然麻烦些,不过这个例子将问题简单化,有兴趣的参考源码。
    2022-08-24 16:56:14下载
    积分:1
  • Delphi演示UniCode编码、简体繁体互转的方法实现
    Delphi演示如何实现UniCode编码、汉字的繁简互转功能,同时将字符转换为unicode码值(十六进制):   常用编码:   codepage=936 简体中文GBK   codepage=950 繁体中文BIG5   codepage=437 美国/加拿大英语   codepage=932 日文   codepage=949 韩文   codepage=866 俄文   codepage=65001 unicode UTF-8   本例子中仅使用了936、950,如果你要进行其他语言的编码转换,仅需相应改变其中的编码值即可。
    2023-06-10 00:30:04下载
    积分:1
  • Delphi 简单的文件查看器
    Delphi 简单的文件查看器,可以获取并显示文件的显示名,获取并显示文件类型信息,获取并显示表示该程序的图标,获取文件属性信息,始获取并显示文件上次修改的日期和时间,处理用户没有选择文件而选择了文件夹或驱动器的转化异常。
    2022-08-11 18:22:46下载
    积分:1
  • Delphi7 获取文件的修改时间
    Delphi7 获取文件的修改时间,这是一个文件操作实例源代码,获取到文件被修改的时间,代码简单,适合Delphi新手学习参考。
    2022-03-25 03:51:22下载
    积分:1
  • delphi windows远程桌面链接源码,带代理功能,支持win2012
    delphi windows远程桌面链接源码,带代理功能,支持win2012 原创代码
    2023-02-10 08:55:03下载
    积分:1
  • Delphi控制电脑蜂鸣器或扬声器发声音
    Delphi控制电脑蜂鸣器或扬声器发声音,有些称之为喇叭,不过测试发现,这个是优先机箱蜂鸣器发出声音,或没装蜂鸣器,则会从音箱中发声音,实现的代码很简单,以下代码即可实现:   procedure TForm1.Button1Click(Sender: TObject);   var    i,j : integer;   begin    for i := 1000 to 2000 do    begin    j := i;    windows.Beep(1000,3000);    end;   end;
    2022-02-05 03:44:28下载
    积分:1
  • delphi写的串口rfid读卡器源码
    用delphi编写的rfid读卡器程序,支持epcc1-g2和18000-6b,囊括了所有操作,对于进行rfid开发的人,应该有很大的帮助
    2023-08-20 00:25:04下载
    积分:1
  • 在Delphi中进行 YCrCb RGB 颜色值转换
    在Delphi中进行 YCrCb RGB 颜色值转换,载入一张测试图片,右侧显示的转换后的颜色图像,文本框中显示的是各个转换过的颜色值。希望通过这个Delphi例子,帮你了解一下YCrCb向RGB颜色值的转换过程,转换方法和思路,本源码中则是具体的实战代码,请下载后研究。
    2022-05-23 08:16:07下载
    积分:1
  • Delphi 静音 左右声道音量控制
    Delphi控制系统静音,两个声道均不发出声音,同时若在非静态状态下,可控制左、右声道的音量大小,在代码中@表示指向变量v的指针(32位),调用此函数的用意就是得到右声道的值,在调节左声道的时候,不改变右声道}数字前面加$表示是十六进制数字,(t shl 8)表示t左移8位,部分参数设置代码如下:   procedure TForm1.FormCreate(Sender: TObject);   var    v:longint;   begin    waveoutgetvolume(0,@v);//得到现在音量,@v表示指向变量v的指针(32位)    trackbar1.Position:=hi(v);//设置左滑块的正确位置    trackbar2.Position:=hi(v shr 16);//设置右声道滑块的正确位置   end;
    2022-06-02 00:55:40下载
    积分:1
  • Delphi 如何定义自已的鼠标单击事件
    Delphi 如何定义自已的鼠标单击事件,本程序定义了监测鼠标中轮的事件,当用户按下鼠标中轮时,将监测到运作类型,并弹出窗口返回结果。
    2022-05-13 22:55:23下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载