原创 不用DLL即可Hook得到按鍵代碼(支持XP)
不用DLL即可Hook得到按鍵代碼(支持XP) unit Main;interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, F
原创 貼幾幅近照
長期酗酒、熬夜、高強度腦力勞動,長期失戀,不按時喫飯,外加三天沒刮鬍子,導致容顏極度憔悴,神情疲憊不堪,望各位程序員朋友引以爲戒!切
原创 Access的SQL語句中不能便用CEILING的解決辦法
因爲要取兩個時間之間相差的分鐘數,不夠一分鐘按一分鐘來算,但萬惡的ACCESS裏N多函數都是內置的,CEILING等函數在程序中無法使用,所以想了個辦法折衷實現:int((datediff(''s'',Begin_Time,stop_ti
原创 許巍-曾經的你
曾經的你 演唱:許巍 曾夢想仗劍走天涯看一看世界的繁華年少的心總有些輕狂如今你四海爲家曾讓你心疼的姑娘如今已悄然無蹤影愛情總讓你渴望又感到煩惱曾讓你遍體鱗傷dilililidilililidadadilililidilililidadad
原创 TStringList類的字符分割有問題,另貼一替代函數
TStringList類的字符分割有問題,當字符串中有#0到空格之間的任一字符時,都會被當作分割符,鬱悶,另貼一替代函數:function Split
原创 Sql Server 和 Access 操作數據庫結構Sql語句
下面是Sql Server 和 Access 操作數據庫結構的常用Sql,希望對你有所幫助。內容由海娃整理,不正確與不完整之處還請提出,謝謝。 新建表:create table [表名]( [自動編號字段] int IDENTITY (
原创 把DBGrid輸出到Excel表格(支持多Sheet)
{ 功能描述:把DBGrid輸出到Excel表格(支持多Sheet) 調用格式:CopyDbDataToExcel([DBGrid1, DBGrid2]); } procedure CopyDbDataToExcel(Args: arra
原创 今天幫一個哥們弄的查找無標題窗體上的控件句柄的代碼
var lst:TStringList; {$R *.dfm} function EnumWndProc(AWnd: HWND; AlParam: LPARAM):Boolean;stdcall; var WndCaption:
原创 死了老婆,放聲歌唱
死了老婆,放聲歌唱 中國人的達觀有一部分來自於他,來自於距我們2400年的這個我們稱作“莊子”的人。縱橫生死,豪邁豁達,終其一生,莊子一直對生命嚴肅而幽默,從未褻瀆。這個夜裏我翻開他的書,聽他用河南口音說“生也死之徒,死也生之始”,感
原创 再見
再見 你說的多明顯我卻當成懸念是否這是你心願再見 你只說了一遍我卻當成誓言明知你不會兌現若不是你轉身前 委婉的拒絕曾習慣的吻別我不會發覺 心痛到極點你
原创 二元一次方程 高斯消元法計算函數
TRS=array[1..2] of Real; {二元一次方程 高斯消元法計算函數} function X1Y1_2(const ia1,ib1,ic1,ia2,ib2,ic2:Real):TRS; const //爲數組的行數與列
原创 如何在程序發佈時不附帶midas.dll文件
Delphi程序中,如果用到了ClientDataSet控件,程序發佈時需要附帶midas.dll文件,在客戶端和服務器內uses midaslib
原创 有些祕密,我不想知道
有些祕密,我不想知道 轉自:《意林》作者:安寧 這是很多年前的事了。那時他還是一個見人就會拘謹的青澀男生,剛剛從西部邊遠的小縣城,考到繁華的上海讀書。那種無人結伴的落寞和孤單,每到週末大家紛紛出去跳舞K歌的時候,就會愈發地深下去
原创 文件自啓動方式
一.自啓動項目:開始---程序---啓動,裏面添加一些應用程序或者快捷方式.這是Windows 裏面最常見,以及應用最簡單的啓動方式,如果想一些文件開機時候啓動,那麼也可以將他拖入裏面或者建立快捷方式拖入裏面.現在一般的病毒不會採取這樣的
原创 雲臺記趣
從雲臺山回來都幾個星期了, 早就想寫篇遊記或是貼點觀感什麼的,可是一直懶得寫,今天終於把照片都傳上來了,終於下定決心,湊篇東東出來。想了半天,不知道寫