摘要：
我经常让GPT写一些简单的代码,它确实也能给出相对满意的结果,但是这单元的名称总是和我的不一样 我们在delphi中新建新项目名称一般都是Unit1,所以我们首先要先把Unit1修改成与GPT一样的名称才可以. 首先是保存我们的新项目,然后关闭.当然里面是空白的,什么代码和控件都没加.保存后这是新项 阅读全文
posted @ 2024-01-15 19:39
一曲轻扬
阅读(226)
评论(2)
推荐(0)
摘要：
有个客户表: 现在需要创建一个可以修改客户数据的窗体,我们一般的做法是: 1.选中数据表: 客户列表 2.在菜单中选择 "创建" --> "窗体". 3.调整一下格式,和添加一下按钮,就变成了这样,初始状态下,它会自动绑定字段值.此时如果用户对某个值做了修改,会直接修改数据表中的值,这不是我们想要的 阅读全文
posted @ 2024-01-13 09:22
一曲轻扬
阅读(248)
评论(0)
推荐(0)
摘要：
第一章 数据库基础 P3. 数据库的体系结构(纯理论,不重要) 三种模式：数据库系统的三级模式结构是指模式，外模式和内模式。 两种映射：外模式/模式映射，模式到内模式的映射 P5.数据模型 常见的数据模型有层次模型，网状模型和关系模型 P7.关系数据库的规范化，三条范式： 第一范式(1NF):在一个 阅读全文
posted @ 2023-12-02 08:40
一曲轻扬
阅读(242)
评论(0)
推荐(0)
摘要：
ACCESS报表真是一言难尽啊.看预览还挺正经的. 结果,放大之后 ,它裂开了,我也裂开了....打印出来,谁看谁尴尬... 调整了很久,还是解决不了,于是愤而改EXCEL.效果如下: Private Sub Command647_Click() '打印.点击后禁用此按钮,待操作完成后再恢复,如果你 阅读全文
posted @ 2023-11-30 15:43
一曲轻扬
阅读(174)
评论(0)
推荐(0)
摘要：
感谢我宅猫大哥的热心指导. 启动时等待验证码. 输入验证码后,等待处理数据 处理完成后,显示数据 实现原理:利用已有的账号和密码登录后产生的cookie,向服务器请求数据.返回的数据是JSON格式,后期需要自己整理. 注意,请在程序中使用同一个TnetHttpClient控件来完成.因为里面保存了c 阅读全文
posted @ 2023-11-27 18:12
一曲轻扬
阅读(621)
评论(0)
推荐(1)
摘要：
首先说明一下,这是我平生第一次接到 接口文档,认知有限,写得不对的地方,请大佬们多多指点. 下面是一个智能刀具柜关于库存查询的接口文档: 上面的参数中,appid 和 sign中的appsecret和macno是设备的常量值,要问设备服务商给. 上面的接口要分别设置header头和请求参数.而POS 阅读全文
posted @ 2023-11-22 15:14
一曲轻扬
阅读(392)
评论(6)
推荐(0)
摘要：
转载自:WIn7 下使用 NetHttpClient 请求HTPPS 网站 - EEEEEEEEEEEEEEEEEEE - 博客园 (cnblogs.com) WIn7 下使用 NetHttpClient 请求HTPPS 网站 在WIN7 下使用 HttpClient 会报以下两种错 ;1 Serv 阅读全文
posted @ 2023-11-22 11:32
一曲轻扬
阅读(1049)
评论(0)
推荐(0)
摘要：
文本框一个,在属性面板中设置 "格式"为合适的日期格式 然后设置它的键按下事件 Private Sub d交货日期_KeyDown(KeyCode As Integer, Shift As Integer) KeyCode = 0 End Sub 这样做的目的是防止用户输入不合法或者错误的日期,比如 阅读全文
posted @ 2023-11-11 13:55
一曲轻扬
阅读(155)
评论(0)
推荐(0)
摘要：
如果是放在 窗体模块 中: Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer 如果是放在 模块 中: Public Declare Function GetKeyState Li 阅读全文
posted @ 2023-11-10 15:24
一曲轻扬
阅读(51)
评论(0)
推荐(0)
摘要：
请在[布局视图]下设置,效果如下 Option Compare Database Dim s As Integer Private Sub Form_Load() '初始化变量 Me.TimerInterval = 10 Command4.Width = 0End Sub Private Sub F 阅读全文
posted @ 2023-10-31 10:08
一曲轻扬
阅读(106)
评论(0)
推荐(0)
摘要：
一.ColumnHidden 隐藏字段 For Each TEMP In Me.FM刀具项夹表.Form.Controls If Not TypeOf TEMP Is Label Then If TEMP.Name <> "RecordID" And TEMP.Name <> "项目" And TE 阅读全文
posted @ 2023-10-27 15:52
一曲轻扬
阅读(37)
评论(0)
推荐(0)
摘要：
2024-08-25更新 ' 引用 Microsoft XML, v6.0 库 ' 在 VBA 编辑器中，选择 工具 -> 引用 -> 勾选 Microsoft XML, v6.0 ' 加密函数：将密码明文编码为 Base64 格式 Function EncodeBase64(plainText A 阅读全文
posted @ 2023-10-15 21:36
一曲轻扬
阅读(196)
评论(0)
推荐(0)
摘要：
Private Const BITS_TO_A_BYTE = 8 Private Const BYTES_TO_A_WORD = 4 Private Const BITS_TO_A_WORD = 32 Private m_lOnBits(30) Private m_l2Power(30) Priva 阅读全文
posted @ 2023-10-15 20:22
一曲轻扬
阅读(75)
评论(0)
推荐(0)
摘要：
'在表单中添加新记录 DoCmd.RunCommand acCmdRecordsGoToNew ' 导航到上一条记录 DoCmd.RunCommand acCmdRecordsPrevious ' 导航到下一条记录 DoCmd.RunCommand acCmdRecordsNext ' 删除当前记录 阅读全文
posted @ 2023-10-15 19:41
一曲轻扬
阅读(341)
评论(0)
推荐(0)
摘要：
Function 隐藏与显示导航空格(ByVal f As Boolean) 'true 显示,false隐藏 If f Then DoCmd.SelectObject acForm, , True Else DoCmd.SelectObject acForm, , True DoCmd.RunCo 阅读全文
posted @ 2023-10-15 17:59
一曲轻扬
阅读(304)
评论(0)
推荐(0)
摘要：
Public Function Getpyszm(ByVal Chs As String, Optional bList As Boolean = True) As String Dim ardata(-20319 To -10247) As String ardata(-20319) = " a" 阅读全文
posted @ 2023-10-12 16:39
一曲轻扬
阅读(194)
评论(0)
推荐(0)
摘要：
在报表中插入三个无关联的文本框控件,取名分别为Text,Text2,Text3,他们的宽/高,上/左边距按需求自定义,可见均设置为否,如果你需要显示序号的话,text3可设置为可见 text 控件来源: =1 text 2:控件来源: =IIf([Text]<[Text3]+1,[Text],IIf 阅读全文
posted @ 2023-10-06 14:30
一曲轻扬
阅读(349)
评论(0)
推荐(0)
摘要：
原SQL: UPDATE 刀具申购明细 SET 刀具申购明细.关闭 = -1 where 刀具申购明细.申购数量<=(SELECT Sum(Round(Nz([入库数量],0)*1,2)) AS 入库合计 FROM 采购入库temp LEFT JOIN 刀具入库明细 ON 采购入库temp.申购ID 阅读全文
posted @ 2023-10-04 16:30
一曲轻扬
阅读(415)
评论(0)
推荐(0)
摘要：
如上图,需求是当用户点中[申请数量]字段下的值时,自动选中里面的值,但要求每次获得焦点时,只触发一次. 我首先想到的是用GotFocus 事件,核心代码无非就是SelStart和SelLength,但是发现它根本不起作用.于是只能用click事件尝试,结果运行正常. 但有个小BUG,就是每次点击都会 阅读全文
posted @ 2023-10-01 14:38
一曲轻扬
阅读(94)
评论(0)
推荐(0)
摘要：
转载自: delphi读写INI文件_delphi写数据到ini_苏生米沿的博客-CSDN博客 Delphi提供了读写INI文件的方法，Delphi操作INI文件最为简洁，这是因为Delphi提供了一个TInifile类，使我们可以非常灵活的处理INI文件。 一、INI文件的结构：;注释[小节名]关 阅读全文
posted @ 2023-09-20 08:54
一曲轻扬
阅读(988)
评论(0)
推荐(0)
浙公网安备 33010602011771号