Delphi 之【Trim()、Application.MessageBox()、三层数据库修改】
发布日期:2021-05-04 14:31:06 浏览次数:44 分类:原创文章

本文共 1171 字,大约阅读时间需要 3 分钟。

RAD Studio 10.2 测试√


Trim函数
函数原型 function Trim(const S: string): string; 将字符串前后的空白及控制字元清掉
函数原型 function TrimLeft(const S: string): string; 将字符串左边的空白及控制字元清掉
函数原型 function TrimRight(const S: string): string; 将字符串右边的空白及控制字元清掉

注意Trim函数只能清掉字符串前后的空格及控制字元,不能清除字符串中间的空格


Application.MessageBox()函数

// 信息窗口【只有一个确认按钮】Application.MessageBox('内容不能为空', '提示', MB_OK + MB_ICONINFORMATION);// 询问窗口【有确认和取消按钮】case Application.MessageBox('确认提交当前已更改数据?', '提示', MB_OKCANCEL + MB_TOPMOST) of  IDOK:// 确认修改    begin      ClientDataSet1.ApplyUpdates(0);    end;  IDCANCEL:// 取消修改    begin    end;end;

[附其它常用属性]
系统默认图标,可在消息框上显示

X错误 MB_ICONHAND, MB_ICONSTOP, and MB_ICONERROR
?询问 MB_ICONQUESTION
!警告 MB_ICONEXCLAMATION and MB_ICONWARNING
i信息 MB_ICONASTERISK and MB_ICONINFORMATION

按钮的形式

MB_OK 默认
MB_OKCANCEL 确定取消
MB_YESNO 是否
MB_YESNOCANCEL 是否取消

返回值

IDCANCEL 取消被选
IDNO 否被选
IDOK 确定被选
IDYES 是被选


添加并提交数据

Self.ClientDataSet1.Append;                // 向数据表中添加一条信息Self.ClientDataSet1.FieldByName('id').AsString := FrmEditXinZeng.Edit1.Text;Self.ClientDataSet1.ApplyUpdates(0);       // 提交数据表单// 将修改的数据提交到数据库,0表示不允许发生错误

编辑和删除数据

// 编辑
Self.ClientDataSet1.Edit;
// 删除
Self.ClientDataSet1.Delete;


一点点笔记,以便以后翻阅。

上一篇:初识 C#/.net 基础【01】
下一篇:Delphi 方法属性参数新注释

发表评论

最新留言

初次前来,多多关照!
[***.217.46.12]2025年03月18日 19时02分48秒