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
196阅读
下面要示范的就是在XE2下完成.其实源码检出后,里面有30多个示例,几乎涵盖了Python4Delphi的所有方面.好吧,我们下面做个简单的加法计算器,主要是演示二者之间的参数传递.
转载
2023-07-17 23:54:40
485阅读
python是一门非常优秀而且优雅的语言,没有了分号和大括号的烦恼,是你在开发中不用再担心大括号匹配问题和语句结束分号遗漏的麻烦,好了,切入正题,本题谈的是如何将python嵌入到C++中去,让你的c++程序更上一层楼! 1.安装python,去www.python.org下一个python 2.x和3.x的都行。 2.首先要设置库文件,
转载
2023-07-02 22:29:37
68阅读
如何在DELPHI中操作EXCEL电子表格
EXCEL电子表格作为办公软件OFFICE中的重要组成部份,是日常办公系统的主要助手,因此许多日常所需的业务方面的数据通常是通过电子表格存取。有时我们需要从日常工作中创建的EXCEL中取得数据进行操作、打印、查询,统计等工作。在这里我将介绍如何利用delphi完成EXCEL电子表格中数据的操作。
一、新建一项目,从控件栏servers中分
unit Main; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls,Comobj; type &n
转载
精选
2009-02-25 18:35:35
869阅读
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
5008阅读
1评论
初学 Delphi 嵌入汇编[20] - Delphi 的 Integer 类型
var
I: Integer;
begin
//Integer 类型是4字节(32位)有符号整数, 最高位是符号位, 如果是正数, 符号位是 0、负数的符号位是1
//所以 Integer 的最大值是: 011
原创
2021-04-30 11:12:05
413阅读
初学 Delphi 嵌入汇编[21] - Delphi 的其他整数类型
除了 Byte、Word、Cardinal、Integer 外, Delphi 的整数类型还有:
Longint、Longword、Shortint、Smallint、Int64
其中 Longint 相当于 Integer; Lo
原创
2021-04-30 11:12:04
379阅读
开发环境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
301阅读
2评论
网上有很多关于Delphi连接MySql数据库的文章,在这里,我只记录下自己测试过的方法,以备所需。 系统环境:Windows XP SP3 软件环境:Delphi 7 、mysql-installer-5.5.15.0 1.ODBC方式 必须要先有MySql的ODBC驱动,我下载的是全安装版,包括MySql服务器、各种所支持的连接、工作台、示例数据库、文
{一、编写服务端程序}第一步:创建项目。1,File –> New –> Other –> WebServices –> Soap Server Application。2,默认选择“ ISAPI/NSAPI Dynamic Link Library”,然后点“OK”。3,出现一个对话框:“Create Interface for SOAP module”,点“Yes”。4
初学 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
448阅读
初学 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
158阅读
初学 Delphi 嵌入汇编[7] - 使用常量
//在汇编中使用常量
var
a: Integer;
const
n = $10;
begin
asm
mov ecx, 10 {使用十进制常数}
mov a, ecx
end;
ShowMess
原创
2021-04-30 11:12:20
145阅读
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
153阅读
2评论
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
254阅读
1,缘起某个项目需要实现数据加密上传,主程序拟采用delphi7实现,其中的数据加密采用RSA,Cipher_pkcs1_v1_5加密。该加密在python中容易实现,且已经有现成的加密函数。如果在delphi中重新实现该算法,由于无现成的库可用,需要自己编写,比较麻烦且结果不一定正确。因此,delphi程序如何能借用已有的python算法成为一个现实问题。2,思路首先,python源码在现场运行
转载
2023-06-19 13:21:51
299阅读
初学 Delphi 嵌入汇编[11] - 用汇编重写一个 Delphi 函数
//Delphi 函数
function DelphiFun(x: Integer): Integer;
begin
Result := x * 2;
end;
//汇编函数, 和上面的函数是同样的功能
function
原创
2021-04-30 11:12:14
155阅读
大家别误会,这里的戴妃可不是已经香销玉殒的英国王妃,而是INPRISE的招牌产品DELPHI的中文译名!介绍DELPHI的文章已经很多了,大家是不是被它强大的开发功能所折服?可视化编程的出现,使很多朋友圆了程序梦。的确,几个控件的搭配再加上几条语句,也许一个软件就出来了。但是,你是否已不满足使用别人的元件?想更深入的了解WINDOWS的编程?更换的掌握DE
初学 Delphi 嵌入汇编[18] - SHL 与 SHR
汇编中的SHL(左移)、SHR(右移)命令也是和 Delphi 一样的.var
ByteNum: Byte;
begin
//右移 shr
asm
mov al, 10000000B {128}
shr al, 1
原创
2021-04-30 11:12:07
358阅读