登录
首页 » Delphi源码 » Delphi 7.0 After提取字符串中指定子字符串后的字符串

Delphi 7.0 After提取字符串中指定子字符串后的字符串

于 2022-03-28 发布 文件大小:5.85 kB
0 131
下载积分: 2 下载次数: 1

代码说明:

Delphi 7.0 提取字符串中指定子字符串后的字符串,这个平时在字符处理时候使用几率也挺高的,获取指定字符串后面的字符串,比如获取扩展名等也可以用此方法,本例中要用到After函数,测试时,当单击按钮时,执行以下代码:   procedure TForm1.Button1Click(Sender: TObject);   begin    Edit3.Text := After(Edit2.Text,Edit1.Text);   end;   end.

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

发表评论

0 个回复

  • Delphi 获取网页
    Delphi 获取网页源代码,这个程序首先是一个网页浏览器,可解析用户输入的网址,直接输出网页界面,然后通过操作主窗口区的Tab选项,查看该网页的源代码,也就是完成了两种功能:1、网页浏览器,2、查看源代码。运行界面如下图示。
    2023-05-24 10:50:03下载
    积分:1
  • Delphi 文件拖放获取路径实例
    Delphi 文件拖放获取路径实例,用文件拖放的方式打开文件,本实例中虽然没有打开文件,但是获取到了文件路径,因此你就可以依此功能扩展成打开文件的功能。   实现方法使用了shellAPI,将Form1注册为文件拖放接收控件,说请请下载该源码。
    2022-09-12 19:45:03下载
    积分: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 云台镜头控制系统,用于摄像头监控系统中的云台控制程序,早几年写的,可能现在适用的硬件已经过时了,不过对于编写开发Delphi程序来说,源代码部分还是很有参考价值的。   本套云台控制系统运行的最终界面效果如示例图所示,界面友好,功能实用。   通过这套云台控制程序,你可控制摄像头光圈大孝焦距改变、转动摄像头、打开射灯等功能。
    2023-07-22 04:15:04下载
    积分:1
  • Delphi时间换算 换算秒数为时间格式
    Delphi时间换算 换算秒数为时间格式,其实这种换算还是挺简单的吧,TimeToStr(I/86400);就可以算出。在运行的程序窗口中,输入任意秒数(必需输入数字)后,点击确定按钮,即可显示出时间格式的秒数了。具体的代码这里不帖了,需要的请下载完整源码吧,运行效果图如截图所示。
    2022-07-17 19:50:24下载
    积分:1
  • Delphi 编写的VOD视频点播及后台管理系统
    Delphi 编写的VOD视频点播及后台管理系统,这套系统既是一套多媒体系统,也是一套数据库系统,VOD部分的功能有:KTV管理系统,编号点歌、轻音乐、拼音点歌、迪士高、明星点歌、DVD影院、播放列表、歌曲管理等。
    2022-01-24 15:29:37下载
    积分:1
  • Delphi7 获取文件的修改时间
    Delphi7 获取文件的修改时间,这是一个文件操作实例源代码,获取到文件被修改的时间,代码简单,适合Delphi新手学习参考。
    2022-03-25 03:51:22下载
    积分:1
  • 在Delphi中进行 YCrCb RGB 颜色值转换
    在Delphi中进行 YCrCb RGB 颜色值转换,载入一张测试图片,右侧显示的转换后的颜色图像,文本框中显示的是各个转换过的颜色值。希望通过这个Delphi例子,帮你了解一下YCrCb向RGB颜色值的转换过程,转换方法和思路,本源码中则是具体的实战代码,请下载后研究。
    2022-05-23 08:16:07下载
    积分:1
  • Delphi 邮件短信发送自动通知系统
    Delphi 邮件短信自动通知系统,并且支持邮件发送、邮件帐户管理、类似于微软Windows中的Outlook邮件客户端的功能,可添加邮箱帐户自动收集,并在有新邮件时提示用户登录查看。本程序可发送适合到用户手机来通知邮件情况,部分功能需要依赖于硬件支持。   程序可最小化到windows托盘处显示图标,通过定义好的右键菜单来调出主窗口,虽然是一个发邮件的小程序,但是暗含的Delphi技巧有很多哦,欢迎下载源码研究学习。   1.实现邮件检测功能:   (1)注册账号,注意正确添写POP3服务器,用户名,密码。   2.实现发送短信功能:   (1)在注册账号时要添写正确的手机号码,并选中发送到手机的复选框。   (2)跟据自己购买的GSM模块说明书设置串口参数,一般是“19200,n,8,1”。   (3)添写当地短信中心号码,前面的86可加可不加,如果没有写,系统在按“确定”后会自动加上。   (4)注意:如果短信中含有中文字符,则一定要设成Pdu模式,否则短信可能发送失败。
    2023-07-27 17:40:06下载
    积分:1
  • Delphi 创建独立的子窗体 脱离父窗口但可通过父窗口关闭
    Delphi 创建多个独立的子窗体 脱离父窗口而显示,但是却可通过父窗口关闭打开的所有子窗口,就是通过主窗口内的关闭按钮,关闭独立于父窗口之外的子窗口,这个功能我感觉很实用吧,源代码中也包括了多个子窗口的代码,父子窗口之间是如何关联起来的呢,请参见这个源代码实例 。
    2022-01-25 17:06:08下载
    积分:1
  • 696518资源总数
  • 105877会员总数
  • 14今日下载