計算機應用畢業論文范文

前言：我們精心挑選了數篇優質計算機應用畢業論文文章，供您閱讀參考。期待這些文章能為您帶來啟發，助您在寫作的道路上更上一層樓。

第1篇

計算機應用論文2000字(一)：大學生計算機應用基礎課程分層次教學的有效性研究論文

摘要：大學計算機應用基礎是一門重要的公共必修課，但教學中受學生思維能力、已有基礎影響較大，教學內容和教學模式又相對保守，教學效果一般。在本文中，筆者就引入分層次教學方法，針對學生計算機基礎水平進行調查分析，然后實施分層次教學實踐。通過長期分層次教學實踐，學生計算機基本技能得以顯著提升，教師教學能力同時也得到了發展。在新課程改革大背景下，分層次教學以其針對性強、因材施教、從實際出發等特點，成為課程教學改革的一個重要方向。

關鍵詞：計算機應用；基礎；分層

計算機應用基礎課程是大學生必修的一門基礎課，大學生必須要學會計算機基礎知識以及相關的基礎操作，并將提高計算機應用能力作為一門重要的課程進行學習。傳統的計算機應用基礎課堂形式更多的是教師在強行灌輸知識，缺少對學生動手能力的培養，有時候一節課45分鐘，學生自己操作的時間只有10分鐘，到了下一堂課教師又會教新的內容，學生上節課的還沒掌握好就要被迫學習新的，這會導致學生學習積極性不高。所以我們一定要結合學生的個性進行因材施教，利用分層次教學提高學生的計算機學習能力。

一、明確不同學生的學習狀況

計算機應用基礎是大學生必修的一門功課，也是計算機應用非常重要的課程，學生的掌握程度直接影響到后期計算機的應用與學習。但是隨著現在國家實現高校擴招，學生層次差異也越來越大，傳統的教學并不利于學生的進步。所以學生主動探索學習、組建自己的知識建構是非常重要的，教師在進行計算機教學時一定要從每個學生的特點出發，創設學生更利于貼近學生專業學習以及便于學生畢業后在公司能夠積極響應公司要求的問題情景。教師一定要從學生的實際考慮出發，讓每一個學生都能積極參與其中，多開展各種計算機應用教學活動，定制不同層次的教學目標，改變傳統標準、循序漸進，讓基礎差的學生也能夠跟上步伐。

二、因材施教，分層練習

由于學生的理解能力不同，每個學生的能力是有一定的差異的，教學過程中教師務必要根據學生的認知水平以及學習能力來制定教學方案，讓每個層次的學生都能完成任務，激發學生的學習興趣，培養他們的主觀能動性。在教學實踐中，教師可以試著將教學任務分為基礎、提高、探索三部分?；A部分主要是考查學生是否牢固的掌握了計算機基礎知識點，提高部分主要是為了讓學生能夠在基礎的層次上更加深入了解計算機，剖析每堂知識點的重難點，能夠靈活的運用到生活中，探索部分顧名思義就是希望學生能夠開發自己的創新、創造力，能夠利用自己所學的知識嘗試開發出更多新奇的計算機編程。

打個比方，學生在學習EXCEL時，教師可以根據三個層次進行任務分類?；A類的任務是要求學生簡單的將學生的學號、姓名、各科成績以及總分數根據降序排序的方式進行排序。讓學生先認識、了解排序的公式、快捷鍵等。學生們都掌握得差不多時，教師可以提高難度，讓學生將已知的學生的學號、姓名、各科成績以及總分數以名次先后順序進行排列，同時可以嘗試讓學生了解在生活中、工作中，這樣的排序學習能夠帶給他們什么樣的便利。緊接著就是探索類的教學，給學生假設一個場景，我們做好編輯之后要將表格給同事或領導觀看，但是這位同事或者領導并不懂得如何使用排序操作，那么這個時候我們應該怎么讓對方查找自己想要的排序方式？

通過這樣的分層次教學，讓不同基礎的學生都能夠學到自己的希望學到的知識點，基礎薄弱的學生在熟悉掌握基礎后也可以進一步向探索層次進軍。

三、舉辦課堂競賽，分層鞏固學習成果

教師可以嘗試多舉辦課堂競賽提高學生的學習興趣。學生在學習上只有相互追逐才有學習的勁頭。競賽形式教師可以分為個人競賽、小組競賽兩種模式，個人競賽主要是為了考量每個人的學習情況以及能力，小組競賽更多的是為了培養學生的團隊精神。個人競賽中，教師可以將出題的重點壓在個人的打字速度、對公式的熟悉情況；小組競賽可以多設立一些半開放或完全開放的任務，例如電子報刊排版、宣傳單的設計、雜志封面等等，讓學生既能夠意識到團結合作的重要性還能夠開發他們的創新能力。

四、對學生學習情況進行認真評價

以前由于并不重視大學生計算機應用，就算教師安排的任務學生完成了，學生上交作業后教師并不會對學生的作品進行針對性的評價，僅是將上交率作為一個平時考勤的參照。教師應該改變這種觀念，要積極、認真的對待學生的作品，針對學生的作品找出其中的不足并幫助學生找出改正的方法，促進學生有更好的進步空間。另外教師一定要培養學生多問問題的習慣，鼓勵學生找出問題，大家共同解決，只有這樣才能夠提高學生的學習興趣。

五、結束語

層次教學主要是為了讓學生能夠在適當的學習環境下找到適合自己的學習模式與步伐，讓基礎較弱的學生能夠有所進步、學有所獲，同時掌握好基礎的知識，讓基礎好的學生穩扎基礎知識的同時去探索新的學習模式，不斷提高自己。

作者簡介：梁濤（1983--）男，新疆昌吉人，本科，主要從事計算機行業。

計算機應用畢業論文范文模板(二)：高職計算機應用基礎課程中數字化教學資源的應用論文

【摘要】本文闡述在高職計算機應用基礎課程中應用數字化教學資源的重要性，分析數字化教學資源應用面臨的數字化教學資源缺乏系統性創新性針對性、教師數字化教學能力欠缺、數字化教學資源選擇范圍受限、考核評價機制不利于促進數字化教學資源應用等問題，從校園網平臺、數字化教學資源選擇、教師數字化資源應用能力、教學模式、考核評價機制等方面論述數字化教學資源的應用策略。

【關鍵詞】高職計算機應用基礎數字化教學資源應用

【中圖分類號】G【文獻標識碼】A

【文章編號】0450-9889（2020）02C-0159-02

在互聯網信息時代，計算機是人們日常工作和生活不可缺少的部分，同時也是提高學習、辦公效率的重要工具。因此，高職院校必須重視計算機應用基礎課程的教學工作，不斷與時俱進，培養符合時代要求的學生。

一、在高職計算機應用基礎課程中應用數字化教學資源的重要性

數字化教學資源是以互聯網為基礎、以信息技術為物質條件的新型教育資源，具有打破時間、地點限制的優勢，能夠使教師教學工作更加便利高效，能為教師的課堂教學補充豐富的內容。同時數字化教學資源也打破了學習的地點與時間限制，為學生的學習提供較大方便。這種運用互聯網工具進行教學輔助的現象也是時展的主流趨勢。

高職計算機應用基礎課程教學等級為高等教育，更體現了互聯網時代的科技性與先進性特點。因此，高職院校計算機應用課程應充分利用數字化教學資源進行課堂教學，以充分體現計算機課程的應用性和先進性。此外，計算機應用能力是當代社會學習、辦公以及生活的必備技能，高職院校作為學生獲取社會生存技能的重要場所，其計算機應用基礎課程是學生的必修課程，為培養學生適應社會需求的技能，該課程必須融入數字化教學資源，這是社會發展的需要。

二、高職計算機應用基礎課程中的數字化教學資源應用面臨的問題

（一）數字化教學資源缺乏系統性、創新性、針對性。數字化教學資源這一概念是近幾年提出的新課程改革的內容，由于提出時間晚，發展時間短，數字化教學資源建設尚處于初級階段，不具備完整的理論系統，而且在當前的運用中也存在諸多不足之處。在高職計算機應用基礎課程教學中，數字化教學資源并不豐富，教師通常選擇網絡上已有的數字化教學資源進行課堂教學，缺乏創新性和針對性。

（二）教師數字化教學能力欠缺，不能有效利用數字化教學資源。高職計算機應用基礎課程教師雖具備較高的知識水平，但是大部分教師已經適應傳統的教學方式，即課堂偏重理論講解，依照教材講授教學內容，對互聯網教學設備和數字化教學資源的認識不深、運用技能掌握不足，不能將課程內容與數字化教學資源進行有效結合。加之學校極少組織計算機課程教師進修學習，使得計算機課程教師與現階段數字化教學要求脫節。大部分教師在計算機應用基礎課程教學方面不能有效利用數字化教學資源，使得數字化教學資源的價值不能得到充分發揮。

（三）數字化教學資源選擇范圍受限。計算機應用基礎課程作為一門技術性學科，具有實踐性、操作性的特點，其教學目標在于“應用”。因此，該課程教學內容只有凸顯實踐性、操作性，才能有助于達到課程教學目標。傳統計算機應用基礎課程教學以教材理論為主，實踐操作環節欠缺，而且課程內容單一，與學生的發展要求有所差異，難以調動學生的學習自主性。數字化教學資源雖可緩解這一現象，但是由于教師限定了數字化教學資源的選擇范圍，學生因此失去了自主選擇數字化教學資源的權利，處于被動位置。結果導致數字化教學資源應用價值無法得到體現。

（四）考核評價機制不利于促進數字化教學資源應用。在計算機應用基礎課程中應用數字化教學資源進行教學后，課程考核評價機制也應涵蓋涉及數字化教學資源應用的方方面面。然而，當前高職計算機應用基礎課程的考核評價機制仍沿用傳統方式，仍以試卷考試成績為評分依據，偏重考查學生計算機理論概念的掌握，沒有對數字化教學方面進行考核，因而不能有效檢驗數字化教學資源的有效性，使數字化教學資源不能發揮教學輔助的重要價值。

三、高職計算機應用基礎課程中數字化教學資源的應用策略

（一）以校園網為平臺促進數字化教學資源的應用。高職計算機應用基礎課程教師可發揮自身計算機專業優勢，利用自己的學識以及技能，聯合其他專業教師開發適宜本校計算機應用基礎課程的數字化教學資源，并以校園網為平臺，促進師生對數字化教學資源的應用。

校園網是高職院校利用“互聯網+”整合校園學習和校園信息的信息網絡系統，包含學生課程表、個人成績、網絡課程、自主選課、學校公告等信息，學生通過網絡即可獲取學校最新動態，這樣不僅降低了學校管理成本，還為學生利用數字化教學資源學習提供了平臺。以“學習通”校園網為例，學生在選擇計算機應用基礎課程任課教師時，可通過“學習通”軟件自主選課系統選擇自己心儀的教師；教師也可利用班級群聊，作業通知與考試時間通知，以節省信息傳達時間；期末考試教師可在線測試，將線上成績納入期末成績；等等。校園網的這些功能，能夠在很大程度上促進師生對數字化教學資源的應用。

（二）擴大數字化教學資源選擇范圍，豐富數字化教學內容。針對數字化教學資源系統性、創新性、針對性不強且范圍受限的問題，教師應改變教學理念，注重引入更為豐富、全面、有針對性的數字化教學資源，而不應局限在傳統教學內容的范圍。在數字化教學資源應用中，教師可有意識地選擇涵蓋重要教學知識點、更有趣味性、更多樣化的數字化教學資源，包括影、視、音三大種類，通過利用有趣的視頻、生動的圖片以及音樂，有效地吸引學生的注意力，調動學生的積極性。例如，教師在講解PowerPoint插入超鏈接操作，為學生示范如何建立視頻鏈接或者音樂鏈接時，就可以將相應的數字化教學資源引入進來。以制作《紅樓夢》課件為例，將紅樓夢影視經典片段加入文件中，課堂示范時播放給學生觀看，可以激起學生的學習興趣。

（三）提高教師對數字化教學資源的認識及應用能力。教師是教學活動的承擔者，也是知識傳遞的橋梁，只有掌握了有效的教學技能，才能更好地進行教學實踐活動。為提高高職計算機應用基礎課程任課教師的計算機應用能力和教學實踐能力，學?？啥ㄆ诮M織計算機應用基礎課程教師進行教學技能進修，引導其重視數字化教學資源對課程教學的作用，充分認識數字化教學資源具有豐富、跨時空的特點，明確數字化教學資源在計算機應用基礎課程上發揮的巨大價值，如豐富課程內容、完善教學知識結構、在線教學等價值，結合課程充分融合數字化教學資源，使計算機應用基礎課程更具時代性與適用性。

高職院?？山M織教師外出參加數字化教學資源應用考察培訓，如組織教師前往計算機應用基礎課程中數字化教學資源應用較為成功的學校進行考察學習，在考察學習過程中讓教師扮演學生的角色，跟隨被考察學校教師進入課堂聽課學習，在聽課過程中做好課堂記錄，以提升自身數字化教學能力。

（四）采用適合數字化教學的教學模式。傳統教學模式以教材知識內容為范圍，授課方式為班級集中制。數字化教學資源在高職計算機應用基礎課程中的應用需要打破教材和班級集中教學的局限，使計算機應用基礎課程學習不再受時間地點等因素的影響。因此，單純的集中授課的方式已經難以適應數字化教學的要求，不利于數字化教學資源的應用，計算機應用基礎課程教學模式應有所轉變。利用校園網平臺開展數字化教學就是一種較為適宜的教學模式。除利用校園網平臺外，教師還可以采取以下教學模式：首先，教師通過在學生學習的每臺計算機安裝控制軟件，以教師計算機為主機，在理論講解的過程中鎖定學生計算機，教師示范時，學生的電腦顯示內容與教師動作同步。其次，教師通過計算機程序布置限時課堂作業，有效檢驗學生學習效果。在這種教學模式開展過程中，教學設備是數字化教學資源發揮教學價值的物質條件，先進的教學設備能夠保證教師在教學中更加流暢地使用數字化教學資源，減少不必要的教學失誤情況出現，因此應及時更新相應的教學設備。

（五）改進考核評價機制。大部分高職院校的計算機應用基礎課程考核評價機制以試卷理論成績為主，對于實踐應用能力考核缺乏足夠的重視。教師在新的教學環境下應改變計算機應用基礎課程理論為主的評分機制，以實踐應用成績為主，建立完善的考核評價機制。以數字化評分系統的應用為例，教師在“學習通”或者校園網網絡課程計算機應用基礎課程考查試卷，題目類型參考計算機二級考試，有選擇題、Word操作題、Excel操作題以及PowerPoint操作題，限時90分鐘，滿分100分，將學生的線上成績按照80%的比例算入期末總成績。

第2篇

關鍵詞：遺傳算法全局尋優自動化組卷

1引言

計算機輔助考試系統的自動組卷的效率與質量完全取決于抽題算法的設計。如何設計一個算法從題庫中既快又好的抽出一組最佳解或是抽出一組非常接近最佳解的實體，涉及到一個全局尋優和收斂速度快慢的的問題，很多學者對其進行了研究。遺傳算法以其自適應尋優及良好的智能搜索技術，受到了廣泛的運用。PottsJC等人基于變異和人工選擇的遺傳算法對最優群體規模進行了論述；HamiltonMA等結合遺傳算法把其運用到神經網絡中，并取得了良好的效果[4]；也有眾多的學者對保留最佳狀態的遺傳算法的收斂速度做了討論。通過理論推導和事實運用，發現遺傳算法在尋優和收斂性方面都是非常有效的。

本文結合遺傳算法的原理和思想，對考試自動出題組卷的問題進行了研究，找到了一種獲得與考試試題控制指標符合的試題模型的解決方法。

2問題描述

自動組卷是考試系統自動化或半自動化操作的核心目標之一,而如何保證生成的試卷能最大程度的滿足用戶的不同需要,并具有隨機性、科學性、合理性,這是實現中的一個難點。尤其在交互式環境下用戶對于組卷速度要求較高，而一個理論上較完美的算法可能會以犧牲時間作為代價，往往不能達到預期的效果。因此，選擇一個高效、科學、合理的算法是自動組卷的關鍵。

以往的具有自動組卷功能的考試系統大多采用隨機選取法和回溯試探法。隨機選取法根據狀態空間的控制指標，由計算機隨機的抽取一道試題放入試題庫，此過程不斷重復，直到組卷完畢，或已無法從題庫中抽取滿足控制指標的試題為止。該方法結構簡單，對于單道題的抽取運行速度較快，但是對于整個組卷過程來說組卷成功率低，即使組卷成功，花費時間也令人難以忍受。尤其是當題庫中各狀態類型平均出題量較低時，組卷往往以失敗而告終。

回溯試探法這是將隨機選取法產生的每一狀態類型紀錄下來，當搜索失敗時釋放上次紀錄的狀態類型，然后再依據一定的規律（正是這種規律破壞了選取試題的隨機性）變換一種新的狀態類型進行試探，通過不斷的回溯試探直到試卷生成完畢或退回出發點為止，這種有條件的深度優先算法，對于狀態類型和出題量都較少的題庫系統而言，組卷成功率較好，但是在實際到一個應用時發現這種算法對內存的占用量很大，程序結構相對比較復雜，而且選取試題缺乏隨機性，組卷時間長，后兩點是用戶無法接受的，因此它也不是一種很好的用來自動組卷的算法。

分析上述兩種算法的優缺點，不難發現，在限制條件狀態空間的控制下，隨機選取法有時能夠抽取出一組令用戶滿意的試題。只不過由于它隨機選取試題的范圍太大，無法確定目前條件下哪些區域能夠抽取合適的試題，反而可能在那些已經證明是無法抽取合適試題的區域內反復選題，進行大量的無效操作進入死循環，最終導致組卷失敗?；厮菰囂椒ńM卷成功率高，但它是以犧牲大量的時間為代價的，對于現今越來越流行的考生網上隨機即時調題的考試過程來說，它已不符合要求。因此,必須結合以上兩種方法尋找一種新的改進算法，這種算法要具有全局尋優和收斂速度快的特點。遺傳算法（GeneticAlgorithms）以其具有自適應全局尋優和智能搜索技術，并且收斂性好的特性能很好的滿足自動考試組卷的要求。

3遺傳算法描述

遺傳算法是一種并行的、能夠有效優化的算法，以Morgan的基因理論及Eldridge與Gould間斷平衡理論為依據，同時融合了Mayr的邊緣物種形成理論和Bertalanffv一般系統理論的一些思想，模擬達爾文的自然界遺傳學：繼承（基因遺傳）、進化（基因突變）優勝劣汰（優的基因大量被遺傳復制，劣的基因較少被遺傳復制）。其實質就是一種把自然界有機體的優勝劣汰的自然選擇、適者生存的進化機制與同一群體中個體與個體間的隨機信息交換機制相結合的搜索算法。運用遺傳算法求解問題首先需將所要求解的問題表示成二進制編碼，然后根據環境進行基本的操作：selection，crossover，mutation……這樣進行不斷的所謂“生存選擇”，最后收斂到一個最適應環境條件的個體上，得到問題的最優解。[6,7]

4遺傳算法應用

一般來說，用戶在自動組卷時會對試卷的質量提出多方面的要求，如總題量、平均難度、題型比例、章節比例、重點章節比例、知識點的交叉與綜合等，自動組卷就應最大程度的滿足用戶的要求。因此，在組卷之前，我們首先為自動組卷過程建立控制指標相應狀態空間D，

D=[]

D的每一行由某一試題的控制指標組成，如題號、題型、章節、難度等，并且這些屬性指標都進行編碼表示成二進制形式，而每一列是題庫中的某一指標的全部取值。在具體出題時，考方可能不會用到所有的指標，所以D包含的個體d_target可以表示為d_request和d_void，d_request表示考方要求的控制指標，d_void表示考方不要求的控制指標。即

d_target：：=<d_request>：<d_void>

<d_request>：：={0，1}m

<d_void>：：={0，1}n

試題庫[STK]中的每一道試題在建庫時都輸入了相應的屬性指標。試題模型的產生形式是：

if<data>then

<model>

<data>：：={0，1，#}m

#表示0和1之間的任意一位。

考試自動出題的遺傳算法如下：

(1)根據考方的出題要求，規劃狀態空間庫D中的數據，保留d_request部分，而不要d_void部分，對其剩余部分進行編碼D[1]，D[2]，……D[i]。

(2)初始化試題庫[STK]。隨機從題庫中抽出一組試題，并進行編號STK[1],STK[2]……STK[j],確定合適的交換概率Pc和變異概率Pm；并定義其適應值flexibility[k](k=1,2……j)

flexibility[k]<-0(k=1,2……j)

(3)從試題庫[STK]中取出STK[m](0≤m≤j)與狀態空間庫[D]中的指標D[n](0≤n≤i)進行匹配。如果STK[m]與D[n]完全匹配，則

flexibility[k]<-flexibility[k]+1

如果不匹配，則有

flexibility[k]<-flexibility[k]+0

(4)進行淘汰選擇，保留具有高適應度的試題。即把flexibility[k]為0的STK[m]去掉，這樣就生成了一個新的試題模型STK[h]。

(5)重復過程2生成新的試題模型STK[p]。按一定的交換概率Pc從[STK]中隨機選取模型STK[h]和STK[p]，交換彼此位串中對應的值，產生新的試題模型STK[h]、STK[p]，如

交換前STK[h]=1101011

STK[p]=0011110

交換前STK[h]=1111011

STK[p]=1111110

(6)按一定的變異概率從題庫[STK]中隨機選出一試題模型STK[h]進行基因突變，產生一個新的試題模型。

(7)在完成以上選擇、交叉、變異步驟后，產生一個考試試題模型，按照事先確定的誤差精度對其進行收斂性的判別，當其適應度高時，試題組卷成功，轉向步驟8，如果其適應度低，則轉向步驟3繼續執行。

(8)輸出相應的考試試題，組卷結束。

以上用遺傳算法抽題時，交換概率Pc和變異概率Pm的確定很重要。Pc

太小使選題工作進展緩慢，太大則會破壞適應值高的試題模型。通常規定其為0.4。同樣，Pm太小就不能產生新的試題模型，太大又會產生過多的試題模型。它宜規定為0.1。

在自動選題時，選題的方式可采用父輩挑選和生存選擇兩種。父輩挑選就是采用不返回隨機抽樣，它使每個題目都有被選中的可能；生存選擇采用允許父輩和子代進行競爭，并讓其中的優良者進入下一輪競爭環境的二分之一擇優選擇。兩種選擇方式共同作用于選題保證了選題的順利完成。在選題的過程中，哪一道題目被選中是一個非均勻隨機事件，其概率依賴于上一次選題的過程。

5結束語

本文利用遺傳算法的全局尋優和收斂速度快的特點，結合隨機選取法和回溯試探法的優點，設計了一種用于自動組卷的好的算法，使自動組卷的成功率和速度都得到了明顯的提高。要使自動出題的誤差精度和收斂速度進一步得到改進，還需要做出更深的研究。

參考文獻

[1]J．H．Holland，Adaptationinnaturalandartificialsystems[M]，Annarbor:UniversityofMichigenpress,1975.

[2]HamiltonMA.JavaandtheShifttoNet-centricComputing.IEEEComputer,29(8),1996.

[3]袁富宇等，多目標相關分類的算法，浙江大學學報，33(3),1999

第3篇

方法:

var

MySysPath:PCHAR;

begin

GetMem(MySysPath,255);

GetSystemDirectory(MySysPath,255);

end;

注:MySysPath為SYSTEM路徑

得到程序的路徑

ExtractFileDir(Application.Exename);

察看文件是否存在

FileExists(FileName:String):Boolean;

改變文件擴展名

ChangeFileExt(FileName:String)

得到文件的擴展名

ExtractFileExt(FileName:String):String;

如何取得Windows的臨時文件目錄?

適合版本:Delphi3,2.0,1.0

Windows95&NT都指定了放置臨時文件的目錄，然而，用戶能改變臨時目錄的位置而不使用缺省的目錄。這篇文章的目的是告訴你如何得到Windows95&NT當前的臨時目錄位置。這個WindowsAPI函數GetTempPath就是解決這個問題的。其函數原形為:

DWORDGetTempPath(DWORDnBufferLength,LPTSTRlpBuffer);

下面的例子示范如何使用：

functionGetTempDirectory:String;

var

TempDir:array[0..255]ofChar;

begin

GetTempPath(255,@TempDir);

Result:=StrPas(TempDir);

end;

備注：臨時目錄的確定原則：

1,如果有TMP環境變量則臨時目錄為TMP指定的目錄

2,如果沒有TMP環境變量而有TEMP環境變量，則為TEMP變量指定的目錄

3,如果TMP和TEMP都沒有定義，則取當前目錄為臨時目錄

程序不出現在任務欄

一般Windows95運行程序時都會在任務欄上出現按鈕，如果你的程序是一個監視程序，那么出現按鈕就不是明智之舉了。要實現該功能就要在OnCreate事件里利用到API函數SetWindowLong

procedureTForm1.FormCreate(sender:TObject);

begin

SetWindowLong(Application,Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);

end;

改計算機名

改變計算機在網絡中的名字，重新啟動后才生效

SetComputerName(''''HelloWorld'''');

控制熱啟動

要使系統的熱啟動鍵（Ctrl+Alt+Del）失效，使用以下語句

SystemParametersInfo(SPI_SCREENSAVERRUNNING,1,0,0);

要恢復系統的熱啟動鍵（Ctrl+Alt+Del），使用以下語句

SystemParametersInfo(SPI_SCREENSAVERRUNNING,0,0,0);

臨時路徑

有時需要Windows的臨時路徑來做備份等工作，那么就要知道路徑在哪，下面的程序幫你忙：

varaa:pchar;

begin

GetTempPath(20,aa);file://返回路徑名

edit1.text:=aa;

end;

返回程序執行參數

有關Delphi傳入應用程式的命令列參數,請參考以下的說明：

用ParamCount函數取得命令參數的個數:

呼叫ParamStr(0),傳回執行檔的檔名(含路徑)

呼叫ParamStr(n),傳回第n個參數的內容

procedureTForm1.FormCreate(Sender:TObject);

var

sFileName:string;

begin

ifParamCount>0thenbegin(*有執行參數傳入*)

sFileName:=ParamStr(1);(*取得參數內容*)

ifFileExists(sFileName)then

Memo1.Lines.LoadFromFile(sFileName)

else

Application.MessageBox(''''找不到指定的檔案'''',''''訊息'''',48);

end;

end;

關閉Windows

控制WINDOWS的開關：如關閉WINDOWS，重新啟動WINDOWS等,ExitWindowsEx(UINTuFlags,DWORDdwReserved);是實現這一功能的API函數

首先定義常數

const

EWX_FORCE=4;file://關閉所有程序并以其他用戶身份登錄

EWX_LOGOFF=0;file://重新啟動計算機并切換到MS-DOS方式

EWX_REBOOT=2;file://重新啟動計算機

EWX_SHUTDOWN=1;//關閉計算機

運行時給How賦值，讓他等于EWX_SHUTDOWN或其他，調用以下語句

ExitWindowsEx(How,0);

關閉外部應用程序

如何在Delphi應用程序中,去關閉外部已開啟的應用程序？

下面給出一段在Delphi中關閉"計算器"程序為例：

var

HWndCalculator:HWnd;

begin

//findtheexistcalculatorwindow

HWndCalculator:=Winprocs.FindWindow(nil,''''計算器'''');//closetheexistCalculator

ifHWndCalculator<>0then

SendMessage(HWndCalculator,WM_CLOSE,0,0);

end;

得到執行程序的目錄

SysUtils單元中有ExtractFileDir與ExtractFilePath兩個類似的函數,用哪一個?沒有太大的關系。

不過有以下的差別:ExtractFilePath傳回值的最後一個字元是反斜杠"／"。

procedureTForm1.Button1Click(Sender:TObject);

begin

ShowMessage(ExtractFileDir(Application.Exename));

//ie:c:\temp

ShowMessage(ExtractFilePath(Application.Exename));

//ie:c:\temp\

end;

相同點：如果執行文件在根目錄下(如：C:\SAMPLE.EXE)的話,兩者的傳回值相同，且最后一個字符都是"／"。

使用GetFileVersionInfo得到版本信息的例子

SamplesUsingGetFileVersionInfo?

回答1:

procedureGetBuildInfo(varV1,V2,V3,V4:Word);

var

VerInfoSize:DWORD;

VerInfo:Pointer;

VerValueSize:DWORD;

VerValue:PVSFixedFileInfo;

Dummy:DWORD;

begin

VerInfoSize:=GetFileVersionInfoSize(PChar(ParamStr(0)),Dummy);

GetMem(VerInfo,VerInfoSize);

GetFileVersionInfo(PChar(ParamStr(0)),0,VerInfoSize,VerInfo);

VerQueryValue(VerInfo,''''\'''',Pointer(VerValue),VerValueSize);

withVerValue^do

begin

V1:=dwFileVersionMSshr16;

V2:=dwFileVersionMSand$FFFF;

V3:=dwFileVersionLSshr16;

V4:=dwFileVersionLSand$FFFF;

end;