- 博客(5)
- 收藏
- 关注
原创 Delphi dbgrideh序号
数据库里面的数据没有序号的数据,在dbgrideh上新增一列自定义其字段,例如:id。在dbgrideh控件上的‘OnDrawColumnCell’事件下写下代码。在unidatesource的‘OnDataChange’事件下写下。if DataCol = 0 then //设置在第一列。在编码的开头定义i,为integer。
2023-03-28 13:51:12 363 1
原创 Delphi dbgrideh 排序
第一步是dbgrideh的属性,dbgrideh的optionseh下的dghAutosortMarking的属性设置true第二步点击要进行排序的列,将Title下的titlebutton设置成true在上图的红框上面是sortMarker是表示列标题后是否有箭头,smNoneEh代表的是没有smUpEh上箭头,smDownEh下箭头第三步代码写在OnTitleBtnClick里varsortstring:string; ...
2022-03-16 17:13:51 1604
原创 delphi application.MessageBox 提示框
图标:application.MessageBox('插入成功','成功', MB_ICONINFORMATION);MB_ICONASTERISK也一样的结果,有一个蓝底的“i”字application.MessageBox('插入成功','成功', MB_ICONQUESTION);application.MessageBox('插入成功','成功', MB_ICONSTOP);MB_ICONHAND和MB_ICONERROR也会出现红底的叉叉。...
2021-10-29 16:20:13 619 1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人