delphi7 if not DirectoryExists(Edit1.Text) then 判断目录是否存在 begin //判断目录不存在 end; delphi 10.3 uses FileCtrl; procedure TForm4.FormCreate(Sender: TObject); ...
procedure Tfrm_rk.DBGrid1KeyPress(Sender: TObject; var Key: Char); begin if key=#13 then { 判断是按执行键} if not (ActiveControl is TDbgrid) Then Begin { 不是在 ...
分类：
移动开发 时间：
2020-11-20 11:49:19
阅读次数：
18
1.創建隊列及隊列表且启动之 aq_admin login begin --Create a table for queues dbms_aqadm.create_queue_table (queue_table=>'aq_msg_qtab2',queue_payload_type=>'AQ_ADM ...
分类：
数据库 时间：
2020-11-19 12:45:07
阅读次数：
17
P5110 块速递推 题意 多次询问，求数列 \[ a_i=\begin{cases}233a_{i-1}+666a_{i-2} & i>1\\ 0 & i=0\\ 1 & i=1\\ \end{cases} \] 的第 \(n\) 项在 \(\mod 1e9+7\) 意义下的值的异或和。 思路 首 ...
分类：
其他好文 时间：
2020-11-19 12:17:38
阅读次数：
6
微信数据转换 分析提取微信零钱数据 # 微信数据转换 def wxProcessDo(total_list, begin, companyName, accountingTitle): # 期初22.55 期末余额 421.65 total_list = total_list[17:] # 倒序输出 ...
分类：
微信 时间：
2020-11-18 13:08:56
阅读次数：
34
1.for循环语句 在计算机科学中，for循环（英语：for loop）是一种编程语言的迭代陈述，能够让程式码反复的执行。 它跟其他的循环，如while循环，最大的不同，是它拥有一个循环计数器，或是循环变数。这使得for循环能够知道在迭代过程中的执行顺序。 1.shell中的for循环 shell中 ...
分类：
系统相关 时间：
2020-11-17 12:33:06
阅读次数：
19
PL/SQL 过程块 PL/SQL 块是构成 PL/SQL 程序的基本单元 将逻辑上相关的声明和语句组合在一起 PL/SQL 分为三个部分，声明部分、可执行部分和异常处理部分 [DECLARE declarations] --声明部分 BEGIN executable statements--可执行 ...
分类：
数据库 时间：
2020-11-17 11:50:50
阅读次数：
15
一、创建表 CREATE TABLE sys_user ( user_id bigint IDENTITY(1,1) NOT NULL PRIMARY Key, user_code varchar(32) NULL, user_name varchar(64) NULL, user_password ...
分类：
编程语言 时间：
2020-11-16 13:33:25
阅读次数：
8
一、编译和调试环境配置 1、安装vscode中的C/C++扩展 打开vscode，点击侧边栏的扩展（Ctrl+Shift+X），搜索c++，点击安装C/C++ C/C++扩展不包含C++编译器或调试器 2、安装C++编译器和调试器 本机使用Windows系统，因此下载Mingw-w64（Window ...
分类：
其他好文 时间：
2020-11-13 13:17:24
阅读次数：
23
tricks 自定义匹配函数的回文子串问题 主体思想：把平常写的 == 换成任意匹配函数 例题 在这题中，匹配函数为： \[ f(a,b)= \begin{cases} 1 & (a \oplus b=1) \\ 0 & \operatorname{else} \end{cases} \] 然后要你 ...
分类：
其他好文 时间：
2020-11-12 14:15:19
阅读次数：
5
