
Delphi
lsl221
这个作者很懒,什么都没留下…
展开
-
TFDStoredProc创建了参数执行时却报参数不存在
FDSP.Close ; FDSP.Params.Clear ; mParam := FDSP.Params.Add ; with mParam do begin Name := '@T1' ; DataType := ftString ; //FDDataType := dtString ; ParamType := ptInput原创 2017-01-04 17:06:55 · 1741 阅读 · 0 评论 -
常用函数或过程
InterlockedIncrementInterlockedDecrement IncludeTrailingPathDelimiterExcludeTrailingPathDelimiter转载 2016-12-09 09:39:55 · 307 阅读 · 0 评论 -
程序使用TDiocpTcpClient退出时报错
EXE(带包 vcl;rtl) 调用 DLL(带包vcl;rtl;TestBpl, 其中TestBPL中使用TDiocpTcpClient), EXE不能正常退出的问题,可以通过在EXE动态加载 TestBPL解决原以为是TestBPL有问题, 后面通过 EXE带上 TestBPl编译, 也能正常退出, 如果中间通过调用DLL时再装载BPL, 就会有问题多次调试时,发现单元 diocp_原创 2017-03-04 16:58:18 · 370 阅读 · 0 评论 -
FireDAC注意事项
FDConnection FDStoredProc原创 2017-02-14 11:04:57 · 5236 阅读 · 0 评论 -
RecordSet.GetRows
GetRows 方法传回一个二维的数组变量,每一行对应Recordset中的一笔记录,且每一列对应到记录中的字段。此方法的语法如下: varArray = rs.GetRows([Rows], [Start], [Fields]) Rows 是要读取记录的数量; 如果想要取得Recordset所有记录,可用-1或省略此参数。Start 是指出第一个被读取记录的书签;也转载 2017-08-22 16:40:58 · 2330 阅读 · 0 评论 -
相关FirDAC引用网址
delphi 新版内存表 FDMemTable := http://www.cnblogs.com/cb168/p/3953841.html官网: http://docwiki.embarcadero.com/Libraries/XE6/en/Main_Page转载 2017-01-13 15:33:10 · 385 阅读 · 0 评论 -
Delphi动态调用ocx
以下代码不记得从哪里复制过来的,里面加了点自己的改动unit EventSink;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ActiveX;type // 在原有参数的基础上,增加了 ConnectDispatch: ID转载 2018-01-09 17:07:59 · 2858 阅读 · 0 评论 -
基本知识-数组
以下内容是从电子书上摘抄出来,方便记忆,在打字时可能会有错误数组 除标准Pascal数组外,Delphi为特殊环境的使用而定义了几种扩展。动态数组(dynamic array)是在运行时可以改变大小的数组。开放数组(open array)是可以与真实参数一样接受任意大小数组的数组参数。个特殊的开放数组让你以参数形式传递一个不同类型的数组给个例程。如同在ISO标准Pascal中发现转载 2017-01-23 11:50:05 · 336 阅读 · 0 评论 -
使用TFDStoredProc没填入存储过程名的一些坑
今天写个批量上传的,使用TFDStoredProc操作存储过程来处理数据,忘记对StoredProcName给值了,ExecProc时报一个参数不能将 ftinteger 转换成 ftstring, 后隐藏存储过程中的参数, 只保留一个输出型参数 nvarchar, 又报 不能将 ftwidestring 转换成 ftwidestring, 接着隐藏存储过程中所有参数,这些换了另一个错误: cla原创 2017-01-23 10:54:04 · 1187 阅读 · 0 评论 -
[FireDAC][Phys][ODBC][Microsoft][ODBC SQL Server Driver]违反限制数据类型属性
使用TFDStoredProc通过执行存储过程查询数据时,如果存储过程名不变, 只是改变里面的参数值 ,但传递回的结果集字段不一样的话, 会导致以上错误[FireDAC][Phys][ODBC][Microsoft][ODBC SQL Server Driver]违反限制数据类型属性. FDSP.Close ; FDSP.Params.Clear ; FDSP.Sto原创 2017-01-04 17:18:23 · 5106 阅读 · 1 评论 -
delphi枚举与字符串转换
以下为D自带帮助中的说明,备存怕忘记uses TypInfo ;function GetEnumName(TypeInfo: PTypeInfo; Value: Integer): string;Returns the name of a Delphi enumerated type constant given its value. Use GetEnumName to conv转载 2016-12-31 10:50:53 · 2283 阅读 · 0 评论 -
单元的条件编译变量DEBUG取消后无效
Delphi XE 以上版本,编译时有了两个选项: Debug, Release在某个单元文件中取消了编译变量 {.IFDEF DEBUG}, 但被DEBUG包含的部分还是被编译了想到单元的条件编译变量DEBUG可能与全局的名称相同,后改掉单元中的DEBUG名为DEBUG_ON,重新编译后正常DEBUG_ON中包含的代码就不会再被编译了原创 2017-01-11 11:45:09 · 489 阅读 · 0 评论 -
XE 组件面板隐藏后如何显示
右键点击IDE菜单栏,选中 Component 即可原创 2017-02-07 09:27:59 · 651 阅读 · 0 评论 -
TFDCustomMemTable.AppendData
procedure AppendData(const AData: IFDDataSetReference; AHitEOF: Boolean = True);Appends data to this dataset from other datasets. Use the AppendData method to append the rows from one FireDAC da原创 2017-02-08 09:29:00 · 1039 阅读 · 0 评论 -
[FireDAC][Phys][ODBC][Mirosoft][ODBC SQL Server Driver]COUNT 字段不正确或语法错误
使用TFDStoredProc.ExecProc 或者 TFDStoredProc.Open 时, 出现错误: [FireDAC][Phys][ODBC][Mirosoft][ODBC SQL Server Driver]COUNT 字段不正确或语法错误现将原因整理如下(前提都是使用 TFDStoredProc 调用存储过程来执行或者取得数据):1.存储过程中有注释了的执行语句, 如/原创 2017-01-13 09:35:15 · 7326 阅读 · 1 评论 -
Win7+XE6编译的程序在Xp上Label显示不出
开发环境: Win7+XE6,画一界面, 先用图片打底, 上放label, 随意对caption设置几个汉字,再放一个rz的btn控件, 设置 HotTrack为True,编译后的程序在Win7, Win10上运行正常,在XP, Win2003上, label上的汉字没显示出来,后还原 HotTrack为False, 显示正常, KAO, 坑爹原创 2017-02-09 16:53:58 · 521 阅读 · 0 评论 -
FDConnection取得EXCEL工作表名
procedure GetTableNames(const ACatalogName, ASchemaName, APattern: string; AList: TStrings; AScopes: TFDPhysObjectScopes = [osMy]; AKinds: TFDPhysTableKinds = [tkSynonym, tkTable, tkView原创 2017-01-20 14:19:22 · 1283 阅读 · 0 评论 -
FDQuery中SQL语句使用别名字段后无法更新到数据库
FDQuery.Close ;FDQuery.Open('SELECT F1 AS Field1 FROM TB1') ;FDQuery.Edit ;FDQuery.FieldByName('Field1').AsString := 'MyTest' ;FDQuery.Post ; // 将更改更新到DB时报错,无此字段: Field1ADOQuery无此问题, 还未找原创 2017-02-13 08:50:00 · 2421 阅读 · 2 评论