合格公民
每次投票都是发自真心！
领取时间：2021/03/10
领取条件：第一次对回答或提问投票（顶）
加载中
原
DBExpress 链接Mysql
void __fastcall TForm1::ConnectDatabase() { con->Params->Clear(); con->DriverName="MySQL"; con->Params->Add("HostName=127.0.0.1"); con->Params->Add("User-Name=root"); con->Param...
Delphi 屏幕取词
要建个DLL实现钩子 unit GetWord; interface uses SysUtils, windows, messages; const NHD_GETWORD_TIMER = 2; const NHD_MAX_TEXTLEN = 1024; const NHD_WIN_INITPOSX = -1; const NHD_WI...
原
二叉树 非递归遍历
#include <stdio.h> // Binary Tree Node typedef struct node{ int data; struct node* lchild; //左孩子 struct node* rchild; //右孩子 } BTNode; /** * 创建二叉树 ( 递归) */ BTNod......
原
mOrmot 2.0 Json解析
[ {"FieldOutputGroup":"BBR","CName":"被保人序号","EName":"BBRNO","val":["孙悟空","",""]}, {"FieldOutputGroup":"TBR","CName":"日期","EName":"DATE","val":["孙悟空","孙悟空","孙悟空...
原
用 Delphi 正则表达式 分隔 字符串为字符数组
procedure TForm1.RzButton3Click(Sender: TObject); var ary: TArray<string>; re: TRegEx; // use RegularExpressions XE2 i: integer; begin re := TRegEx.Create('A.|B.|C.|D.|E.|F.'); ...
原
split 函数 delphi
type AryString = array of string; function splitString(str: string; ch: char): AryString; var n, StartIdx, CurrentSplit, FoundIdx: integer; pc, p: pchar; begin n := 0; pc := P.....
原
python pyside2 pyqt5 消息框 按钮 汉化
from PySide2.QtWidgets import QApplication, QMainWindow, QPlainTextEdit, QPushButton, QMessageBox def showmsg(text='没填写内容', title='消息'): messageBox = QMessageBox() messag...
原
from PIL import Image, ImageTK
ImportError: No module named PIL 解决方法：pip install Pillow
原
图像无闪烁循环滚动
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, V...
MemoryStreamToOleVariant 等一些函数
function MemoryStreamToOleVariant(Strm: TMemoryStream):OleVariant; var Data: PByteArray; begin Result := VarArrayCreate ([0, Strm.Size - 1], varByte); Data := VarArrayLock(Resul...
原
FDMemTable 内存表建索引
with FDMemTable1.Indexes.Add do begin Name := 'Index1'; Fields := Column.FieldName; options:=[soDescending]; Active := True; end;......
原
rust 奇怪的语法
name： String::from("string ...."); impl Dog{ fn get_name(&self)->&str{ &(self.name[..]) } } 这样的语法，多少有点. 反 .人 .类。 下面是完成同样功能的 C# 代码 string name = “......
没有更多内容
加载失败，请刷新页面
删除文章
文章删除后无法恢复，确定删除此文章吗？
删除动弹
动弹删除后，数据将无法恢复
公众号
视频号
深圳市奥思网络科技有限公司版权所有
粤ICP备12009483号
评论删除后，数据将无法恢复