面朝大海，春暖花开。

摘要： if RzSizePanel1.HotSpotClosed then RzSizePanel1.RestoreHotSpot else RzSizePanel1.CloseHotSpot; 阅读全文

摘要： procedure TForm1.Button2Click(Sender: TObject);begin cbb2.Items.Clear; OraQuery1.First; while not OraQuery1.Eof do begin cbb2.Items.AddObject(OraQuery 阅读全文

摘要： [问题解决]delphi dpk编译 Error: E2161 RLINK32: Unsupported 16bit resource in file xxx 问题解决 原创 2013年08月27日 22:15:46 标签： delphi 资源编译 5444 原创 2013年08月27日 22:15 阅读全文

摘要： function Tpublicf.PKHisDo(inStr: string; var OutStr: string): Integer;var JG: PWideChar; sinstr: PWideChar;begin GetMem(JG, 2048); GetMem(sinstr, 2048 阅读全文

摘要： 一定要牢记软件工程的铁律：可能出错的地方一定会出错。每个变量都做初始化，引用每个参数都会做有效性检查，在可能出错的每个地方都会做边界条件检查，这样开发出来的程序一定会稳固很多，就是出错也会很容易修改。野路子出来的高手，一般开发速度很快，但做完后bug很多，经常需要很长时间修改。而真正的高手，追求的境 阅读全文

摘要： sql>drop tablespace zfxfzb; ora-01549:表空间非空，请使用INCLUDING CONTENTS 选项 sql>drop tablespace zfxfzb INCLUDING CONTENTS and datafiles; ora-00604:递归sql层1出现错 阅读全文

摘要： function UnicodeToAnsi(s: WideString): string;var lpChar: PChar; len: integer;begin len := Length(s) * 2; GetMem(lpChar, len); ZeroMemory(lpChar, len) 阅读全文

摘要： delphi中调用 DLL一定要注意声明函数的大小写 阅读全文

摘要： procedure TForm1.Button1Click(Sender: TObject);var s:string;begin s := 'dsd' ; s:= s + slinebreak +s; //sLineBreak 换行 raise Exception.Create('test');e 阅读全文

摘要： 转：https://www.cnblogs.com/limingliyu/archive/2016/07 使用IDHTTP，下面是一些关于 GET、POST 请求基本使用方法的代码 一、GET 请求 如果Get需要添加请求参数，则直接在地址后添加，各参数间用&连接 如：http://dict.you 阅读全文