delphi 微软手写输入法
delphi 微软手写输入法源码
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleServer, MSINKAUTLib_TLB, ExtCtrls, StdCtrls, MSINKAUTLib;
type
TForm1 = class(TForm)
InkCLT: TInkCollector;
Memo1: TMemo;
Panel1: TPanel;
Button1: TButton;
InkRecognizerContext1: TInkRecognizerContext;
procedure FormCreate(Sender: TObject);
procedure InkCLTStroke(ASender: TObject; const Cursor: IInkCursor;
const Stroke: IInkStrokeDisp; var Cancel: WordBool);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
InkCLT.hWnd := panel1.Handle;
InkCLT.Enabled := true;
InkCLT.DefaultDrawingAttributes.Color := clRed; // 墨水颜色
InkCLT.DefaultDrawingAttributes.Width := 200; // 笔的宽度
end;
procedure TForm1.InkCLTStroke(ASender: TObject; const Cursor: IInkCursor;
const Stroke: IInkStrokeDisp; var Cancel: WordBool);
begin
Memo1.Lines.Clear;
Memo1.Lines.Add(Stroke.Ink.Strokes.ToString);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
InkCLT.Ink.DeleteStrokes(InkCLT.Ink.Strokes);
Panel1.Refresh;
end;
end.
文件下载
资源详情
[{"title":"（ 33 个子文件 9.38MB ） delphi 微软手写输入法","children":[{"title":"Project1.res <span style='color:#111;'> 876B </span>","children":null,"spread":false},{"title":"Unit1.dcu <span style='color:#111;'> 5.40KB </span>","children":null,"spread":false},{"title":"Unit1.dfm <span style='color:#111;'> 1.14KB </span>","children":null,"spread":false},{"title":"Project1.cfg <span style='color:#111;'> 434B </span>","children":null,"spread":false},{"title":"说明.txt <span style='color:#111;'> 502B </span>","children":null,"spread":false},{"title":"微软手写.bmp <span style='color:#111;'> 1.66MB </span>","children":null,"spread":false},{"title":"Project1.dpr <span style='color:#111;'> 188B </span>","children":null,"spread":false},{"title":"Unit1.~dfm <span style='color:#111;'> 997B </span>","children":null,"spread":false},{"title":"Project1.exe <span style='color:#111;'> 443.00KB </span>","children":null,"spread":false},{"title":"支持库","children":[{"title":"注册.bat <span style='color:#111;'> 170B </span>","children":null,"spread":false},{"title":"mshwchsr.dll <span style='color:#111;'> 11.62MB </span>","children":null,"spread":false},{"title":"tpcps.dll <span style='color:#111;'> 46.00KB </span>","children":null,"spread":false},{"title":"inked.dll <span style='color:#111;'> 205.50KB </span>","children":null,"spread":false},{"title":"inkobj.dll <span style='color:#111;'> 1.23MB </span>","children":null,"spread":false},{"title":"mshwchs.dll <span style='color:#111;'> 156.00KB </span>","children":null,"spread":false},{"title":"msvcp60.dll <span style='color:#111;'> 404.00KB </span>","children":null,"spread":false},{"title":"wisptis.exe <span style='color:#111;'> 265.50KB </span>","children":null,"spread":false},{"title":"mshwgst.dll <span style='color:#111;'> 40.00KB </span>","children":null,"spread":false},{"title":"runreg.reg <span style='color:#111;'> 318B </span>","children":null,"spread":false}],"spread":true},{"title":"2ccc.com.nfo <span style='color:#111;'> 753B </span>","children":null,"spread":false},{"title":"Delphi盒子.url <span style='color:#111;'> 259B </span>","children":null,"spread":false},{"title":"Project1.dof <span style='color:#111;'> 2.63KB </span>","children":null,"spread":false},{"title":"Unit1.~pas <span style='color:#111;'> 1.24KB </span>","children":null,"spread":false},{"title":"Unit1.pas <span style='color:#111;'> 1.29KB </span>","children":null,"spread":false},{"title":"ink","children":[{"title":"Ink.dpk <span style='color:#111;'> 581B </span>","children":null,"spread":false},{"title":"Ink.res <span style='color:#111;'> 1.50KB </span>","children":null,"spread":false},{"title":"Ink.cfg <span style='color:#111;'> 554B </span>","children":null,"spread":false},{"title":"MSINKAUTLib_TLB.pas <span style='color:#111;'> 358.27KB </span>","children":null,"spread":false},{"title":"MSINKAUTLib_TLB.dcu <span style='color:#111;'> 270.48KB </span>","children":null,"spread":false},{"title":"Ink.dof <span style='color:#111;'> 2.80KB </span>","children":null,"spread":false},{"title":"MSINKAUTLib.pas <span style='color:#111;'> 358.28KB </span>","children":null,"spread":false},{"title":"readme.txt <span style='color:#111;'> 1.77KB </span>","children":null,"spread":false},{"title":"Ink.dcu <span style='color:#111;'> 3.68KB </span>","children":null,"spread":false}],"spread":false}],"spread":true}]
评论信息
-
-
-
bttang :可以使用，值得学习2019-08-08 -
-
bttang :可以使用，值得学习2019-08-08
-
-
ab09cde :只是内容适合有基础的人看2017-02-25
-
-
ab09cde :只是内容适合有基础的人看2017-02-25
-
-
u013831401 :可以使用，如果能一次输入多个备选就完美了。2016-05-10
-
-
tangkeserver :可以使用，如果能一次输入多个备选就完美了。2016-05-10
-
-
hebmuljb :在电子病历中需要编写输入法，下来参考，谢谢2016-03-06
-
-
hebmuljb :在电子病历中需要编写输入法，下来参考，谢谢2016-03-06
-
-
guiljt :不错，可以使用2015-10-01
-
-
guiljt :不错，可以使用2015-10-01
-
其他资源
- c++ for quantitative finance
- matlab电池模型
- 正态分布数据的极大似然估计MATLAB实现
- A*算法在ROS上的简单移植
- runtime.js
- 最新仿icloud官方源码,苹果官网源码带后台邮件提醒功能
- 哈夫曼编码 将文本哈夫曼编码并求平均码长
- 计算机算法设计与分析（第4版）答案（王晓东）
- stc89c52 蓝牙控制源码
- matlab 2014b_x64 破解 mcc真正可用
- 交友小程序例子
- 用FPGA实现CCD的驱动（VerilogHDL）
- 自己编写的基于单片机的自己编的4*4行列键盘（c语言和汇编语言）
- 使用多域光谱配置方法的各向异性光波导全矢量模式求解器
- 学生跟踪系统-源码
- OpenCVForUnity.rar
- linux mint 连接工具 类似windwos xshell
- Part0.xlsx
- Mastering.R.for.Quantitative.Finance.178355207
- 大华NetSDK
- 土特产源码
- MODBUS协议 vc实现
- 图书管理系统MFC+SQL+VC
- tesseract4.0编译后链接库
免责申明
【只为小站】的资源来自网友分享，仅供学习研究，请务必在下载后24小时内给予删除，不得用于其他任何用途，否则后果自负。基于互联网的特殊性，【只为小站】 无法对用户传输的作品、信息、内容的权属或合法性、合规性、真实性、科学性、完整权、有效性等进行实质审查；无论 【只为小站】 经营者是否已进行审查，用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。
本站所有资源不代表本站的观点或立场，基于网友分享，根据中国法律《信息网络传播权保护条例》第二十二条之规定，若资源存在侵权或相关问题请联系本站客服人员，zhiweidada#qq.com，请把#换成@，本站将给予最大的支持与配合，做到及时反馈和处理。关于更多版权及免责申明参见 版权及免责申明
本站所有资源不代表本站的观点或立场，基于网友分享，根据中国法律《信息网络传播权保护条例》第二十二条之规定，若资源存在侵权或相关问题请联系本站客服人员，zhiweidada#qq.com，请把#换成@，本站将给予最大的支持与配合，做到及时反馈和处理。关于更多版权及免责申明参见 版权及免责申明