Delphi 2007是Delphi的特定版本。 Delphi 2007于2007年3月发布,可作为独立产品或作为RAD Studio 2007的一部分提供。
可能重复:建议使用哪种Web应用程序框架for Delphi?我们有一个使用Citrix托管的Delphi 2007桌面应用程序。现在我们要摆脱Citrix和...
Post XML with TidHttp Invalid request
我正在尝试使用Delphi 2007发布XML文件以与WorldPay进行交易,但是我一直收到“无效请求”错误。这是我的代码,我不知道自己在做什么错。变量...
在Delphi 2007中,我使用以下代码按名称终止过程。它有效,但是我想终止所有进程,但要使用当前应用程序之一的名称。我的目标是关闭所有...
[我编写了一个非常简单的应用程序,我可以在Windows 7上运行的Delphi 2007中使用它来播放我的音乐收藏。为了避免使用Delphi Media Player,我对Windows Media Player进行了外壳处理...
我使用的是Delphi 2007,Indy版本10.6.1.5188。当我使用常规的SMTP服务器和TIdSMTP发送邮件时,一切正常。但是,当我使用Amazon Simple Email Service SMTP(SES)发送时,所有...
我使用的是Delphi 2007,Indy版本10.6.1.5188。当我使用常规的SMTP服务器和TIDSmtp发送邮件时,一切正常。但是,当我使用Amazon Simple Email Service SMTP(SES)发送时,所有...
我的应用程序通过使用LoadPackage函数在运行时动态加载BPL软件包。 LoadPackage( '\ MyPackage.bpl。');我需要设置断点来调试MyPackage项目的代码。 ...
有没有人有使用德劳内三角形或克里格网格填充的直线前进德尔福的例子吗?任一方法可以通过填充网格“内插”。我想要什么呢?我有一个网格,...
是否有一个重构工具来删除“与”块?例如转换与Form1中做开头身高:=布拉赫; Blubb:=名称;结束;到Form1.Height:=布拉赫; Blubb:= Form1.Name;其中Form1中是一个...
如何比较事件及其避免E2035和E2036的相应程序? [重复]
我正在尝试检查是否已经为对象的特定过程(Sender:TObject)分配了一个事件(TNotifyEvent)。这是我的示例代码:type TForm1 = class(TForm)Button1:...
我有一个TForm(TVehicleEditForm)里面有3个相同的TFrame(TVehicleUnitFrame)。这个想法是框架的每个实例都通过框架内的事件处理程序处理自己的事件。问题 ...
我在FastReport报告中打印了两个列表,每个TfrxMasterData中有一个,问题是当查询返回多个记录时,这个新记录被插入到新页面中,它需要......
当引发EZeroDivide,EOverflow,EMathError等异常时,它们会显示默认消息。例如,以下代码使用以下消息引发EZeroDivide:...
我使用'&'字符在我的TLabel控件上使用加速键。通过这种方式,用户可以在&后按Alt + Character,以便将控件聚焦在表单上。示例:var ...
为什么将开放数组参数转换为数组类型会导致E2089无效的类型转换?
我正在使用Delphi 2007(Pre generics),我已定义了许多可用于TObject后代所有数组的函数,例如:函数IndexOf(AArray:TObject数组; AItem:TObject):...
为什么'H2219私有符号X已声明但从未使用'是在仅在将其分配给局部变量后使用重载过程时发生的?
我只在将它分配给局部变量后才使用私有方法:TMyTestWithoutParam = object()of object; TMyTestIntegerParam =对象的过程(APar:整数); TForm1 = class(...
如何在Delphi-2007上将unicode字符串转换为字节数组,反之亦然
在Delphi XE7中,我们使用以下命令将一些值从字符串转换为字节,从字节转换为字符串:MyBytes:= TEncoding.Unicode.GetBytes(MyString);和MyString:= TEncoding.Unicode.GetString(...
我想做类似这样的事情:[string1,string2,string3,string4]中的Result ='MyString';这不能用于字符串,我不想做这样的事情:Result =(('MyString'= ...
从像TAnchors这样的集类型变量开始:TAnchorKind =(akLeft,akTop,akRight,akBottom); TAnchors =一套TAnchorKind;我正试图获得互补的价值观。 var Tmp:...
我的应用程序是使用运行时包构建的,并使用LoadPackage函数加载它们。然后它使用GetClass函数来获取类类型。 var MyClass:TPersistentClass;如果开始(...