浮点 小数 位数delphi
freemarker 引擎模板保留两位小数，去尾法不进行四舍五入的方法
${4511.25?string("#.#")} 这个表达式的结果为4511.2；并不是传统的四舍五入规则；正确的应该是下面这个表达式： ${4511.25?string("#.#;;roundingMode=halfUp")} 这个表达式的结果为4511.3。 而 ${4511.35?string ......
根据置信度计算正态分布的标准分位数
/** * 根据置信度计算正态分布的标准分位数 * * @param confidenceLevel 置信度 * @return 正态分布的标准分位数 */ public static double getZValue(Double confidenceLevel) { NormalDistribu ......
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 ......
『LeetCode』4. 寻找两个正序数组的中位数 Median of Two Sorted Arrays
『1』合并两个正序数组 我的想法： 先借鉴归并排序的关键步骤将两个数组合并，然后根据数组长度是奇数还是偶数返回中位数。 实现代码： class Solution { // Using the Key Thinking of Merge Sort // M is the length of nums1 ......
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 ......
字符串转浮点型应用
一、 工业应用中的问题 1、 国内自定义协议众多，数值在计算机中存储方式五花八门。 2、 计算机实际存储方式理解不容易或者忘记。 3、 硬件技术发展，让使用存储内存不再是难解决问题，浪费存储内存和传输带宽。 二、 计算机中浮点型简介 1、 浮点型定义 浮点型是计算机表示整数之间的数值类型。简述就是一 ......
Delphi新语法IfThen
https://docwiki.embarcadero.com/Libraries/Sydney/en/System.StrUtils.IfThen function IfThen(AValue: Boolean; const ATrue: string; AFalse: string = ''): ......
delphi cxgrid 过滤列表增加右键
首先弹出来的下拉过滤列表也是一个form 思路,在不改源代码的情况：hook,捕捉 WM_SHOWWINDOW 消息，通过源码得知窗口类名 为”TcxGridFilterPopup“ 再通过句柄转得到实例，同时在本单元type 一下新的 TcxGridFilterPopup， TcxGridPopu ......
有小数的数字转int类型时的几种转换方式（得到的结果是不一样的）
static void Main(string[] args) { double a = 20.6; int b = Convert.ToInt32(a);//5舍6入 int d = (int)double.Parse(a.ToString());//（int）这种转换直接舍弃小数 double ......
Qt保留小数
以保留小数点后2位为例，四舍五入 方式一 QString txt = QString("%1,%2,%3").arg(m_fAngle,0,'f',2).arg(m_fDeltaX,0,'f',2).arg(m_fDeltaY,0,'f',2); 方式二 QString txt=QString::a ......
力扣第 376 场周赛（三分，中位数贪心，滑动窗口）
用一个哈希表记录一下，然后遍历统计一下即可。 class Solution { public: vector<int> findMissingAndRepeatedValues(vector<vector<int>>& grid) { int n = grid.size(); unordered_s ......
DELPHI模板编程
DELPHI模板编程 procedure TCRUD<T>.execsql(OnTableModel: TTableModel); //执行事务性SQL begin if req.Body = nil then Exit; var pool: TDBPool := GetDBPool(dbid); ......
delphi ADO通过ODBC连接MySQL
ADO通过ODBC连接MySQL 操作步骤 下载32位MySQL ODBC 驱动 （MySQL Connector/ODBC 下载地址） 选择ADO驱动程序 Microsoft OLE DB Provider for ODBC Drivers 设置连接字符串 连接字符串 使用数据源名称 Provid ......
Delphi实现登录窗体与主窗体的过程
登录窗体： type TfrmLogin = class(TForm) btn1: TButton; procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declarations ......
Delphi Debug模式下可以但是Release模式下报错原因之一
今天上午才遇到的一个问题，Delphi在debug模式下运行好好的，切换到release模式下竟然无法正确返回？ 把工程设置中的 Optimization 中的勾去掉再编译， 这下Release模式下运行没有问题了。 当然这里只记录了这一种情况，大家如果遇到跟我一样问题的时候不妨试试，看能不能解决问 ......
Delphi Android程序启动过程
文章转载于不得闲大师的文章，源文链 https://www.cnblogs.com/DxSoft/p/4460236.html Delphi的Android程序是原生的程序，也就是NativeActivity。那么就需要先看一下NativeActivity的原理， 在AndroidManifest. ......
delphi 变体Variant数组常用操作
变体Variant数组常用操作 代码 procedure TForm1.Button1Click(Sender: TObject); var Arr1, Arr2, Arr3: Variant; I, J: Integer; begin //创建包含10个整数类型元素的变体数组 Arr1 := Va ......
C语言中小数转字符串
小数转字符串写之前，先来看看标准C？1 小数转字符串--标准C2 小数转字符串--非标准C写之前，先来看看标准C？其实，很多时候我们都会混淆一个概念：标准C？这里简要分享下，标准C其实就是ANSI C标准，里面收纳了绝大部分函数，但是人们发现有些经常使用的API没有被收纳，比如今天的主题–小数转字符 ......
整型和浮点型是怎么存储的
先看一段程序： 1 int main() 2 { 3 int n = 9; 4 float* pFloat = (float*)&n; 5 printf("n的值为：%d\n", n);//将一个整型值以整型的形式取出来 6 printf("*pFloat的值为：%f\n", *pFloat);// ......
CMC-Oracle科学计数法转换控制小数显示位数
当使用oracle进行数据计算时，当数据过小会出现科学计数法，例如：4.13693246457752E-6这个时候可以使用to_char函数进行数字位数控制 SELECT TO_CHAR(number, 'fmt') FROM DUAL; select a.arrivalavgrate arriva ......
保留N为小数 不四舍五入
const precisionFormatEther = (value, prec = 4) => { if (!value || !Number.isInteger(Number(value)) || Number(value) < 0) return '0' let x, y, z x = fo ......
【算法】【线性表】两个排序数组的中位数
1 题目 两个排序的数组A和B分别含有m和n个数，找到两个排序数组的中位数，要求时间复杂度应为 O(log(m + n))。 中位数的定义： 这里的中位数等同于数学定义里的中位数。 中位数是排序后数组的中间值。 如果有数组中有n个数且n是奇数，则中位数为 A((n-1)/2)。 如果有数组中有n个数 ......
C++学习笔记三：变量与数据类型（浮点型）
1. 数据类型与所占内存大小 类型 大小 精度 注意 float 4 7 double 8 15 默认 long double 16 >double 精度就是有效数字 2. 声明和初始化 float number1 {1.12345678901234567890f}; // Precision : ......
[LeetCode Hot 100] LeetCode295. 数据流的中位数
题目描述 思路：一个大根堆+一个小根堆+保持数量 一个大根堆用来记录数轴左边的数值 一个小根堆用来记录数轴右边的数值 大根堆的容量要么等于小根堆的容量(此时是偶数个有序整数列表)，要么大根堆的容量比小根堆的容量大1(此时是奇数个有序整数列表) 如果数量不符合上述条件，则将超过容量的那个堆的堆顶元素插 ......
delphi 提示 Access violation at address 014CA924 in module 'EBD.exe'. Read of address 0D1A0000排查
通过类似 Access violation at address 014CA924 in module 'EBD.exe'. Read of address 0D1A0000 提示查看代码出错的行。 1、开启map project -> options -> Linker -> Map file 选 ......
C# 小数 ToString()
float num = 1.123F; string result = num.ToString("0.##"); //1.12 Console.WriteLine(result); result = num.ToString(".##"); //1.12 Console.WriteLine(res ......