interger delphi tlist lt
解决 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 ......
abc097d<并查集，排列>
题目 D - Equals 给出\(1\sim n\)的排列p，给出\(m\)种对换\((p_i, p_j)\)，在这\(m\)种对换中任选操作，对原排列对换任意多次。求能够实现的\(p_i = i\)的最大个数为多少？ 思路 将m中对换中能够相互关联的位置归为一组，这组位置之间可通过对换操作实现任 ......
abc096d<素数筛，整除>
题目 D - Five, Five Everywhere 寻找n个素数，使得这n个素数中任意5个数之和都是合数。 思路 如果一个数除5余1，那么5个这样的数之和一定能被5整除； 筛出范围内所有满足上述条件，且为素数的数即可。 总结 如何想到除五余一这一点呢？ 首先应思考如何构造合数，想到如果是5个数 ......
[cpp]: 以模板作为模板参数 -- <template>
[cpp]: 以模板作为模板参数 -- <template> 一、template 说明 1、模板参数：以‘模板’作为模板的参数。 2、示例 1 // template<class T1, class T2> class W：模板参数W 2 // W<T1, T2>: W有两个参数【T1, T2】 ......
[cpp]: Standard Input/Output -- <iostream>
[cpp]: Standard Input/Output -- <iostream> 一、基本说明 1、IO library 2、library(part): <iosfwd> 3、library(part): <ios> 4、library: <isotream> 二、参考文档 1、 input/ ......
abc095d<思维>
题目 Static Sushi 一个圆桌上摆着n个食物，吃掉每个食物得到一定能量，沿着圆桌任意顺时针逆时针走，每走一米消耗1点能量，求能够得到的最大能量。 思路 一共4种走法： 顺时针走到某位置离开； 逆时针走到某位置离开； 顺时针走，而后走回原点，在逆时针走到某位置，离开； 逆时针走，而后走回原点 ......
abc094d<组合数>
题目 Binomial Coefficients \(n\)个数中选择两个数作为组合数\(C(m,r)\)的\(m\)和\(r\)，使得组合数的值最大。 思路 首先选择最大的数作为\(m\)； 其次，对于确定的\(m\)，要使得组合数最大，使得\(r\)接近\(\left \lceil \frac{ ......
[cpp]: concept --<template>
[cpp]: concept --<template> 一、说明 1、concept 定义一个“C”，“C”是一组“模板参数T”的限制条件。“C”：只有满足限制条件“C”模板的参数T，才能通过编译。 2、代码示例 1 // 定义概念“C1” 2 3 template<class T> 4 conce ......
C#中的List<T>和Dictionary<TKey, TValue>的底层原理
List<T>和Dictionary<TKey, TValue>本质上上是顺序表，用数组来存储数据，在添加和删除数据时，如果需要调整数组长度，则需要进行数组拷贝。 也可以理解成就是对数组的一种扩展，从而使开发者更方便的调用添加、删除、插入等操作。 所以，优化的思路是，对于大概知道元素的数量时，在实例 ......
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 ......
abc314e<构造，思维>
题目 D - Grid Components 在不超过100×100的方格中染黑白色，使得白色联通块个数为a，黑色连通块个数为b。 思路 固定使用100×100的格子，首先将上半部分全涂白，下半部分全涂黑；此时黑白两色的连通块的个数均为1； 而后在白色区域，在不破坏白色区域白色块联通性的前提下，离散 ......
include <linux/ipv6.h> include <netinet/in.h>
redefinition of `struct in6_addr' 的解决办法 # make[ 0%] Built target GENHDR[ 0%] Building C object lib/CMakeFiles/websockets.dir/plat/unix/unix-sockets.c. ......
P9576 「TAOI-2」Ciallo～(∠・ω< )⌒★
题意 求字符串 \(s\) 删去每个区间后字符串 \(t\) 出现的次数之和。 Sol 不难注意到答案分为两类： 删去区间后，一个前缀和一个后缀刚好拼成 \(t\)。 存在于前缀之中，本身就与 \(t\) 匹配，以及存在于后缀之中，与 \(t\) 匹配的串。 第二类明显是 \(trivial\) 的 ......
[cpp]: <fstream> - read_from_file
[cpp]: <fstream> - read_from_file 一、介绍 1、介绍：从文件【big.cpp】读取内容，然后将【读取内容】输出到【屏幕】。 2、主程序源文件：iotest.cpp 3、被读取的文件：big.cpp 二、源代码 1、主程序源代码：iotest.cpp 1 /* fil ......
从嘉手札<2024-1-10.2>
我们每个人都是在受挫中成长起来的 你不能剥夺他人在受苦中获益的权利 大部分人对吃苦的含义可能理解的太肤浅了 穷并不是吃苦 吃苦的本质是长时间为了某个目标而聚焦的能力 在这个过程中放弃娱乐生活、放弃无效社交、放弃无意义的消费 以及在这个过程中不被理解的孤独。 它本质上是一种自控力、自制力、坚持和深度思 ......
C# IEnumerable<T> 分批次返回
有的时候数据源是IEnumerable<T>，返回的数据可能有几百万条，咱们既不能等其几百万条都迭代完了后再保存（内存顶不住），也不能来一条就保存一条（cpu亚历山大）， 希望能分批次的保存，比如等其每次枚举1000条，然后统一保存一下，于是我就写了2个IEnumerable<T>的分批扩展方法，一 ......
C# 接口IBufferWriter<T>学习理解
IBufferWriter<T>是同步缓冲写入的协定，实现这个接口就拥有一个输出接收器 我是最近研究Protobuf序列化时发现它有个传递IBufferWriter<T>的构造，使用者只需要自己实现一个IBufferWriter<T>，创建后传递给Protobuf-net的序列化函数，就能得到其序列 ......
从嘉手札<2024-1-10>
冬月初零 年岁缭绕 秋月无影 倏尔迢迢 暗章难牧 纵使再怎么保有年少飞扬的内心 时光仍带去了我二十六年的光阴 出乎意料的收到了很多人的祝福 可喜的是 仍有不少人记挂着我 于我而言 无疑是莫大的荣幸和欣喜 正如十九年前我第一次收到发小两毛钱的生日蛋糕 倘若说完全没有内心波动是绝无可能的 无数次的心理暗 ......
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] ......
记录用<input type="file">取代<video><canvas>
之前搞了H5里调用摄像头拍照上传图片的功能，使用<video><canvas>标签，然后 navigator.mediaDevices.getUserMedia(constraints)来打开摄像头，再用canvas.draw制作图片。参加上上篇文档。 但是这个功能需要HTTPs。要花钱买SSL，我 ......
泛型 <T>
一、什么是泛型先看一段介绍 泛型(Generic)，是将不确定的类型预先定义下来的一种C#高级语法，我们在使用一个类，接口或者方法前，不知道用户将来传什么类型，或者我们写的类，接口或方法相同的代码可以服务不同的类型，就可以定义为泛型。这会大大简化我们的代码结构，同时让后期维护变得容易。 泛型很适用于 ......
c# 类重写Equal，GetHashCode，实现IComparable，IComparable<T>
/// <summary> /// Array,List<T> 排序都依赖于IComparable /// </summary> public class Student : IEquatable<Student>,IComparable, IComparable<Student> { public ......
最近刚自学的DELPHI,实操一下，涉及[变量，常量，函数，写配置项]
unit LoadForm; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms ......
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"> < ......