cxlookupcombobox delphi dev
解决 DELPHI 中执行外部命令出现屏幕一闪的问题的方法
解决 DELPHI 中执行外部命令出现屏幕一闪的问题的方法 有的时候我们在DELPHI中使用ShellExecuteEx(exInfo: TShellExecuteInfo)函数执行一些外部命令，但会出现，屏幕一闪的问题，解决方法如下： 设置 exinfo.nShow := SW_HIDE; //隐 ......
delphi Panel和PageControl中加载窗体
Panel和PageControl中加载窗体 代码 Panel中载入窗体 procedure TForm1.Button1Click(Sender: TObject); begin Form2.Parent := Panel1; Form2.Align := alClient; Form2.Bord ......
delphi redisclient测试
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V ......
delphi 如何把一首mp3歌曲存入SQLite3里面qq81709989 (ChatGPT-4)
// 导入需要的单元uses System.IOUtils, System.SysUtils, FMX.Media, FMX.Types, Data.DB, FireDAC.Comp.Client, FireDAC.Stan.Param;// 定义一个全局变量，表示数据库连接var DBConnec ......
delphi JSON序列化（五）
关于TJSONConverters的使用 unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.C ......
delphi JSON序列化（四）
涉及的重要类 REST.Json，REST.JsonReflect，REST.Json.Interceptors, REST.Json.Types单元中。 一、TJson类 最简单的一个类，提供了JSON -> OBJECT和OBJECT -> JSON几个方法，方法有TJsonOptions参数， ......
delphi XE10 连接mysql 对于 timestamp 类型字段查询的问题
目前 使用 delphi XE10.1 连接mysql (版本 8.0.19) 提示： raised exception class EFDException with message '[FireDAC][Stan]-43. Value [000⎰̴] is out of [Cardinal] ......
docker直接运行vue3源代码npm run dev
有套代码，需要在服务器直接run dev，docker build玩起来。 步骤： 将自己的代码上传到服务器，本例：/home/flow/ruoyi-ui cd到项目根目录 ruoyi-ui，新建Dockerfile，内容如下，根据自己本地运行的node版本改第一行版本号。 FROM node:1 ......
最近刚自学的DELPHI,实操一下，涉及[变量，常量，函数，写配置项]
unit LoadForm; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms ......
LVM-相关命令报错-Devices file PVID xxxxxxxxx last seen on /dev/xvda4 not found
环境：AWS平台，使用t2.medium机型创建的EC2，然后制作的镜像 现象：通过镜像，创建 m5.large 机型的EC2，执行lvm相关的命令，报如下错误 [root@qq-5201351 ~]# vgs Devices file PVID sQ2p8KDx0VDRB5bpzsGq5uR6wP ......
Delphi10.3的DBGrid之外键显示(07)
要在设计的时候，界面上显示值 procedure TForm13.FDQuery1idGetText(Sender: TField; var Text: string; DisplayText: Boolean); begin if Sender.AsInteger =1 then text:='一 ......
uniGUI学习之脱离Delphi直接写ExtJS从入门到精通081ExtJs学习之Button.setStyle
最少代码：HelloWorld.html源文件下载 https://docs.sencha.com/extjs/6.7.0/classic/Ext.button.Button.html 点击 事件 <link rel="stylesheet" href="theme-gray-all.css"> < ......
C++ mysql libmysqlcppconn-dev insert into table
#include <chrono> #include <ctime> #include <fstream> #include <iomanip> #include <iostream> #include <map> #include <mutex> #include <random> #includ ......
uniGUI学习之脱离Delphi直接写ExtJS从入门到精通00_JavaScipt基本语法
<script> function func1(){ alert('func1()'); }; </script> <select> <option>aa</option> <option>aa</option> <option>aa</option> <option>aa</option> </s ......
Dev Express 经验
1.格式化行 private void moGridView_RowStyle(object sender, DevExpress.XtraGrid.Views.Grid.RowStyleEventArgs e) { var moView = moGridView.GetRow(e.RowHandl ......
uniGUI学习之脱离Delphi直接写ExtJS从入门到精通10基本JavaScript_<input>与ExtJS无关
...HTML 中的 input 标签,看这一篇就够了_html input ......
uniGUI学习之脱离Delphi直接写ExtJS从入门到精通09基本JavaScript与ExtJS无关
<script type="text/javascript"> function removeOption() { var x=document.getElementById("mySelect"); x.remove(x.selectedIndex); } </script> <select id ......
dev、st、uat分支存在多个特性一起开发测试时的冲突解决方式
1.最大的问题是f1和f2会同时开发，但是f1和f2却可能分两次上线，所以开发自测环境（dev）可能同时存在f1和f2的代码； 因此做这样的规定就能避免公共开发自测环境（dev）的代码流入不上线的内容到生产里； dev -> kf_dev // ERROR，kf_dev是开发自己的分支； uat - ......
2023-12-30-aliyun-dev-env
开发的烦恼 依赖很多的中间件，每天的本地开发都要启动很多的中间件服务。不但启动反锁，还严重占用电脑硬件资源。 于是，想起了不久前购买的云服务器。 服务器配置 只是一台配置简陋的云服务器，勉强可以分摊一部分的中间件服务。 如何快速访问 通过创建密钥对来实现免密码访问，告别复制粘贴长密码的烦恼。密钥对创 ......
2023-12-30-aliyun-dev-env
阿里云开发环境搭建 开发的烦恼 依赖很多的中间件，每天的本地开发都要启动很多的中间件服务。不但启动反锁，还严重占用电脑硬件资源。 于是，想起了不久前购买的云服务器。 服务器配置 只是一台配置简陋的云服务器，勉强可以分摊一部分的中间件服务。 如何快速访问 通过创建密钥对来实现免密码访问，告别复制粘贴长 ......
Delphi 类（TObject、TPersistent、TComponent、TControl、TWinControl、TCustomControl、TGraphicControl、TInterfacedObject）简单介绍
TObject: VCL中所有类的根类，即是说：VCL中所有的类/组件/控件都是从TObject中继承而来。TObject类中定义了基本的 构造方法和析构方法。 TPersistent: 继承于TObject，按字典中的意思是“持久类”(姑且这样叫它吧，因为我一直就是这样叫这个类的-_-|)。该类在 ......
delphi 重新打开（Reopen）或最近打开（Open Recent）列表维护
重新打开（Reopen）或最近打开（Open Recent）列表维护 介绍 列出最近打开的项目和文件，供选择重新打开。 重新打开列表 由一条线分为两组： 项目列在线的上方 （例如，MyBigApp.dproj 或 MyFastApp.cbproj） 源文件列在线的下方 （例如，MyControl.p ......
npm run dev > hhwl-platforma1.0. dev > wue-cli-service serve vue-cli-service’不是内部或外部命令，也不是可运行的程序或批处理文件。
这个错 主要npm i 就可以了 但是现在npm i 也报错 原因是: 重新装了一遍nodeJS ,在设置全局仓库的时候出了些许问题，先建立两个文件夹cache和global:然后打开然后去修改npmrc文件里面的参数 最后点击 node_global 和node_cacahe 这两个文件的属性 然 ......
delphi 窗体设计器选项（显示非可视组件、自动创建窗体）
窗体设计器选项（显示非可视组件、自动创建窗体） 选项介绍 窗体设计器的首选项。 Tools > Options > User Interface > Form Designer Grid options Display grid 在设计器上显示点网格点，以帮助对齐控件。 Use designer g ......
delphi 使用WIC（Windows 映像组件）加载图片
使用WIC（Windows 映像组件）加载图片 TWICImage 是 Microsoft Windows 映像组件的封装。 WIC映像是一个容器，允许加载多种映像格式。 可以使用 TWICImage 实例来加载、存储和显示位图、JPEG、PNG、GIF、TIFF 或使用 WIC API 注册的任何 ......
delphi - 调整表单大小，同时保持纵横比
https://www.coder.work/article/5928583 在Form1的 OnCanResize 事件添加以下处理程序似乎对我来说效果很好: procedure TForm2.FormCanResize(Sender: TObject; var NewWidth, NewHeig ......
delphi模拟redis单元
1 unit g_uSdRedis; 2 3 interface 4 5 uses 6 Windows, 7 Messages, 8 SysUtils, 9 Variants, 10 Classes, 11 Graphics, 12 Controls, 13 Forms, 14 Dialogs, 1 ......
Delphi：循环语句for-in
https://www.jianshu.com/p/0fd88af44e4b 1.for-in 循环中，循环对数组， 列表，字符串或其他某种类型的容器的每个元素进行操作。 2.打开IDE，新建VCL应用，添加一个button1，一个memo1，双击button1，编写代码： procedure TF ......
Delphi服务程序打开界面程序
function WTSQueryUserToken(SessionId: ULONG; var phToken: THandle): BOOL; stdcall; external 'Wtsapi32.dll'; procedure CreateProcessByUser; var Session ......