面朝大海，春暖花开。

摘要： procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);var st: PChar;begin if Key in ['$', '^', '&',#163] then Key := #0;end; function SbctoDb 阅读全文

摘要： 一个队列类的实现(比delphi自带的速度快70倍) 测试结果 实现的代码 unit sfContnrs; interface {$DEFINE MULTI_THREAD_QUEUE} //线程安全版本，如果不需要线程安全，请注释掉此行代码 {$IFDEF MULTI_THREAD_QUEUE}us 阅读全文

摘要： 临界区对象TCriticalSection(Delphi) 与 TRtlCriticalSection 的区别 TRtlCriticalSection 是一个结构体，在windows单元中定义；是InitializeCriticalSection，EnterCriticalSection，Leave 阅读全文

摘要： 【问题原因】 该问题是由于微软从 Windows 8 开始，GetKeyboadLayouts 函数不再有效，而 VCL 中仍然是通过该方法获取输入法列表造成的。希望下个版本的 Delphi/C++ Builder 能够解决。 【解决办法】 如果是 Win8+，则自己从注册表读，如果是Win 7 等 阅读全文

摘要： 缇、像素转厘米的方法 2013年12月04日 ⁄ 综合 ⁄ 共 2338字 ⁄ 字号 小 中 大 ⁄ 评论关闭 缇、像素在非标准状况下不能直接换算成英寸、厘米，需要再添加一个值——分辨率(dpi)下才能换算! photoshop中两种分辨率换算72像素/英寸=28.346像素/厘米300像素/英寸= 阅读全文

摘要： 缇(Twips) （缇：计量单位，等于“磅”的 1/20，英寸的 1/1,440。一厘米有 567 缇。像素(Pixels)：监视器或打印机分辨率的最小单位右键单击桌面，选择属性，选择“设置”选卡，单击高级按钮。里面出现DPI设置。一般为“正常尺寸(96 DPI)”。DPI的意思就是 DPI (Do 阅读全文

摘要： unit Unit_main; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, TypInfo; type TForm_main  阅读全文

摘要： ::@echo offset TDate=%DATE:~0,4%%DATE:~5,2%%DATE:~8,2%set TTime=%time:~0,2%%time:~3,2%%time:~6,2%if "%TTime:~0,1%"==" " set TTime=0%time:~1,1%%time:~3 阅读全文

摘要： 要打开数据库则必须使用 RESETLOGS 或 NORESETLOGS 选项 SQL> startupORACLE 例程已经启动。 Total System Global Area 135338868 bytesFixed Size 453492 bytesVariable Size 1090519 阅读全文

摘要： 转自 Oracle ORA-01033: 错误解决办法 打开PLSQL时出现以上错误。解决办法： 解决步骤 第一步、sqlplus /NOLOG 第二步、SQL>connect sys/change_on_install as sysdba提示：已成功 第三步、SQL>shutdown normal 阅读全文