Delphi字符编码转换工具,原创代码,作者Author: 谢凯。输入一段字符串(汉字或者英文),可将其转换为Unicode编码或AscII编码。 其中有一段代码避免程序的重复执行(调试通过),原理:在程序启动时将Application的Title特性字段的值暂时改变。利用Windows API函数FindWindows()查找窗口,恢复Application的Title值。
2023-11-15 15:35:41 5KB Delphi源码-字符处理
1
Delphi 汉字、拼音码、五笔简码转换程序,原理:通过查询资源文件 wbtext.rec 得到编码.可以实现:   1、批量将汉字转换为拼音码、拼音简码、五笔码、五笔简码。   2、通过ODBC建立“.mdb”数据库,名字为:pywb,数据库选择执行程序目录下的“取拼音五笔码数据库.mdb”;   3、将要批量转换的内容录入“取拼音五笔码数据库.mdb”中的“取拼音码的内容”字段。
2023-03-04 12:49:28 159KB Delphi源码-字符处理
1
Delphi 向Word文件中插入字符,在不打开Word格式文件的情况下,将字符串内容插入到Word中。请根据窗口中的几个选项添加内容:向Word中添加的字符、插入指定的字符、字符串长度、插入的位数等,相关代码如下:   begin    VApp:=CreateOleObject('Word.Document');//添加 comobj单元    X:=VApp.Range(0,0);    X.InsertBefore('Hello from Delphi');//添加字符    X.Font.Name:='Arial';    X.Font.Size:=18;    X.InsertParagraphAfter; //插入段落    X:=VApp.Range(17,17);    X.InsertBefore('!');//插入字符    X.Font.Name:='Arial';    X.Font.Size:=18;    X.InsertParagraphAfter;    VApp.SaveAs(Extractfilepath(Application.ExeName) 'Hold11.doc');//保存修改后的Word文档   end;(完整源码请下载源码包。)
2022-09-16 18:22:14 9KB Delphi源码-字符处理
1
类似写字板的高级版Delphi记事本程序,增加了一条横向的工具栏,里面旋转了一些文字设置常用按钮,比如对齐、字体样式设置、保存、新建文档、复制、粘贴、删除等,虽然是NOTEPAD记事本程序,但貌似对Windows的记事本功能要多些,用起来更顺手,本程序主要是学习Delphi对字符的控制,对排版软件开发有帮助。
2022-06-18 14:38:54 16KB Delphi源码-字符处理
1
Delphi批量查找替换文件内容,支持文章段落替换和字符内容替换,并加入了批处理模块,现在可以批量替换了,曾经是我写程序时候的助手,现在分享代码,对研究学习Delphi字符处理有帮助。
2022-05-28 10:18:07 18KB Delphi源码-字符处理
1
Delphi写的输入法程序源码,网上发现的程序,带有源码,好像没有使用第三方控件,在Delphi7下可顺利编译。本源码可为从事Delphi开发的朋友提供一份输入法相关程序开发的参考。
2022-03-13 00:55:10 788KB Delphi源码-字符处理
1
Delphi获取指定特殊符号之间的字符串,具体到本例中,是获取书名号中间的文字,获劝《》”中间的字符,《为开始符号,》为结束符号,获取到的字符会显示在下边的文本框中。
2022-01-08 22:46:19 7KB Delphi源码-字符处理
1
delphi字模提取(FontExtract)含源代码下载,此工具用于DOS下程序开发或单片机程序开发。取汉字的字模然后直接存到EXE里去。
2021-07-05 15:49:22 190KB Delphi源码-字符处理
1
Delphi演示如何实现UniCode编码、汉字的繁简互转功能,同时将字符转换为unicode码值(十六进制):   常用编码:   codepage=936 简体中文GBK   codepage=950 繁体中文BIG5   codepage=437 美国/加拿大英语   codepage=932 日文   codepage=949 韩文   codepage=866 俄文   codepage=65001 unicode UTF-8   本例子中仅使用了936、950,如果你要进行其他语言的编码转换,仅需相应改变其中的编码值即可。
2020-01-03 11:39:33 5KB Delphi源码-字符处理
1