摘要：
function UnicodeToAnsi(s: WideString): string;var lpChar: PChar; len: integer;begin len := Length(s) * 2; GetMem(lpChar, len); ZeroMemory(lpChar, len) 阅读全文
posted @ 2017-12-25 11:31
绿水青山777
阅读(1800)
评论(0)
推荐(0)
摘要：
delphi中调用 DLL一定要注意声明函数的大小写 阅读全文
posted @ 2017-12-21 10:29
绿水青山777
阅读(413)
评论(0)
推荐(0)
摘要：
procedure TForm1.Button1Click(Sender: TObject);var s:string;begin s := 'dsd' ; s:= s + slinebreak +s; //sLineBreak 换行 raise Exception.Create('test');e 阅读全文
posted @ 2017-12-12 22:09
绿水青山777
阅读(306)
评论(0)
推荐(0)
摘要：
转：https://www.cnblogs.com/limingliyu/archive/2016/07 使用IDHTTP，下面是一些关于 GET、POST 请求基本使用方法的代码 一、GET 请求 如果Get需要添加请求参数，则直接在地址后添加，各参数间用&连接 如：http://dict.you 阅读全文
posted @ 2017-11-20 11:18
绿水青山777
阅读(459)
评论(0)
推荐(0)
摘要：
国外 视频讲解 http://codegearguru.com/index.phpAbout Delphi http://delphi.about.com/od/ 国内 大富翁 http://www.dfwlt.com/forum.php?gid=1Delphi盒子 http://www.2ccc. 阅读全文
posted @ 2017-10-16 11:03
绿水青山777
阅读(430)
评论(0)
推荐(0)
摘要：
DELPHI 各版本下载 链接: https://pan.baidu.com/s/1qYCU8kk 密码: igmc 阅读全文
posted @ 2017-10-16 11:02
绿水青山777
阅读(689)
评论(0)
推荐(0)
摘要：
转：http://www.cnblogs.com/jay-xu33/p/5210098.html oracle11g 修改字符集 修改为ZHS16GBK1.cmd下,cd到oracle数据库软件的服务器端 如：D:\app\Administrator\product\11.2.0\dbhome_1\ 阅读全文
posted @ 2017-09-29 21:19
绿水青山777
阅读(183)
评论(0)
推荐(0)
摘要：
delphi 判断调试状态 delphi 判断调试状态 D7:DebugHook 该变量在调试状态下值为1,运行模式为0,例如,我们可以使用如下的代码来简单控制: if DebugHook=0 thenDXE6 : if IsDebuggerPresent then LangManager.Acti 阅读全文
posted @ 2017-09-27 10:11
绿水青山777
阅读(433)
评论(0)
推荐(0)
摘要：
不加引号 错误提示：没有声明的变量 frxReport1.Variables['bt'] := QuotedStr(getyym + _('门诊挂号员日报')); frxReport1.Variables['czy'] := QuotedStr( dosql.fieldbyname('xingm') 阅读全文
posted @ 2017-09-22 14:29
绿水青山777
阅读(207)
评论(0)
推荐(0)
摘要：
d7 >dxe6需要修改 1.PChar替换成PAnsiChar 2.Length(P1) 修改成 Length(P1)*SizeOf(Char) 或者 ByteLength函数计算 3.Key in ['a'..'z','B','C'] 这类代码最好替换成CharInSet(Key,['a'..' 阅读全文
posted @ 2017-09-18 10:17
绿水青山777
阅读(1503)
评论(0)
推荐(0)
浙公网安备 33010602011771号