一曲轻扬

摘要： 需求说明: 程序设计: 效果演示: 设计思路: FrmCK 只负责发布事件，不关心谁在监听. FrmGrid 只负责响应事件，不关心事件来源. 创建过程: 一.创建接口单元FrmInterface.然后在单元中需要声明两个接口,即监听事件的接口和发布事件的接口 1.监听接口只需要声明一个过程即可,它 阅读全文

摘要： 效果展示: 核心代码: procedure TMain.scAdvancedListBox2Items0Click(Sender: TObject); //单位设置 begin //获取点击的按钮的caption属性 var i := TscAdvancedListBox(Sender).ItemI 阅读全文

摘要： 使用 AnsiToUtf8 方法转换一下就可以了 procedure TForm1.LoadSettingsFromIni; var IniFile: TIniFile; begin IniFile := TIniFile.Create(FIniFilePath); try UserNameEdit 阅读全文

摘要： 重要提示: xls后缀的文件与xlsx后缀的文件,连接方法不一样. 可以使用代码来实现: FDConnection1.Connected := false; FDConnection1.Params.Clear; FDConnection1.DriverName := 'ODBC'; FDConne 阅读全文

摘要： 一.设置文本属性. 注意到,在CELL这个方法中,与我们常用的VBA参数的写法是相反的. DELPHI先列后行: property Cells[ACol, ARow: Integer]: string read GetCells write SetCells; VBA先行后列: CELLS(ROW, 阅读全文

摘要： 需求: 把登陆窗体中的图片,替换为数据表中的图片. 思路: 1.把图片保存到本地 2.修改图片控件的图片路径 难点: 1.对附件的操作方法不熟练 2.不同的数据库操作方法有差异 主要用到的方法: Field2.SaveToFile 方法 (DAO) 效果(左侧图片的变化): 原窗体: 载入表中图片后 阅读全文

摘要： 其中 数据表tblLinkedTables中,记录了所有需要外链的表名. 核心代码如下: Private Sub cmdBrowse_Click() With Application.FileDialog(msoFileDialogFilePicker) .InitialFileName = Cur 阅读全文

摘要： //带密码 SELECT * FROM [;database=C:\Users\Administrator\Desktop\VBA删除后端表\数据源\Data2.mdb;pwd=123].A; //不带密码 SELECT * FROM [;database=C:\Users\Administrato 阅读全文

摘要： 设置视图: 运行效果: unit HideWindown; interface uses Windows, Messages, SysUtils, Classes, Forms, StdCtrls, ActiveX, ComObj, ShellAPI, Tlhelp32, Vcl.Controls, 阅读全文

摘要： 我在ACCESS中添加了TreeView插件,结果电脑A上打开没问题,电脑B打开时就报MSCOMCT2.OCX和MSCOMCTL.OCX有错. B电脑之前是可以正常使用的,但是加了TreeView插件之后报错,说明是插件引用的问题. 在网上下载了这两个文件,复制到C:\WINDOWS\SYSTEM3 阅读全文

摘要： 用过Round和INT函数都没办法解决. 查询结果: 原因: 参与计算的字段使用了单精度或者双精度数据类型,改成小数类型即可解决. 阅读全文

摘要： 为了更详细地解释 Base64 编码的过程，我们可以从头开始逐步分解这个过程。假设我们有一段简单的 ASCII 文本 "Hello"，我们将详细展示如何将其转换为 Base64 编码。 1. 获取文本的 ASCII 码 首先，将 "Hello" 转换为其 ASCII 码值。每个字符的 ASCII 码 阅读全文

摘要： 验证规则分为字段级别与表级别 在字段级别的验证规则中,你只能使用本字段的数据,如果表达式涉及其他字段的数据,则会提示你: 表级别的验证规则,可使用的表内的所有数据,以适应更复杂的逻辑表达式,上图的错误,我们只需要把表达式写到表级别里面即可. 另外,表级别的验证规则,只能写一个,请合理使用. 解决的方 阅读全文

摘要： Forms!控制面板!NavigationSubform.SourceObject = "目标窗体" 注: 在导航窗体的属性面板中不会显示SourceObject属性,但它是真实存在的. 阅读全文

摘要： 一.插入选项组控件后,它的默认名称是Frame+编号 如果你要遍历所有选项组控件,可能会被它的名字Frame所迷惑.以为就是要找Frame类型的对象,但其实是不对的,正确的遍历方式应该是 For Each tempF In Me.Controls If TypeName(tempF) = "Opti 阅读全文

摘要： 有这样一个窗体,它的布局如下图,我需要刷新 数据表E(数据表类型的窗体)的数据,路径怎么写? 这里提供一个思路,就是在数据表E里面写一个全局过程,比如 Public sub ReQueryData() me.form.ReQuery end sub 然后在需要调用的地方这么调用即可: From_数据 阅读全文

摘要： 今早被自己蠢到.在输入密码的时候,不小心按下了大小写转换键,结果却能正常登陆,当场整个人都不好了.... 然后测试: 简直了..... 分析原因是,把其他语言的特性,理所当然原搬过来用了... 解决方案: 使用StrComp函数进行比较,与NZ类似,此函数为ACCESS特有,可直接在SQL和VBA中 阅读全文

摘要： Private Sub 权重_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode <> vbKeyReturn And KeyCode <> vbKeyUp And KeyCode <> vbKeyDown And vbKeyTab Th 阅读全文

摘要： 这是我实际工作中遇到的问题.两个窗体同时设置了"模式"属性为"是",预想中的结果是左边最后弹出的数据表窗体为最上层窗体.结果左右两个窗体同级了,能点左,也能点右.当然主窗体不能点是正确的. 解决思路: 这明显就是"模式"冲突了.所以我们设置成只同时存在一个模式属性为"是"的窗体即可.也就是当需要打开 阅读全文

摘要： Dim ID As Long ID = Me.FMTempMessage.Form.UserID Me.FMTempMessage.Form.Requery Dim rs As Recordset Set rs = Me.FMTempMessage.Form.Recordset rs.MoveFir 阅读全文