其他

Code highlighting produced by Actipro CodeHighlighter

{-------------------------------------------------------------------------------過程名:    MakeFileList 遍曆檔案夾及子檔案夾參數:      Path,FileExt:string   1.需要遍曆的目錄 2.要遍曆的副檔名傳回值:    TStringListUSE StrUtils   Eg：ListBox1.Items:= MakeFileList( 'E:\極品飛車','.exe') ; 

Code highlighting produced by Actipro CodeHighlighter

Code highlighting produced by Actipro CodeHighlighter

Code highlighting produced by Actipro CodeHighlighter

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs;type  TForm1 = class(TForm)    procedure FormCreate(Sender: TObject);    procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;  private

{註冊表操作函數,SetClave設定索引值,GetClave獲得索引值 Funciones de registro}function SetClave(key:Hkey; subkey,name,value:string):boolean;varregKey:hkey;beginresult:=FALSE;RegCreateKey(key,PChar(subkey),regKey);if

Context.MODE_PRIVATE：預設操作模式，代表該檔案是私人資料，只能被應用本身訪問，在該模式下，寫入的內容會覆蓋原檔案的內容；Context.MODE_APPEND：該模式會檢查檔案是否存在，存在則追加檔案內容，否則就建立檔案；Context.WORLD_READABLE：表示檔案可以被其它應用讀取；Context.WORLD_WRITEABLE：表示檔案可以被其它應用寫入；如果你希望檔案被其它應用讀和寫，可以這樣傳入：openFileOutput("eboy.txt",

procedure TForm1.btn1Click(Sender: TObject);var    Http:TIdHTTP;begin    Http := TIdHTTP.Create(nil);    Http.ProxyParams.ProxyServer := '91.211.141.249'; //代理IP    Http.ProxyParams.ProxyPort := 8080;    Http.ProxyParams.ProxyUsername := '';    Http.

 Code highlighting produced by Actipro CodeHighlighter

返回 String 對象內第一次出現子字串的字元位置。 strObj.indexOf(subString[, startIndex])參數strObj必選項。String 對象或文字。subString必選項。要在 String 對象中尋找的子字串。starIndex可選項。該整數值指出在 String 對象內開始尋找的索引。如果省略，則從字串的開始處尋找。說明indexOf 方法返回一個整數值，指出 String 對象內子字串的開始位置。如果沒有找到子字串，則返回 -1。 如果

aspx中：<table>                <tr>                    <td style="width: 178px" colspan="4">                    <asp:Label id="Label1" runat="server" Text="輸入要截取的字串" CssClass="input_border1"></asp:Label>                   

Visual Assist X具有強大的編輯特色，提高了生產效率，可以完全整合到您的Microsoft開發環境中，升級了您的IDE，在不改變編程習慣的同時就可以感受到Visual Assist X為您帶來的好處。Visual Assist X是一款非常好的Microsoft Visual Studio 2005和Visual Studio .NET外掛程式，支援C/C＋＋，C＃，ASP，Visual

unit untWorkThread;interfaceuses  Windows,Classes,SysUtils;type  TWorkItem=class  end;  TProcessWork=procedure (Sender:TObject;Work:TWorkItem) of Object;  TWorkThread=class(TThread)  private    FCriticalSection:TRTLCriticalSection;    hEvent:Cardinal

1.建立一個SingleInstance類:using System;using System.Collections.Generic;using System.Text;using System.Runtime.InteropServices;using System.Diagnostics;namespace NetChange{    class SingleInstance    {        [DllImport("User32.dll")]        private

GC DevKit 是一款基於HTML5的開源2D遊戲引擎，由Game Closure貢獻，直接入正題*本人系統為ubuntu*## 準備工作安裝最新的 `nodejs` $ sudo add-apt-repository ppa:chris-lea/node.js $ sudo apt-get update $ sudo apt-get install nodejs ## 安裝只要獲得devkit就行，這裡均已ubuntu為例 $ git clone

接上節 http://www.cnblogs.com/hangxin1940/archive/2013/04/11/3011555.html## 建立螢幕視圖當匯入螢幕視圖類後，我們會在`initUI`函數中對它進行執行個體化，這時，遊戲引擎就準備就緒了。 var titlescreen = new TitleScreen(), gamescreen = new GameScreen();之後的內容會詳細介紹螢幕視圖的構造的。當遊戲引擎將情境建立好後，它會被儲存在 `GC.

接上節 http://www.cnblogs.com/hangxin1940/archive/2013/04/11/3015553.html## 啟動流程在建構函式`init`中，我們通過監聽`'app:start'`事件來處理上層的通知，然後調用 `start_game_flow` 方法來播放動畫序列，最後調用`play_game`來開始遊戲。 function start_game_flow () { var that = this;

接上節 http://www.cnblogs.com/hangxin1940/archive/2013/04/09/3011424.htmlWhack That Mole!(打鼴鼠)遊戲是一個使用Devkit引擎內建的一款遊戲，通過學習該遊戲的原始碼，我們會明白這些Devkit組建是如何組織在一起的。## 遊戲安裝首先啟動服務 $ basil serve他會在`9200`連接埠啟動，在瀏覽器開啟

">window.showModalDialog彈出對話方塊重新整理問題的總結Posted on 2011-06-02 15:48 楊銳-->天柱山 閱讀(31) 評論(0) 編輯