- 博客(25)
- 资源 (4)
- 收藏
- 关注

原创 Pascal 的春天-Freepascal 可开发 WinCE/ARM-Linux程序
今天无意中看到"FPC 2.2.0 以后的版本已经都可以支持WinCE应用程序了。" (2007年的火星新闻),眼球就被吸引过去了,心想:不是吧,Borland 高薪养着的工程师没搞定的事情让一群义工搞定了?点击网址跳转过去一看,吓着了:不光可以交叉编译多种CPU的程序,连 Sun 的跨平台遗愿也给实现了,而且还是编译成原生代码呢!Lazarus 是 Freepascal 的图型界面
2009-05-05 15:00:00
2712
1
原创 使用户能够进一步控制对通过在多个基本表上执行 JOIN 操作所得到的 Recordset 中的特定基本表的修改
varADOSetList: TADODataSet;begin.....ADOSetList.Recordset.Properties.Item[Unique Table].Value := xxxTableName;end;Unique Table、Unique Schema 和 Unique Catalog 动态属性 (ADO)
2008-02-04 16:01:00
980
转载 超级电脑牛人
超级电脑牛人第一版1 很久以前,那还是我用win98的时候有次我系统崩溃了,因为我是计算机白吃,我朋友给我介绍了一个高手来帮我修计算机。 他看了一下计算机,问我有没有98的光盘,我说没有。 他想了一下,叫我把固定电话拿给他,我想修计算机要电话干什么,但人家是高手,我也不好说什么,就把电话拔下来给他了。 他把电话线空着的一头接在计算机的一个插孔内,然后进入了dos,然后就开始在
2007-07-14 11:18:00
2287
2
转载 一朝春尽红颜老,花落人亡两不知
花榭花飞飞满天,红绡香断有谁怜?游丝软系飘春榭,落絮轻沾扑绣帘闺中女儿惜春暮,愁绪满怀无处诉;手把花锄出绣帘,忍踏落花来复去柳丝榆荚自芳菲,不管桃飘与李飞;桃李明年能再发,明岁闺中知是谁三月香巢初垒成,梁间燕子太无情!明年花发虽可啄,却不道人去梁空巢也倾一年三百六十日,风刀霜剑严相逼;明媚鲜妍能几时,一朝飘泊难寻觅花开易见落难寻,阶前愁杀葬花人;独把花锄偷洒泪,洒上空枝见血痕
2007-07-02 21:23:00
1556
转载 两兄弟爬楼梯的故事(转载)
有一对兄弟,他们的家住在80层楼上。有一天他们外出旅行回家,发现大楼停电了!虽然他们背着大包的行李,但看来没有什么别的选择,于是哥哥对弟弟说,我们就爬楼梯上去!于是,他们背着两大包行李开始爬楼梯。爬到20楼 的时候他们开始累了,哥哥说"包包太重了,不如这样吧,我们把包包放在这里,等来电后坐电梯来拿。"于是,他们把行李放在了20楼,轻松多了,继续向上爬。他们有说有笑地往上爬,但是好景不长,到了40
2007-05-28 17:49:00
4539
1
转载 教你27招,让你在社交,职场上人人对你刮目相看
1.长相不令人讨厌,如果长得不好,就让自己有才气;如果才气也没有,那就总是微笑。 2.气质是关键。如果时尚学不好,宁愿纯朴。 3.与人握手时,可多握一会儿。真诚是宝。4.不必什么都用“我”做主语。 5.不要向朋友借钱。 6.不要“逼”客人看你的家庭相册。 7.与人打“的”时,请抢先坐在司机旁。 8.坚持在背后说别人好话,别担心这好话传不到当事人耳朵里。 9.有人在你面前说某人坏话时,你只微笑。10
2007-04-21 12:46:00
848
转载 人生成功要素三篇
人生成功要素三篇(一)十个成功要素--中国人的成功宝典 在中国社会想要取得成功,必须先要悟透中国人独特的民族习性。从出发前的自我准备、到人际关系的巧妙运用、社交圈的拓展要领、自身情绪意志力的自我控制,甚至如何与同事搞好关系,与上级相处的分寸等等,这些都是中国五千年来的社会文化精髓,是迈向成功的必修课程。曾仕强教授在亚洲可谓是大师中的大师,他将超过10个简单口诀式的归纳,来分别介绍中国人获
2007-04-18 23:46:00
1595
原创 Delphi 中使用 VB 开发的控件
在Delphi 中1. [Tools]->[Environment Options]->[Type Library] 选中 [Ignore special CoClass Flags When Importing] 再选中[Can Create] 2. [Component] -> [Import ActiveX Control] -> 选中要导入的 OCX 控件 -> 改修[Palette pa
2006-10-30 10:55:00
1216
原创 创建线程池实验
前几天,在工作线程完成任务后,通过在工作线程内执行 Suspend 将工作线程休眠,然后管理线程轮询线程池中的工作线程是否 Suspended 是否 = TRUE 要判断工作线程是否空闲。但结果发现, 工作线程执行 Suspend 后,常常 Suspended = FALSE,搞得线程池中的工作线程全部假死。只有另寻方法:用 Event 或 Mutex 通过去 WaitforSingleObejc
2006-10-24 17:36:00
3147
3
原创 使 Modelmaker 输出全部代码注释的设置
Modelmaker 是一个非常好用的建模工具, 9.0 之后还可以与 VS 环境结合生成代码.但默认设置是生成代码文件时不输出注释文本的, 连原有的函数注释也会被抹去。本文将介绍怎样在 Modelmaker 7.0 中输出注释,以 Delphi 为例。我的习惯是在:interface 位置使用单行注释, 在implementation位置的函数声明前用块注释(多行注释),在函数体内单行注
2006-10-24 08:27:00
1438
原创 更改Delphi系统的默认字体
每新建一个窗件都要改默认字体,不方便.通过添加注册值可更改Delphi系统的默认字体修改注册表:HKEY_CURRENT_USER/Software/Borland/Delphi/5.0/FormDesign Delphi 5:HKEY_CURRENT_USER/Software/Borland/Delphi/5.0Delphi 6:HKEY_CURRENT_USER/Software/Borla
2006-09-02 13:12:00
3280
1
原创 得到网络端口使用情况的两个函数
{*******************************************************}{ }{ 单元名: uGetExistPost.pas }{
2006-07-02 23:04:00
1201
转载 在Dephi中使用TStream读写数据的技巧
在Dephi中使用TStream读写数据的技巧 在Dephi中提供了一个抽象的数据类型TStream来支持对流式数据的操作。这些数据通常来自文件、数据库、内存对象、OLE对象等,TStream提供了统一、简洁的方法来进行数据的读写。在通常情况下,我们并不需要直接使用TStream类,对流式数据的读写封装在VCL控件的方法中。但是如果这些方法无法满足我们的要求,就需要自己手动控制数据的读写
2006-06-26 08:50:00
897
转载 影响一生的忠告
影响一生的忠告1.开最便宜的汽车;但买最好的房子-----在经济实力允许的情况下。 2.不要抛弃朋友。 3.在向朋友泄露私密前,要三思。 4.永远不要说发你薪水的人的坏话。 5.找女朋友时千万要小心,因为她对你今后一生的幸福与否起了90%的作用。 6.要提防那些永不吃亏的人。 7.每天抽空散步三十分钟。 8.学会急救。例如游泳、CPR........ 9.学会替
2006-06-18 16:08:00
874
转载 13种时间管理的方法
13种时间管理的方法 1、有计划地使用时间。不会计划时间的人,等于计划失败。 2、目标明确。目标要具体、具有可实现性。 3、将要做的事情根据优先程度分先后顺序。80%的事情只需要20%的努力。而20% 的事情是值得做的,应当享有优先权。因此要善于区分这20%的有价值的事情,然后根据价值大小,分配时间。 4、将一天从早到晚要做的事情进行罗列。 5、要具有灵活性。一般来说,只将
2006-06-18 16:08:00
1009
原创 聚合关系和组合关系示例
合成关系分为 聚合(aggregation) 关系和组合(composition) 关系, 在大部书中都讲得很抽像模糊。按我理解,这两种合成方式在代码中的表现应如下:typeTOperate = class(TObject); TAnyObjects = class(TObject)public constructor Create(AOwner: TComponent); over
2006-05-06 11:22:00
5929
原创 OleVariantToStream
procedure VariantToStream(const Data: OleVariant; Stream: TMemoryStream);var p: Pointer;begin p := VarArrayLock(Data); try Stream.Position := 0; Stream.Write(p^, VarArrayHighBound(Data, 1)
2006-04-15 00:17:00
1272
原创 COM+ 学习笔记
type TLogs = class(TObject) public function Read(const ADate: TDateTime): string; virtual; abstract; procedure Write(const AMessage: string); virtual; abstract; end; TTextLogs = class(TLog
2006-04-09 20:47:00
907
转载 安装SQL Server 错误
安装SQL Server 遇到错误提示:以前的某个程序安装已在安装计算机上创建挂起的文件操作。运行安装程序之前必须重新启动计算机!。 打开注册表编辑器,在HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Control/Session Manager删除PendingFileRenameOperations项
2006-03-24 17:40:00
1385
原创 keil c51 v7.20 + proteus 6.5的互联
http://www.c51bbs.com/c51blog/user1/1912/archives/2006/4188.shtml 下面说一下如何在keil中调用proteus进行MCU外围器件的仿真吧!1、安装keil c51 v7.20 与 proteus 6.52、把proteu
2006-02-15 08:49:00
2326
原创 如何将C++程序转为Pascal语法
如何将C++程序转为Pascal语法原文出处: by Paul Fulford of Komodo Software翻译:http://delphi.ktop.com.tw将C++ 转为 Pascal/Delphi==============================目录概论数据型态关键词叙述结尾变量宣告字符串数组数值的指定与比较常数宣告函数与程序with ... do叙述批注流程控制对
2006-02-11 00:20:00
2992
1
原创 顶置窗口不被其它窗口遮盖
//顶置,不被遮盖。SetWindowPos(handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOSIZE or SWP_NOMOVE); //取消顶置,可以被遮盖。SetWindowPos(handle, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOSIZE or
2006-02-05 21:49:00
1549
原创 ORACLE数据库的统计数据及其生成方式
ORACLE 数据库的统计数据及其生成方式 ORACLE 数据库的 PL/SQL 语句执行的优化器,有基于代价的优化器( CBO )和基于规则的优化器( RBO )。 RBO 的优化方式,依赖于一套严格的语法规则,只要按照规则写出的语句,不管数据表和索引的内容是否发生变化,不会影响 PL/SQL 语句的 " 执行计划 " 。 CBO 自 ORACLE 7 版被引入, ORACLE 自
2006-02-02 21:31:00
1106
最完整的 HTML 4.0 手册
2008-01-19
数学手册.chm (2/2)
2008-01-15
数学手册.chm (1/2)
2008-01-15
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人