Java和C#里面的For In用起来真爽,我们Delphin也不用眼红了,从D2005起,Delphi里面也有这个功能了. 首先我们要知道哪些类型可以用For In吧,下面就是: for Element in ArrayExpr do Stmt; 数组 for Element in StringExpr do Stmt; &n
转载
2023-07-04 19:48:31
462阅读
下面要示范的就是在XE2下完成.其实源码检出后,里面有30多个示例,几乎涵盖了Python4Delphi的所有方面.好吧,我们下面做个简单的加法计算器,主要是演示二者之间的参数传递.
转载
2023-07-17 23:54:40
537阅读
为了提高应用程序的性能，可以用inline声明一个函数过过程，对于声明为inline的过程，编译器在编译时，会取代正常的过程调用方式，取而代之是直接把这个函数的编译代码拿过来生成到调用该过程的地方，有多处调用一个函数，都直接在调用处插入函数的编译代码，这样的弊端，会生成较大的EXE文件。声明的方法：procedure MyFunc(x:integer):string;inline有多种情况的函数或
python是一门非常优秀而且优雅的语言，没有了分号和大括号的烦恼，是你在开发中不用再担心大括号匹配问题和语句结束分号遗漏的麻烦，好了，切入正题，本题谈的是如何将python嵌入到C++中去，让你的c++程序更上一层楼！ 1.安装python，去www.python.org下一个python 2.x和3.x的都行。 2.首先要设置库文件，
转载
2023-07-02 22:29:37
78阅读
如何在DELPHI中操作EXCEL电子表格
EXCEL电子表格作为办公软件OFFICE中的重要组成部份,是日常办公系统的主要助手,因此许多日常所需的业务方面的数据通常是通过电子表格存取。有时我们需要从日常工作中创建的EXCEL中取得数据进行操作、打印、查询,统计等工作。在这里我将介绍如何利用delphi完成EXCEL电子表格中数据的操作。
一、新建一项目,从控件栏servers中分
转载
2024-04-06 01:16:09
90阅读
随着机器学习/深度学习这几年的的火热，python成了当红炸子鸡，使用python训练机器学习模型则成了开发人员们最喜欢的方法，但是由于过往调度系统一般都是用C++来开发的，因此我们只有两种方法来调用python脚本，一种是使用上篇中提到的子进程的方法，另外一种则是直接使用C++/python进行混合编程。基本使用方法python 提供了一套 C API库，使得开发者能很方便地从C/ C++ 程序
转载
2024-10-24 16:45:24
175阅读
unit Main;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls,Comobj;
type TForm1 = class(TForm)
原创
2008-07-30 17:20:08
5180阅读
1评论
unit Main; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls,Comobj; type &n
转载
精选
2009-02-25 18:35:35
895阅读
初学 Delphi 嵌入汇编[20] - Delphi 的 Integer 类型
var
I: Integer;
begin
//Integer 类型是4字节(32位)有符号整数, 最高位是符号位, 如果是正数, 符号位是 0、负数的符号位是1
//所以 Integer 的最大值是: 011
原创
2021-04-30 11:12:05
464阅读
开发环境Delphi7 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, StdCtrls; 8 9 ...
转载
2021-09-07 16:27:00
323阅读
2评论
初学 Delphi 嵌入汇编[21] - Delphi 的其他整数类型
除了 Byte、Word、Cardinal、Integer 外, Delphi 的整数类型还有:
Longint、Longword、Shortint、Smallint、Int64
其中 Longint 相当于 Integer; Lo
原创
2021-04-30 11:12:04
462阅读
｛一、编写服务端程序｝第一步：创建项目。1，File –> New –> Other –> WebServices –> Soap Server Application。2，默认选择“ ISAPI/NSAPI Dynamic Link Library”，然后点“OK”。3，出现一个对话框：“Create Interface for SOAP module”，点“Yes”。4
转载
2024-03-21 21:18:46
62阅读
初学 Delphi 嵌入汇编[19] - Delphi 的无符号整数类型
var
B: Byte;
W: Word;
C: Cardinal;
begin
{Byte 是1字节(8位)无符号整型, 其最大值是 111111112}
asm
mov B, 11111111B;
原创
2021-04-30 11:12:06
604阅读
网上有很多关于Delphi连接MySql数据库的文章，在这里，我只记录下自己测试过的方法，以备所需。 系统环境：Windows XP SP3 软件环境：Delphi 7 、mysql-installer-5.5.15.0 1.ODBC方式 必须要先有MySql的ODBC驱动，我下载的是全安装版，包括MySql服务器、各种所支持的连接、工作台、示例数据库、文
转载
2024-05-05 12:25:10
466阅读
Delphi单元如下（输出hello.dll）：unit hellofun;
interface
function getint():integer;stdcall;
function sayhello(var sname:PAnsiChar):PAnsiChar;stdcall;
implementation
function getint():integer;stdcall;
begi
转载
2023-06-12 20:38:22
277阅读
初学 Delphi 嵌入汇编[7] - 使用常量
//在汇编中使用常量
var
a: Integer;
const
n = $10;
begin
asm
mov ecx, 10 {使用十进制常数}
mov a, ecx
end;
ShowMess
原创
2021-04-30 11:12:20
172阅读
function Tform1.CreateRegion(wMask:TBitmap;wColor:TColor;hControl:THandle): HRGN; var dc, dc_c: HDC; rgn: HRGN; x, y: integer; coord: TPoint; line: boolean; color: TColor; begin dc :=...
转载
2019-08-12 13:08:00
156阅读
2评论
初学 Delphi 嵌入汇编[23] - LOOP 循环
//计算 x 的 n 次方的函数
function Fun(x,n: Integer): Integer;
asm
//mov eax, x {因为 eax 会先获取第一个参数, 这句可以省略}
mov ecx, n
原创
2021-04-30 11:12:02
170阅读
基于安全软件考虑，有时候为了不在本地生成临时文件，应用程序需要直接在内存打开加载各种类型的文件。目前比较困难的文件类型是EXE、PDF、压缩文件、音频视频文件等。其中EXE网络上有部分PELoader的实现源码，当对系统兼容性并不是很好，希望有这方面开发的朋友可以提供相关源码，多谢。本文涉及内容相对较为简单，但却比较实用。文件压缩/解压实现原理相对比较复杂，本文也不会讨论压缩算法方面的知识（实在是
1，缘起某个项目需要实现数据加密上传，主程序拟采用delphi7实现，其中的数据加密采用RSA，Cipher_pkcs1_v1_5加密。该加密在python中容易实现，且已经有现成的加密函数。如果在delphi中重新实现该算法，由于无现成的库可用，需要自己编写，比较麻烦且结果不一定正确。因此，delphi程序如何能借用已有的python算法成为一个现实问题。2，思路首先，python源码在现场运行
转载
2023-06-19 13:21:51
320阅读
