上一页 1 2 3 4 5 6 7 8 9 ··· 11 下一页
摘要: 如上图所示,下拉框明显宽度不够,右边的数据都没展现出来.窗口模式下是不能设置宽度值的. 解决的方案是在设计模式下,给"产品编码"这个字段设置一个合理的宽度值,便数据全部展现出来 然后回到数据视图下,发现数据已经能正常显示了.注意,此时,当字段的宽度小于下拉菜单的宽度时,下拉菜单的宽度不会改变,但是当 阅读全文
posted @ 2023-07-21 14:42 一曲轻扬 阅读(242) 评论(0) 推荐(0)
摘要: Private Sub Form_Load() For Each temp In Me.Controls If Not TypeOf temp Is Label Then temp.OnClick = "=GetVal()" Next If Me.产品编码.FormatConditions.Coun 阅读全文
posted @ 2023-07-19 11:44 一曲轻扬 阅读(310) 评论(0) 推荐(0)
摘要: '在A窗体中设置B窗体中组合框的值 Private Sub Command9_Click() OpenFormAneCloseMe ("订单管理") '注意这里是先打开窗体,等窗体打开后再设置值 Forms("订单管理").Controls("Combo53").Value = "全部" Forms 阅读全文
posted @ 2023-07-13 21:09 一曲轻扬 阅读(107) 评论(0) 推荐(0)
摘要: Private Sub Form_Load() Me.Move -3000, -2500, Me.Width, 15000 For Each temp In Me.Controls If TypeOf temp Is TextBox Then temp.OnChange = "=FilterTabl 阅读全文
posted @ 2023-07-13 20:10 一曲轻扬 阅读(60) 评论(0) 推荐(0)
摘要: Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) On Error Resume Next If Me.SelHeight > 1 Then '判断用户是否多选 Dim i 阅读全文
posted @ 2023-06-22 15:16 一曲轻扬 阅读(35) 评论(0) 推荐(0)
摘要: TcxGridPopupMenu控件用来给cxgrid设置右键菜单的.它长这样 属性面板长这样: 默认的系统菜单长这样: 这菜单上面有好几个选项我不想要,怎么办?隐藏它呗! private { Private declarations } procedure StdHeaderMenuPopup(S 阅读全文
posted @ 2023-05-22 22:10 一曲轻扬 阅读(557) 评论(0) 推荐(1)
摘要: 效果图: 实现的原理: 1.在数据库建一个表,然后绑定到cxgrid上面.数据表各字段的数据类型,按你的业务需求来设置,同时要允许空值,因为我们必须让它们保持空值,这样在绑定到cxgrid时,才会是空白的,然后再弄个自增的主键ID.下面这张图是我研究时截的图,不想改了,凑合着用吧 2.绑定过程略. 阅读全文
posted @ 2023-05-21 21:29 一曲轻扬 阅读(734) 评论(0) 推荐(0)
摘要: 效果图: 点击GetImage,会在程序目录下生成一个表格截图的图片文件,打开后如下图: 以下是代码: procedure TForm4.SpeedButton1Click(Sender: TObject); var gridView: TcxGridDBTableView; focusedItem 阅读全文
posted @ 2023-05-20 22:28 一曲轻扬 阅读(281) 评论(0) 推荐(0)
摘要: 在delphi中,什么情况下使用QuotedStr?什么情况下使用QuotedString? QuotedStr: SQL语句拼接,加单引 QuotedString:JSON,加双引 DeQuotedString:去引号 阅读全文
posted @ 2023-05-14 21:13 一曲轻扬 阅读(243) 评论(0) 推荐(0)
摘要: 这两天听大佬说"可视化绑定"的效率很低,再加对下拉菜单,单选,复选框等控件绑定操作的未知,于是我决定把普通组件,改为DB组件. 正常来讲,基本上所有DB组件只要设置好了数据源和字段绑定,就能显示数据来, 但是我这边就出现了一点意外,源于对sqlite数据库认知度不够的原因 如上图所示,DB控件设置好 阅读全文
posted @ 2023-05-12 13:00 一曲轻扬 阅读(515) 评论(0) 推荐(0)
摘要: 所谓"流", 就是一段数据或是一块内存;在进行流操作时, 我们不必关心流中的数据到底是什么; 只需要知道流的大小和当前的指针位置. 所以流只有两个属性: Size、Position.对流的操作, 不过就是读取和写入. 所以流最主要的方法就是 Read 和 Write.在很多控件的使用中, 读取主要用 阅读全文
posted @ 2023-05-09 18:16 一曲轻扬 阅读(1061) 评论(0) 推荐(1)
摘要: 抛出问题: 排除过程: 1.在TFrmChangePW窗口的create事件里打断点,结果发现,根本没停顿,所以判断问题不在TFrmChangePW窗体里,而是showmodal这语句里出了问题,点中断,跳到抛出错误的地方: 2.if 里的四个条件,检查了第一个,第二个和第四个都是没问题的,第三个( 阅读全文
posted @ 2023-05-09 10:40 一曲轻扬 阅读(846) 评论(0) 推荐(0)
摘要: 效果图: 代码超简单的: procedure TFrmLogin.FormCreate(Sender: TObject);var Fmutex: THandle; begin//创建一个命名的互斥量,确保同一时间只有一个实例在运行 //第三个参数是自定义的,随便取的,但一定要是唯一的标识 FMute 阅读全文
posted @ 2023-05-05 21:06 一曲轻扬 阅读(201) 评论(0) 推荐(0)
摘要: 先看效果: 窗体边框设置为BorderStyle:bsNone,显示位置为Position:poOwnerFormCenter.调整成合适的大小. 我封装成了一个函数.这样消息窗口就纯粹就是一个模板了,里面没有任何代码,所有功能都可以写在DM或者其他窗体中,当调用时,直接调用这个函数就可以了 补充: 阅读全文
posted @ 2023-04-25 20:24 一曲轻扬 阅读(369) 评论(0) 推荐(0)
摘要: 效果图: 嗯我们今天主要看下面这一部分的实现: 四个按钮是TscGPCharGlyphButton控件。上面一行显示记录位置和快速跳转的那一坨,它其实是由四个TscGPEdit控件拼接构成的。 红色括号3那里,其实是把边设置成了红色,而4这个则是设置边框不显示.然后两个控件高度一致,但要比最外面的1 阅读全文
posted @ 2023-04-21 23:37 一曲轻扬 阅读(504) 评论(0) 推荐(0)
摘要: 效果是在IDE里输入函数名称后,在下方出现你对这个函数的注释内容: 源码: 参考地址:https://docwiki.embarcadero.com/RADStudio/Sydney/en/XML_Documentation_Comments 以上内来源: Delphi研习社②群 @球球 阅读全文
posted @ 2023-04-12 09:19 一曲轻扬 阅读(299) 评论(0) 推荐(0)
摘要: 经过其他老师指点,自己摸索,发现如何实现,现说明如下,供大家参考。一、建立图标文件 1、建立一个24X24的256色BMP格式文件。 2、文件命名为该组件的名称。二、建立资源文件:Project→Resource and Images,点击Add将BMP格式图标文件加入,Resource Ident 阅读全文
posted @ 2023-04-11 22:31 一曲轻扬 阅读(436) 评论(0) 推荐(0)
摘要: 在SQL语句中,过滤条件可以放在JOIN子句的ON条件中,也可以放在WHERE子句中,两者有着不同的作用。 ON条件中的过滤条件 当查询涉及多个表时,使用JOIN操作将它们连接在一起。在JOIN子句中,可以使用ON关键字指定连接条件。ON条件用于指定两个表之间的匹配条件,以便将它们连接在一起。此时, 阅读全文
posted @ 2023-03-23 18:26 一曲轻扬 阅读(724) 评论(0) 推荐(0)
摘要: 在Access VBA中,类是一种用于封装数据和方法的编程结构。类可以帮助我们更好地组织和管理应用程序中的代码,使代码更易于维护和扩展。 以下是一些关于类的基本概念和用法: 类的定义 在VBA中,可以使用Class关键字定义一个类。类的定义通常包括属性和方法,用于描述类的行为和状态。例如: Publ 阅读全文
posted @ 2023-03-22 18:40 一曲轻扬 阅读(231) 评论(0) 推荐(0)
摘要: 在Access中将单价字段设置为文本类型的优缺点如下: 优点: 可以保存任意格式的数据,包括货币符号、千位分隔符、小数点等。 可以在文本类型字段中保存数字和非数字的数据,例如“未知”或“免费”。 可以避免由于浮点数精度问题导致的计算错误,例如0.1+0.2=0.30000000000000004。 阅读全文
posted @ 2023-03-22 18:22 一曲轻扬 阅读(177) 评论(0) 推荐(0)
上一页 1 2 3 4 5 6 7 8 9 ··· 11 下一页