delphi相关内容

德尔福:" INDEXOF"在数组的对象

我TPoint数组。现在,我想知道是否有东西在那里,如: APTS:在tarray< TPoint取代; // 如果(apts.indexOF(P1)小于0)做未便 所以是有一些实际搜索的东西的阵列过程(在这种情况下,点(P1)) 并返回我的指数呢? 解决方案 在 Generics.Collections 在tarray 静态类>有一个二进制搜索,但没有线性搜索。我填补这一缺口尤 ..
发布时间:2016-06-03 22:07:50 其他开发

从C指针和数组的转换++德尔福

我试图使用 ANN (我的德尔福code内近似近邻)库(.dll文件)。该库是用C ++,虽然数据类型是相当简单的,我有一些麻烦。 我用 h2pas 到C ++头文件转换据我可以得到它。我结束了以下数据类型(C ++左侧,德尔福在右侧): 枚举ANNbool {ANNfalse = 0,ANNtrue = 1}; - > ANNbool = Longint型; 双的typedef ANN ..
发布时间:2016-06-03 21:11:45 C/C++开发

转换一个变量数组到一个动态数组

我想转换一个变量数组(双打,但它可以是任何东西我猜的)来动态数组。我通常使用的DynArrayFromVariant和DynArrayToVariant程序,但在这种情况下,我的变种数组是基于1。这两个函数似乎只在0基于阵列的工作。任何想法,我怎么可能做我需要做什么? 解决方案 如果你知道你的数组元素的类型,你可以写更高效(虽然不太通用)code: 函数DoubleDynArrayFro ..
发布时间:2016-06-03 11:05:42 其他开发

有什么需要初始化多维动态数组?

我用动态数组很大,并有与SetLength函数没有问题,最终确定程序。 最近,我的事业使用动态数组,其中每个数组元素本身可能包含不同数量的元素。该声明是这样的: TScheduleArray =阵列TShiftType的[1..DaysPerWeek]数组的数组; 该软件工作正常,我没有得到一个问题的如何的使用这种结构。你叫的 SetLength函数的主阵列,然后可以在每个数组元素上调用 ..
发布时间:2016-06-03 10:04:29 其他开发

德尔福保存并加载动态数组

请有人可以帮助我在拯救,并从流加载其动态数组 常量 iGlobHolderCount = 100; 类型 TFiLeSpec =记录 iSize:整数; 结束; TFileSpecLst = TFiLeSpec阵列; TFiLeSpecList =记录 伊明:整数; IMAX:整数; ..
发布时间:2016-06-03 09:55:03 其他开发

恒就地阵列在Delphi中的字符串和记录

是这样的事情可能与德尔福? (用绳子和记录的动态数组) 键入 TStringArray =字符串数组; TRecArray = TMyRecord阵列;程序DoSomethingWithStrings(字符串:TStringArray); 程序DoSomethingWithRecords(记录:TRecArray); 功能BuildRecord(const的价值:字符串):TMyReco ..
发布时间:2016-06-02 22:55:19 其他开发

德尔福:声明包含数组常量不变的记录类型

我有很多常量数组是的不的都具有相同数量的元素。 要存储这些阵列,我宣布一个数组类型大到足以存储的最大的这些阵列的每个元素(或参考): 键入 单TElements =数组[1 .. 1024]; 每个这些TElements阵列逻辑上与另一个TElements阵列相关联的确实的有相同数量的元素。的 所以要配对这些同样大小的数组,我宣布一个记录类型为:键入 TPair =记录 n ..
发布时间:2016-06-02 22:53:44 其他开发

德尔福传递记录动态数组的功能

我有记录的Dynamc阵列,我希望通过引用传递数组中的项目之一的函数 因此​​,例如数组项目之一 - AArray [1] .arecorditem是6个字符的字符串,字符串[6] 功能会 - 函数DoSomething的(VAR AStringVal:字符串):整数; 因此​​,我将执行综合因素的产物:= DoSomething的(AArray [1] .arecorditem); ..
发布时间:2016-06-02 22:22:03 其他开发

如何投放数组指针和回德尔福?

我有一个显示在列字符串中的所有者绘制组合框。绘图程序可以在连击共享,如果我能以某种方式通过列规范的事件的OnDrawItem。一种自然的方式这样做,将列宽的数组传递在ComboBox.Tag属性,然后将它转换回一个数组。 当我定义列数组为: 常量arrWidth:数组整数[1..4] =(100,100,100,70); 和Tag属性设置为: ComboBox.Tag:=整数(@arrWi ..
发布时间:2016-06-02 21:47:35 其他开发

加载图像到的TImage,通过阵列

我很新德尔福,做一个项目对我的水平。当我运行我的code图像只是不显示,我看着无处不在,我的老师也帮不了我。谁能告诉我,我缺少的是什么? 常量 动物:数组[0..6]字符串=('熊','狗','猫','鸡','马','牛','猴子'); ImagePaths:数组[0..6]字符串 =('img0.JPG','img1.JPG','img2.JPG','img3 ..
发布时间:2016-06-01 22:21:12 其他开发

德尔福 - 我怎样才能从一个twebbrowser选择到一个数组?

我有以下选择在我的twebbrowser <选择名称=“ship_to_method”> <期权价值=“1941”>英国皇家邮政标准交付1.45£< /选项> <期权价值=“1942年”>快递交付标准在4.64£< /选项> <期权价值=“1943年”>对于1.66£&LT皇家邮政优先派送; /选项> <期权价值 ..
发布时间:2016-06-01 21:56:33 其他开发

帕斯卡“分割”功能

我编码帕斯卡一个小程序,我遇到了一个小问题。在其他语言中有一个名为“分裂”或“爆炸”采取由一个定义的字符打断并分割这个长字符串成几个较小的字符串,并将它们分配到一个数组的长字符串函数。 这里是我的意思,我想做到这一点: longstring:='Word1.Word2.Word3');斯普利特(,longstring,OutPutVariable'。');{OutPutVariable [1 ..
发布时间:2016-06-01 21:44:34 其他开发

如何搜索字节数组" StringA"?

使用FreePascal的(或Delphi,如果没有计划生育的例子),给予2048字节的缓冲区是作为一个“字节数组”,我怎么能搜索“StringA”缓冲区? VAR 缓冲区:数组字节[1..2048] ... 重复 I:= 0; BlockRead(SRCFILE,缓冲区,缓冲区尺寸,NumRead); //现在我想搜索“StringA”缓冲区? ... ..
发布时间:2016-06-01 21:27:35 其他开发

PHP追加到的ClientDataSet CDS文件

我有一个空的德尔福的ClientDataSet CDS文件设置的所有列/头/数据类型,我需要。我想用PHP要追加一个关联数组CDS行。这可能吗? 该阵列可以仅仅是: { 1:{名称:队长,电话:18001234567} 2:{名称:杰克,电话:18009876543} 3:{名称:麻雀,电话:18887892345} } 我选择PHP,因为我精通的语言和我的Web ..
发布时间:2016-06-01 21:27:14 PHP

有什么优点和使用记录与从TList&LT动态数组的利弊; TMyRecord>在德尔福?

这是为了产生德尔福优点和不同的数据存储方式利弊一个查找列表中的理论问题。 让我们说我们有一个记录: 键入 TMyRecord =记录 X,Y,Z:单; 的IsValid:布尔; 结束; 存储这些记录阵列的基本选项是: TMyRecord的阵列; 从TList 用的getter / setter定制后裔 &的TList LT; TMyRecord取代; ..
发布时间:2016-06-01 20:53:47 其他开发

任何方式加入2阵列为一体?

有没有加2阵列成一个任何简单的方式万向?在它下面的情况下,是不可能简单地使用 C:= A + B 语句... 我想避免algorhytm它每次。 TPerson =记录 生日:Tdate; 名,姓:字符串; 结束;Tpeople = TPerson阵列;变种A,B,C:Tpeople;C:= A + B; // 这不可能 感谢名单 解决方案 由于两个字符串在每个领域 ..
发布时间:2016-06-01 20:46:01 其他开发

德尔福保存/载入动态数组失败

我想这会看起来像'的做我的功课的“之类的问题,但我仍然在'的复制code,使用它,并尝试去了解它的'阶段,这是最积极的事情,我知道张贴这一主题的问题。 我有一个记录: 键入 卡=记录 名称:字符串; 上,右,左,下,马克:单; IDNumber中:整数; 结束; 和该记录的数组: VAR ArrayCard:卡的阵列; 和我想知道如何能这样的一个 ..
发布时间:2016-06-01 20:27:06 其他开发

德尔福:对类型和QUOT的说法SetLength函数(); TObject的&QUOT阵列;

我试图调整作为参数,例如通过某一类的数组。 程序调整尺寸(MYARRAY:TObject的数组); 开始 SetLength函数(MYARRAY,100); 结束; 不过,这会产生错误“E2008不兼容的类型”。这是真的,你不能做到这一点(我见过的传闻,但没有正式的文档)还是我做错了什么? 解决方案 您没有明确定义的类型。所以编译器有匹配他们的问题。如果您定义的类型,如:键入 T ..
发布时间:2016-06-01 20:20:18 其他开发