XE里, TStringField 还是 ansi的】的更多相关文章

原来windows里记事本的ansi编码就是GB2312啊,跟utf-8,unicode是不一样的. 程序里的比如java的,Qt的string都是unicode的字符串,因此如果是你从文件中读取文字的话,一定要注意编码的问题! windows上用的一般就是GB2312,而linux大部分可能就是utf-8.…
{ TStringField } TStringField = class(TField) private FFixedChar: Boolean; FTransliterate: Boolean; protected class procedure CheckTypeSize(Value: Integer); override; function GetAsBCD: TBcd; override; function GetAsBoolean: Boolean; override; functi…
废话不多说了,直接上例子解说: procedure TForm1.Button1Click(Sender: TObject);var  aa: array[0..1]of AnsiChar;  bb1: string;begin  aa[0] := AnsiChar('1');  aa[1] := AnsiChar('2'); bb1 := StrPas(aa);  ShowMessage(bb1);    //这里显示不正确end; procedure TForm1.Button1Click(…
XE里没有Application.Exename所以用paramstr(0); Str:=ParamStr(0); //自己全路径c:\555\qq.exe,可用于控制台Str:=ExpandFileName(ParamStr(0));   //获取本程序的完整路径 c:\qq\2.exeStr:=ExtractFileDir(ParamStr(0)); //获取本程序的路径 c:\qq Str:=application.Exename; //获取本程序的完整路径 c:\qq\2.exe,和第1…
用FMX压缩图片,发现FMX里的canvas没有draw,stretch,cliprect类,FMX里程序创建时会自动引用FMX.Graphics, 而这个单元内的TBitmap类的Canvas没有StretchDraw属性,也没有ClipRect类,所以定义TBitmap的图片不能裁剪. 而在VCL里,同样的方法却可以裁剪,原因在于vcl里引用的是vcl.graphics,引用单元不一样,平台不一样. 解决方法:把FMX里自身引用的FMX.Graphics删掉,换成VCL.Graphics.…
代码编辑器: Home 回到当前行的头部 End 回到当前行的尾部 Insert 插入代码,覆盖后面的代码,(按回车无效), 再按撤回效果 Delete 删除 F1 双击一个单词后,按F1调用自带的Library 参考函数引用单元及用法 F2 在Project上可重命名 Ctrl + Home 回到代码头部 Ctrl + End 回到代码底部 Ctrl + Tab 切换代码页 Ctrl + Shift + U 选中行左移Tab键(兼容) Ctrl + Tab 选中行左移Tab键(XE里可以用,D…
原地址:http://zhidao.baidu.com/link?url=fzqefMM44ljXA5BnAbkX44SapCUteyzlXFvGLKvukBivm9AB-w39P_h7eX1ty-GQX8j3A03AZBPat6yMqjeY4Sc5jlaayMRVOigzCElm_Ky so本质就是个动态链接库用gcc编译就能生成了 Delphi  XE里 if not Tfile.Exists(TPath.GetDocumentsPath+'/libserial_port.so') then…
xe6,xe7 BASE64XE6 MD5 加密算法Delphifunction MD5(const texto: string): string; var idmd5: TIdHashMessageDigest5; begin idmd5 := TIdHashMessageDigest5.Create; try result := idmd5.HashStringAsHex(texto); finally idmd5.Free; end; end; c++builder #include <I…
一 http://stackoverflow.com/questions/2155930/fixing-the-breakpoint-will-not-currently-be-hit-no-symbols-have-been-loaded-fo unable to hit the breakpoint Start debugging, as soon as you've arrived at a breakpoint or used Debug > Break All, use Debug >…
首次编译frx15.dproj包的时候,会出错: [DCC Fatal Error] fs15.dpk(59): F1026 File not found: 'fs_ipascal.dcu'原因是因为没有相关路径,并且应该先编译fs15.dproj安装FastScript 当recompile.exe不起作用的时候(也不知道为什么,难道是系统路径不对?),只能手动安装:先Delphi XE里添加以下路径(有可能有先后顺序):E:\Composants\FastReports_4.14.1\Fas…