廣告

2025 年 11 月
 12
3456789
10111213141516
17181920212223
24252627282930

彙整

[Delphi] 送出鍵盤與滑鼠的指令

網路上找到的文章,Ord(‘C’) <==其實轉出來就是ASCII碼,知道後比較可以靈活運用在用變數的方式帶入。

 

文章出處:http://blog.yam.com/yqbagzdk/article/25791738

======================================================

最近碰到使用 SendMessage 和 PostMessage 機會超級多,無非是因為太多的程式合輯專案需求,如果耗費人力全部自行開發,大概請二、三倍的人力結果也只是為了完成幾個對於圖形處理的動作而已,建築.室內設計.服裝相關軟體因此購買已經寫好的軟體直接使用就行,但畢竟購買是購買,有些畫面或是需求畢竟是套裝軟體無法達成的,於是還是得自己寫控制指令

可以自己寫一個類似按鍵精靈的東東,也就是控制滑鼠自動在畫面上操作東西

滑鼠自動點擊的例子

procedure TForm1.Button1Click(Sender: TObject);

var x,y:integer;

begin

    x:= form1.Left+button2.Left+25;

    y:= top+button2.Top+27;

    SetCursorPos(x,y);   // 移到某個點

    Mouse_Event(MOUSEEVENTF_LEFTDOWN,X,Y,0,0); // 按下滑鼠左鍵

    Mouse_Event(MOUSEEVENTF_LEFTUP,X,Y,0,0);   // 放開左鍵

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

showmessage(‘fksj’);

end;

*************************************

其中 mouse_event 這是 WindowsAPI 的指令,xyz軟體補給站

還有下列的幾種

MOUSEEVENTF_MOVE            = $0001; { mouse move }

MOUSEEVENTF_LEFTDOWN        = $0002; { left button down }

MOUSEEVENTF_LEFTUP          = $0004; { left button up }

MOUSEEVENTF_RIGHTDOWN       = $0008; { right button down }

MOUSEEVENTF_RIGHTUP         = $0010; { right button up }

MOUSEEVENTF_MIDDLEDOWN      = $0020; { middle button down }

MOUSEEVENTF_MIDDLEUP        = $0040; { middle button up }

MOUSEEVENTF_WHEEL           = $0800; { wheel button rolled }

MOUSEEVENTF_ABSOLUTE        = $8000; { absolute move }

而下面的這段則是模擬鍵盤

//Ctrl+C: 
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0); 
keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), 0, 0); 
keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), KEYEVENTF_KEYUP, 0); 
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0) 
 
//Ctrl+V: 
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0); 
keybd_event(Ord('V'), MapVirtualKey(Ord('V'), 0), 0, 0); 
keybd_event(Ord('V'), MapVirtualKey(Ord('V'), 0), KEYEVENTF_KEYUP, 0); 
keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0) 

微軟SQL Server 2008 R2處理器授權將漲價

現在很多軟體都是用處理器數量來決定售價高低?但是使用多顆處理器是否效能就是提升100%以上呢?個人覺得如果真要以處理器或是核心數來決定售價,請提出完整的數據說明多少核心或多少處理器效能提升多少?再來說明訂價,會比較容易讓消費者接受。

如果軟體在單核與多核心跑的效能一樣,或是只有多3%的效能,價格卻要多50%,那就太誇張了點……………我寧願把CPU拔掉,或是用軟體把一些核心關掉……………

=======================================================================

http://www.ithome.com.tw/itadm/article.php?c=60486

 

微軟SQL Server 2008 R2處理器授權將漲價

文/蘇文彬 (記者) 2010-04-07

新版SQL Sever 2008 R2標準版、企業版處理器授權費用將調高15至25%,雖然上漲但微軟強調仍比其他業者按核心數計費便宜。

微軟計劃5月推出SQL Server 2008 R2,但由於多核心處理器成為主流,強調依處理器數目計價的微軟軟體將調漲價格,漲幅依版本差異為15%至25%。
SQL Server 2008 R2預計5月推出兩個產品,包括用於256顆處理器、2TB記憶體的SQL Server 2008 R2 Datacenter版本,以及整合DATAllegro平行處理架構(Massively Parallel Processing,MPP)的SQL Server 2008 R2 Parallel Data Warehouse。

對於授權費用調漲,台灣微軟資深產品行銷經理李玉秀說明,原本微軟計劃跟隨其他業者腳步,將授權費從處理器計價改為核心數計價,但考慮到企業授權費成本可能增加,決定授權費按實體處理器數量計價,僅上調每顆處理器的授權費用。

按微軟的規劃,調漲後新版資料庫軟體處理器授權費用,標準版每顆處理器授權費用將調漲25%,企業版調幅雖然較低,但仍有15%的漲幅。

雖然漲聲響起,但微軟認為相較其他業者授權費用,SQL Server 2008 R2仍是平易近人許多。李玉秀指出,目前處理器核心數從4核一路增加至8核心、12核心,SQL Server仍按實體處理器授權計價仍比其他業者按核心數計價相對優惠。以一台二路8核心伺服器來說,SQL Server只以2顆處理器計價,其他業者則以4至8個核心計價,SQL Server 2008 R2取得成本為其他業者的一半或四分之一價格。

微軟調漲授權費用的背後有其合理性,隨著處理器內建的核心數愈來愈多,許多軟體由過去按實體處理器數量計算授權費的模式改按核心數收費,除了資料庫軟體外,VMware去年也將虛擬軟體VMware vSphere 4.0授權費計費改按核心數計價。微軟在支持多核心的策略下仍以實體處理器計價確實對企業較為有利。

另一個微軟認為SQL Server 2008 R2平易近人的原因則是新版軟體在大量資料的處理上,單位TB資料的成本較其他業者低。例如支援MPP平行處理架構的SQL Server 2008 R2 Parallel Data Warehouse可支援最多50個節點、320核心、137TB的大規模資料平行處理。

微軟強調,相較於Teradata等其他產品需要搭配較高的維護費用,SQL Server 2008 R2 Parallel Data Warehouse維護費用上客戶有自由選擇的彈性,例如以100TB以上資料量為例,每TB總成本費用為15000美元,也較其他產品便宜三分之二。

此外,Oracle去年也發表新版資料庫伺服器Exdata V2,強調支援資料壓縮處理、Flash快取處理等技術,並以自家軟體結合昇陽硬體,透過軟硬體優化設計提昇系統效能。

李玉秀表示,相較於甲骨文與昇陽系統搭配使用,微軟與各家系統業者合作,企業可依需要選擇在Bull、Dell、HP、IBM、EMC等運算系統上執行,為了提供更好的系統優化選擇,微軟6月也會與特定業者合作,以SQL Server 2008 R2 Parallel Data Warehouse搭配優化系統搭售。

不僅5月將推出SQL Sever 2008 R2,微軟還將推出新版協同作業、搜尋平台SharePoint Server 2010,其中Fast Search Server 2010 for SharePoint支援資料全文檢索、分類、預覽功能,提昇資料搜尋的效率。

桑椹果粒或果醬

朋友家自己種的,在新竹縣湖口這邊,天然健康,有興趣可以打電話訂構:

鄭先生
0912531260

 

1 2
簡介:桑樹於每年清明前後開始結桑椹果,初時由青白色而至淺紅色,成熟時則為紫黑色,桑椹味道
甘而微酸,香氣淡雅。桑椹含有多種氨基酸、葡萄糖、果糖、鞣質、蘋果酸、花青素、胡蘿蔔素、
天車菊素、鈣質、鐵質、磷質、維生素A、B1、B2、C、D等豐富的營養成分。

品名:桑椹果粒(內含整顆桑椹果粒由現採新鮮有機桑椹果粒、糖或冰糖熬煮4小時而成)(淨重:900g,175元)

           桑椹果醬 (由現採新鮮有機桑椹果粒、糖或冰糖熬煮4小時而成果醬)                            (淨重:900g,175元)

成份:現採桑椹果粒冰糖或糖  
﹡因採用天然果粒熬煮保證不含防腐劑,所以開瓶後請冷藏並儘速飲用。
食用方式:
◎桑果飲料:杯內放適量桑椹果粒汁,沖入冰開水或熱開水,攪拌均勻,即成一杯口感特佳的飲料;
加入鮮奶調和飲用風味更佳哦。
◎桑椹優格:自製優酪乳,淋上適量桑椹果粒汁,即成美味桑椹優格。
◎桑椹餅乾:在蘇打餅乾上塗抹適量桑椹果粒汁或桑椹果醬,保證吃了會一片接一片哦!
◎桑椹 冰:將適量桑椹果粒汁淋在剉冰上,即成夏日中清涼消暑的健康冰品。

我把鏡子摔破了

破掉的鏡子,再組合起來,裂痕已經造成,為何我可以這麼輕易的就把鏡子摔破?一個我保存了很久的鏡子,最後割傷了自己,也割傷了別人…………….

我想最後後悔的人,一定會是我!

女性朋友門有福了,看的我目不轉睛阿~~~~

女性朋友門有福了,看的我目不轉睛阿~~~~

 

邱澤沒錢途 喬恩「ㄘㄟˋ」

所以說以前的人說的門當戶對,是有道理的,到了現在可不是門當互對而已,最好能力還要差不多,這樣誰也不會覺得誰比較差………….

 

自由 更新日期:2010/03/27 04:11

記者陳珮伶/台北報導

陳喬恩與邱澤去年因拍攝「福氣又安康」擦出愛火,但相隔不過半年,昨天她出席內衣活動卻宣判邱澤已出局說:「他已經是沒有什麼交集的朋友。」據悉兩人分手的主因為貧富差距過大,女方一年可賺3000萬之譜,男方約300萬,因價值觀無法配合,戀情只維持半年便退燒。

陳喬恩年撈3000萬

陳喬恩與邱澤去年夏天合拍「福氣又安康」時,兩人暗譜戀情,甚至被拍到她夜宿男方家,之後兩人又轉往中國拍「佳期如夢」,少了台灣媒體追蹤,兩人在海外甜蜜升溫,只不過今年一月,兩部戲拍完後,戀情蜜月期結束要面對現實,才發現兩人差很多。

據傳聞指出,陳喬恩年收入高達3000萬,邱澤年收入300萬,差了10倍,貧富差距過大,兩人世界大不同,此外陳喬恩個性強勢,邱澤屬個性派,無法對她百依百順,兩人半年便畫下句點。

連環Call嚇跑邱澤?

昨她一被問到邱澤,顯得坐立難安說:「我是一個冷派的人,不會主動跟人連絡,他也沒有跟我聯絡。」強調自己單身沒談戀愛,更脫口說出和邱澤已經沒有交集。

她自認談戀愛時會變小女人,會重色輕友搞失蹤,但急性子的她只要一找不到男友,就會奪命連環Call。邱澤曾被楊丞琳抱怨「找不到人」,再比對陳喬恩的說法,有異曲同工之妙。

害羞拒絕頂一下

她之前內衣廣告和男模演出「頂一下」,引起討論,現場攝影要求再演一次她害羞拒絕,昨她內衣新作曝光,改走偶像劇路線,不過胸前33D「波濤洶湧」依舊。而她四月將演出偶像劇「家有查美樂」、五月將演出朱延平執導的電影「大笑江湖」,兩部戲都是她擅長的喜劇路線。

而她也被發現臉疑似過敏發紅,雙腿膝蓋更滿是瘀青,她哀怨撇說是燈光問題,早上化妝,化妝師還誇她皮膚狀況不錯。

ACER REVO R3600改裝XP心得

R3610適用

我是看這篇文章將 SATA 驅動程式都整合進去,可以選 APCI 不用模擬 IDE 的方式安裝,聽說效能會好一點。

http://blog.ilc.edu.tw/blog/blog/1941/post/5352/68512

 

ACER五月推出一公升的REVO R3600,六月看到報導,心就開始動了起來,但直到七月才下定決心,這就是我們這種老人的行為模式,難怪音樂市場從不渴望老人們買CD。

花了XXXX元(沒錯,就是XXXX,不是購物網的8500)信用卡刷卡,今天刷,明天到貨,速度很快,包裝很簡單,沒有購物網的外箱,直接產品包裝箱貼出貨單,收到時包裝箱已撞凹一角(囧)。

因為買的是linux版本,當然要試用一下,哈哈,開機超快,使用超方便,不過不合我用,因為我跟linux不熟,只好改裝xp。

原以為很簡單,準備好usb光碟機開始工作,結果搞了三天。

第一天直接重新分割硬碟,用ghost方法把乾淨的系統直接灌進去,一向我都是這樣裝系統的,灌好開機,出現99 99 99 99 99……………….

完蛋了,原來的linux已不在,xp又起不來,查了一下網路,acer不支援xp,只支援vista,但是有人成功,有人一樣起不來。

第二天,直接打在話問acer維修部客服,小姐很客氣再告訴我一次不支援xp,不過她也告訴我其實裝xp是可以的,只是有些東西無法驅動。

乖乖,我只好裝windows 7rc,所有驅動一次ok,中文跟一些常用程式都裝起來,一切順利,最後我要用的程式裝起來卻無法執行,打電話問軟體公司,回答是還沒試過windows 7。

只好爬文裝xp,網路上裝很多,而且是可以完全驅動,只是大家安裝的順序不同,這裡做一個整理,讓後面的人不用花冤枉時間。

最重要的討論在:ACER ION R3600 XP DRIVER問題(分享~解決了一半)http://www.mobile01.com/topicdetail.php?f=174&t=1093803&last=12911528

驅動程式在78樓(如下)

1) GPU-nVIDIA ION (186.18_desktop_winxp_32bit_international_whql)
http://www.nvidia.com.tw/object/winxp_186.18_whql_tw.html

2) nVIDIA Chipset nforce v20.09
http://www.nvidia.com.tw/object/nforce_winxp_20.09_tw.html

3) HDMI audio Driver (nForce_HDA_1.00.0.37_international)
http://www.nvidia.com.tw/object/nforce_hdmi_audio_winxp_1.00.0.37_tw.html

4) Realtek High Definition Audio Driver
http://www.realtek.com.tw/downloads/downloadsView.aspx?Langid=1&PFid=24&Level=4&Conn=3&DownTypeID=3

5) atheros_ar5xxx_7.7.0.259-2kxp(WLAN_NE785)
http://www.station-drivers.com/telechargement/atheros/wifi/atheros_ar5xxx_7.7.0.259-2kxp(www.station-drivers.com).exe

110樓有安裝光碟要用到的sata驅動(如下)

http://download3.msi.com/files/downloads/dvr_exe/mcp7a_sataraid_xp32_mb.zip

安裝光碟製作看:Acer Revo R3600製作可開機光碟
http://clif.pixnet.net/blog/post/23892440

nlite程式下載及更詳細說明看:nLite v1.49 自製整合SP3、修補程式、驅動程式的「Windows XP全自動安裝光碟」!
http://briian.com/?p=5487

我的做法是用nlite把sata裝進xp sp3光碟(無人值守版本),用rw片燒出來,一次裝到好,然後才依序裝驅動程式(原來用usb隨身碟,結果xp抓不到,改用隨身硬碟就成功),一下子就裝好。

習慣上這時變更xp授權碼,然後才插上網路線更新系統,最後裝上常用軟體,一切搞定。

感謝前人的努力。

願匯回瑞士鉅款 吳淑珍牽拖「對抗統一」

2100萬美元……..難怪兒子可以不用工作……….

奇怪………明明就是貪污,弄得好像變成再做公益似的,而且又在煽動族群關係,想讓大家又吵架……….……..個人覺得,該判刑就該判刑,哪怕是殘障人士,而且是奸詐無比的殘障人士………………..

 

=======================================================

願匯回瑞士鉅款 吳淑珍牽拖「對抗統一」

NOWnews 更新日期:2010/03/22 12:37 社會中心/綜合報導

前總統夫人吳淑珍今(22)日聲明表示,她以主動、自願的態度,同意匯回扁家在瑞士帳戶約2100萬美元的款項,但應匯至由公正第三者監督管理的信託帳戶,且用於支持台灣本土力量與捐助社會公益弱勢兩大用途。

吳淑珍今日發表3點書面聲明,她首先強調,海外帳戶資產的來源皆為合法政治獻金,為貫徹公共財的信念,如同過去8年陳水扁在總統任內捐助民進黨共約新台幣13億元的作法,全數用於公眾,家人絕不使用任何1塊錢。

聲明中說,兒子陳致中夫婦已向社會承諾海外帳戶資產匯回台灣捐作公益,陳家人的承諾從來沒有改變,可由社會公評並受人民檢驗。她強調是以「主動、自願、善意、配合」的態度將海外帳戶資產匯回,絕非畏罪繳回貪污所得、也不是檢察機關追回犯罪所得、更非洗錢帳款進入國庫。

吳淑珍表示,按照國家法律規定,這些款項並無法律上義務匯回,因此外界扭曲的污名化說法,形同媒體公審、有罪推定,她表示嚴正抗議。為確保海外帳戶資產的每1塊錢都能用於她所主張的「本土」及「公益」用途,海外款項應該匯至1個由公正第三者監督管理的信託帳戶,而非檢察機關的帳戶。

她說,這筆款項應用於「支持台灣本土力量」與「捐助社會公益弱勢」2大用途,由社會共同見證監督。至於何謂「支持台灣本土力量」?吳淑珍指出,將全力協助所有本土社團、本土媒體持續發揚台灣主體意識,團結本土力量,對抗終極統一,捍衛「台灣中國、一邊一國」的理念。

在「捐助社會公益弱勢」部分,聲明中說,將捐助全國中小學清寒家庭學生的營養午餐及獎助學金,及捐助台灣失智症協會、中華民國自閉症總會、伊甸社會福利基金會等全國優質的公益弱勢團體,並協助各縣市社會局輔導的單位。

新鮮人怨:薪資被拉低 像打雜的

這個新聞讓我想起個故事:有個乞丐,沒有飯吃,有好心的人去買了碗滷肉飯,還多加了筍絲、滷蛋,拿給這個乞丐,結果這個乞丐竟然還嫌這個好心人怎麼只給滷肉飯,而且筍子跟滷蛋還沒分開放,像吃餿水似的……………

沒有工作機會,政府的政策有問題,但是我覺得是教育的政策最先出了問題,所以才會教出一堆會嫌東嫌西的”乞丐”,另外最大的問題就是他們從未想過提升自己的競爭力,只想做最輕鬆的工作,領最多的薪水……..讓我想起當兵剛入伍的時候,老兵老是三字經問候新兵外,總還是會聽到一句話:掯!過太爽!現在想起這句話,還真適合給這些滿口抱怨的新鮮人……..

但是政客可以得罪這些新鮮人嗎?別忘了她們也是有投票權喔!哈哈,這種關係是不是很奇特呢?

 

中時 更新日期:2010/03/22 02:29 張舒婷/台北報導

中國時報【張舒婷/台北報導】

政府為了拯救失業,推動大專生企業實習方案,但一一一一人力銀行的最新調查顯示,高達五六.一一%新鮮人認為,政府推動的「二十二K」方案,對於就業市場沒有直接幫助。多數學子也坦承,待遇如此微薄,只能先「騎驢找馬」,一旦有更好的工作機會就跳槽。

去年自台大中文系畢業的「小婉」(化名),為了學以致用,透過「二十二K」方案進入一家出版社工作。不過由於小婉家住宜蘭,考慮到兩萬二的月薪無法支付在外租屋與生活開銷所需,只好每天花長達兩、三個小時的時間通勤上班。

小婉無奈地說,進公司前,老闆把話講得非常動聽,答應會將她培訓成專業編輯,實際上工後,她卻覺得自己活像個「打雜小妹」,每天忙著接電話、打電話、搬東西、打掃,有時老闆還會臨時要求例假日加班支援公司活動,也不另外支付加班費。受不了這種待遇,今年二月她提出辭呈,開始找下一份工作。

自某國立科大資工系畢業的劉姓男同學,去年七月在科技公司實習,擔任業務,雖然公司已承諾,一年後將聘任他為正式員工,但一談到自己做的是正職工作,月薪卻只有兩萬二,仍十分無奈。「這項計畫可能對某些畢業後不知道要做什麼的學生有好處,但還是影響我們談薪水的本錢。」

去年畢業於清雲科技大學資訊管理系的廿二歲王小姐說,兩萬兩千元的月薪,比兼職工作薪資還少,工時彈性也更低,故她情願放棄尋找一般正職。王小姐現在擔任泰式料理餐廳工讀服務生,一個月平均工作一百九十小時,時薪一三○元,每月進帳兩萬五千元,一個月內還可休六到七天假。

FastCopy不只是快速複製軟體

這是一個非常棒的複製軟體,速度快通常是大家所觀注的,但是我對這套軟體的看法不同,若是公司有DC環境,想要快速移動資料,又想保留資料的相關權限,那這套可就是阿拉(真神)了!

 

一般教學及下載1.94繁體中文免安裝版

http://www.minwt.com/?p=853

 

看完一般教學後,在來教大家怎麼複製權限:

 

兩個來源檔案的權限相同

1
2

 

使用一般複製:
3 

複製完後權限變更:
4

使用特殊ACL複製(中文翻譯的看不懂意思):
5 

權限原封不動的搬到新家啦~~~
 6