快乐的正能量

摘要： //分割字符串 ExtractStrings var s: String; List: TStringList; begin s := 'about: #delphi; #pascal, programming'; List := TStringList.Create; ExtractStrings 阅读全文

摘要： 如果函数失败，返回值为零。要获取扩展错误信息，请调用GetLastError。 阅读全文

摘要： 设置它的几个属性：BevelEdges |_ beLeft = False; |_ beTop = False; |_ beRight = False; |_ beBottom=True; //就是下面那根横线了BevelInner=bvNone;BevelKind =bkSoft;BevelOut 阅读全文

摘要： 在DLL中的子窗体不会响应Tab按键的，这个时候就需要手动去指定Tab键的操作，但是前提是主窗体要向这个窗体发送一个消息，一个Tab键按下的消息。基本顺序是这样的： 1. 主窗体用Hook技术捕获Tab按键并向活动子窗体发送一个Tab键按下的消息 2. 子窗体手动定义一个Tab键被按下的处理（需要用 阅读全文

摘要： delphi Table切换控件顺序问题 Tagorder的值就是确定Table键切换顺序的 以上做法只能解决同一类型的多个控件（如Edit1，edit2....）显示顺序问题 假如有不同类型的控件如(Edit,cxlookUpcombobox)则不能解决Tab键切换顺序问题 现在能想到的办法是先删 阅读全文

摘要： 消息 8152，级别 16，状态 14，第 1 行将截断字符串或二进制数据。语句已终止。 //插入的某个字段的值超出字段定义长度 阅读全文

摘要： 1、打开delphi，移除unit1 2、添加想要添加的单元 3、保存即可、也可将添加的单元重命名 阅读全文

摘要： 阅读全文

摘要： 阅读全文

摘要： function GetComputerName:String; //获取计算机名称//引用winsockvar wVersionRequested : WORD; wsaData : TWSAData; p : PHostEnt; s : array[0..128] of char;begin t 阅读全文