![](https://img-blog.csdnimg.cn/20201014180756780.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi
文章平均质量分 52
1900Danny
IT/金融
展开
-
delphi 错误信息
******************************** 编 译 错 误 信 息 ********************************';' not allowed before 'ELSE' ElSE前不允许有“;”'' clause not allowed in OLE automation section 在OLE自动区段不允许“”子句'' is not a t转载 2016-04-19 17:28:26 · 1317 阅读 · 0 评论 -
Delphi中GetTickCount函数的使用
【函数名】 GetTickCount【库名】 kernel32【说明】 用于获取自windows启动以来经历的时间长度(毫秒)【返回值】 Long,以毫秒为单位的windows运行时间通常用来计算某个操作所使用的时间: Start:=GetTickCount; ...//执行耗时的操作Stop:=GetTickCount; TimeUsed:=(原创 2016-12-06 18:37:38 · 9979 阅读 · 0 评论 -
在delphi中Char,PChar,PByte,Byte,String的相互转换示例
var s:string; pc:pchar; pb:pbyte; ac:array[1..100] of char; ab:array[1..100] of byte; i:integer; begin s:='this is a test';转载 2016-11-02 09:31:26 · 2714 阅读 · 0 评论 -
Delphi TclientSocket和TserverSocket用法(1)
Delphi,网络通信,TserverSocket,TclientSocket现在将本人总结出来的TServerSocket和TClientSocket两个组件的基本用法写出来,希望与您分享。ClientSocket组件为客户端组件。它是通信的请求方,也就是说,它是主动地与服务器端建立连接。ServerSocket组件为服务器端组件。它是通信的响应方,也就是说,它的动作是监转载 2016-11-03 14:56:12 · 10349 阅读 · 0 评论 -
Delphi : 字符串截取函数LeftStr,MidStr,RightStr的用法
这几个函数都包含在StrUtils中,所以需要uses StrUtils;举例:假设字符串是 Dstr := 'Delphi is the BEST', 那么LeftStr(Dstr, 5) := 'Delph'MidStr(Dstr, 6, 7) := 'i is th'RightStr(Dstr, 6) := 'e BEST' 但我并不建议在Uses中引入StrUt转载 2016-11-03 11:25:19 · 31095 阅读 · 0 评论 -
Delphi Project 之工程选项(Project Options)
工程选项是另一个容易忽视的特性。因为对于初学者,缺省设置就足够用了。毕竟,当一个人忙于学习一个新编程环境时,哪有时间去关心那些编译器/链接器选项呢?但是,到一定时候,就会开始对这些选项感兴趣,并想知道它们是作什么用的。下面将讲述工程选项对话框。可从主菜单选择【Project | Options】来调用该对话框。工程选项对话框是一个多页面对话框,它有如下页面: Forms转载 2016-07-28 14:44:56 · 2382 阅读 · 0 评论 -
Delphi快捷键
分类快捷键解释备注组件设计类Escape选择当前组件容器 Shift + Click选择多个组件;选择窗体 Tab选择下一个组件 Shift + Tab选择上一个组件 方向键选择此方向的下一个组件转载 2016-04-22 13:42:20 · 645 阅读 · 0 评论 -
常用数据结构的应用场景
1、单向链接单向链表适用于只从一端单向访问的场合,这种场合一般来说:(1)、删除时,只适合删除第一个元素;(2)、添加时,只直接添加到最后一个元素的后面或者添加到第一个元素的前面;(3)、属于单向迭代器,只能从一个方向走到头(只支持前进或后退,取决于实现),查找效率极差。不适合大量查询的场合。这种典型的应用场合是各类缓冲池和栈的实现。2、双向链表原创 2016-05-06 13:43:12 · 6566 阅读 · 0 评论 -
Delphi 基于TCP的Socket连接
一、Server端 使用的indy控件:idtcpsrvr1: TIdTCPServer; a)设置默认端口begin Self.btn1.Enabled:=False; idtcpsrvr1.DefaultPort:=2001; idtcpsrvr1.Active:=True;end; b)对客户端连接事件响应procedure原创 2016-04-21 13:50:23 · 6122 阅读 · 1 评论 -
Delphi关键字详解(转载自“万一”)
absolute//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.var Str: string[32]; StrLen: Byte absolute Str;//这个声明指定了变量StrLen起始地址与Str相同.//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.begin Str := 'abc'; Edit1转载 2016-04-20 10:33:25 · 1912 阅读 · 0 评论 -
TStringList 常用方法与属性 & DelimitedText空格问题 验证有效
测试同事帮反映了我们程序在处理委托时的一个问题:对于港股的委托,我们对它的成交回报中股票代码是空的。加日志找到原因在这里,港股的委托其股票代码是5位,会左补一个空格,而在delphi中,对于TStringList 进行类似哈希表操作时,DelimitedText会自动判断空格并跳过。导致reqtext.securityid一直为空,在后续的处理中出错。function Make原创 2016-12-23 16:55:46 · 2384 阅读 · 0 评论