02 2012 档案

我学Delphi心得与笔记-------在控件上如何禁用Ctrl+V
摘要：项目中用到一个TJamShellList组件，此组件实现绑定查询图片，发现在使用Ctrl+C的同时也可以使用Ctrl+V结果将一个图处复制了多份，这样就不行了:(于是，想了一个办法，禁用了Ctrl+V组合按键,代码如下://在KeyDown事件中写如下代码procedure TFrmPictureBrowse.lstPictureKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if(ssctrl in shift)and(key = $56) then begin Key := 0; end;end;这样就能禁 阅读全文
posted @ 2012-02-17 12:19 Sam.山子 阅读(1233) 评论(0) 推荐(0)
我学Delphi心得与笔记-------多线程实例
摘要：关于线程的原理：其实并没有真正的多线程，所谓的多线程只不过是CPU的执行效率高，将任务分成多个点，基本能达到同时执行的效果.关于Delphi下的多线程的应用需要说明的是：同时开启的线程数以及线程执行的方法都会影响cpu的执行效率，一般的情况下，能不用线程就不要用;下面写一个Delphi的多线和应用的例子：----------------------------多线程的申明type TmapQueryThread=class; TmapQueryThread=class(TThread) private vehicleId:string; Lon:integer; Lat... 阅读全文
posted @ 2012-02-15 17:20 Sam.山子 阅读(3351) 评论(1) 推荐(1)