AND: 邏輯與;該指令會置 CF=OF=0; 其結果影響 SF、ZF、PF;指令格式:AND r/m, r/m/i; Test22_1.asm - 使用 AND 運算將一個數的第二、四位清零.386.model flat, stdcallinclude windows.incinclude kernel32.incinclude masm32.incinclude debug.incincludelib kernel32.libincludelib
WebBrowser1.GoHome; //到瀏覽器預設首頁WebBrowser1.Refresh; //重新整理WebBrowser1.GoBack; //後退WebBrowser1.GoForward; //前進WebBrowser1.Navigate('...'); //開啟指定頁面WebBrowser1.Navigate('about:blank'); //開啟空頁面//開啟空頁面, 並寫入...WebBrowser1.Navigate('about:<head>
問題來源: http://www.cnblogs.com/del/archive/2009/05/28/1491186.html#1801853準備工作:1、在空白表單上添加: ClientDataSet1、Button12、啟用表單的 OnCreate 事件、啟用 Button1 的 OnClick 事件實現代碼:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics,
BT、BTS、BTR、BTC: 位測試指令;BT(Bit Test): 位測試;BTS(Bit Test and Set): 位測試共置位;BTR(Bit Test and Reset): 位測試並複位;BTC(Bit Test and Complement): 位測試並取反;它們的結果影響 CF;它們的指令格式相同:BT r16/r32/m16/m32, r16/r32/m16/m32BT r16/r32/m16/m32, i8;
問題來源: http://www.cnblogs.com/del/archive/2009/03/13/1410935.html#1803351TWebBrowser 調用的是 IE, 放縮頁面是在 IE7 之後才支援的.準備工作:1、添加 WebBrowser1、Button12、啟用表單的 OnCreate 事件、啟用 Button1 的 OnClick 事件.代碼如下:unit Unit1;interfaceuses Windows, Messages, SysUtils,
用idTCPServer，用戶端接上來時，如何取得用戶端的IP？ IP:=AThread.Connection.Binding.PeerIP;Port:=AThread.Connection.Binding.PeerPort;
SHL、SHR、SAL、SAR: 移位指令;SHL(Shift Left): 邏輯左移;SHR(Shift Right): 邏輯右移;SAL(Shift Arithmetic Left): 算術左移;SAR(Shift Arithmetic Right): 算術右移;其中的 SHL 和 SAL 相同, 但 SHR 和 SAR 不同.;SHL、SAL: 每位左移, 低位補 0, 高位進 CF;SHR : 每位右移, 低位進 CF, 高位補
跳轉指令分三類:一、無條件跳轉: JMP;二、根據 CX、ECX 寄存器的值跳轉: JCXZ(CX 為 0 則跳轉)、JECXZ(ECX 為 0 則跳轉);三、根據 EFLAGS 寄存器的標誌位跳轉, 這個太多了.根據標誌位跳轉的指令:JE ;等於則跳轉JNE ;不等於則跳轉JZ ;為 0 則跳轉JNZ ;不為 0 則跳轉JS ;為負則跳轉JNS ;不為負則跳轉JC ;進位則跳轉JNC ;不進位則跳轉JO ;溢出則跳轉JNO ;不溢出則跳轉JA
防止程式重複執行的單元 //工程引用此單元就能防止同時出現多個執行個體unit MultInst;interfaceuses Windows ,Messages, SysUtils, Classes, Forms;implementationconst STR_UNIQUE = '{2BE6D96E-827F-4BF9-B33E-8740412CDE96}'; MI_ACTIVEAPP = 1; {啟用應用程式} MI_GETHANDLE = 2; {取得控制代碼}var
CBW、CWDE、CDQ、CWD: 擴充指令;CBW(Convert Byte to Word): 將 AL 擴充為 AX;CWDE(Convert Word to Extended Double): 將 AX 擴充為 EAX;CDQ(Convert Doubleword to Quadword): 將 EAX 擴充為 64 位元數 EDX:EAX;CWD(Convert Word to Doubleword): 將 AX 擴充為
這裡的 "串" 並不單指字串, 包括所有連續的資料(如數組); 串指令只用於記憶體操作.移動串指令: MOVSB、MOVSW、MOVSD ;從 ESI -> EDI; 執行後, ESI 與 EDI 的地址移動相應的單位比較串指令: CMPSB、CMPSW、CMPSD ;比較 ESI、EDI; 執行後, ESI 與 EDI 的地址移動相應的單位掃描串指令: SCASB、SCASW、SCASD ;依據 AL/AX/EAX 中的資料掃描 EDI 指向的資料, 執行後 EDI 自動變化儲存串指令:
在 masm32.inc 中有這樣幾個函數的聲明:byt2bin_ex PROTO :BYTE, :DWORDwrd2bin_ex PROTO :WORD, :DWORDdw2bin_ex PROTO :DWORD, :DWORDdw2hex_ex PROTO :DWORD, :DWORDbin2byte_ex PROTO :DWORDbyt2bin_ex: 從 Byte 數到二進位字串; Test19_1.asm.386.model flat, stdcallinclude
;INC(Increment): 加一;DEC(Decrement): 減一;NEG(Negate): 求補(求反);ADD(Add): 加;ADC(Add Carry): 帶進位加;SUB(Subtract): 減;SBB(Subtract With Borrow): 帶進位減;CMP(Compare): 比較;INC、DEC、NEG 的指令格式:;INC r/m;ADD、ADC、SUB、SBB、CMP 的指令格式:;ADD r/m, r/m/i;它們的結果影響 OF、
因不方便訪問, 已停止使用!這是在 DropBox 上第二次申請的空間, 第一次的空間應開放的透明度太高被無聊之人奪去不再提.資料已傳滿 10G ...這些資料您可以下載, 也可以在電腦上建立一個檔案夾和我同步.不管是下載還是同步, 都先要到 https://www.dropbox.com/ 上註冊一下.註冊非常簡單: 使用者名稱、信箱、密碼.如果要同步使用或自動下載資料, 您必須使用這個地址: https://www.dropbox.com/referrals/NTYyMzc0NzQ5
MUL: 無符號乘;影響 OF、CF 標誌位;指令格式:;MUL r/m ;參數是乘數;如果參數是 r8/m8, 將把 AL 做乘數, 結果放在 AX;如果參數是 r16/m16, 將把 AX 做乘數, 結果放在 EAX;如果參數是 r32/m32, 將把 EAX 做乘數, 結果放在 EDX:EAX; Test27_1.asm.386.model flat, stdcallinclude windows.incinclude kernel32.incinclude
問題來源: http://www.cnblogs.com/del/archive/2007/12/13/993840.html#1804933代碼:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, OleCtrls, SHDocVw, ComCtrls;type TForm1 =
所謂雙緩衝就是先畫到記憶體畫布(如: TBitmap), 然後再轉帖到目的地.譬如下面小程式:procedure TForm1.FormCreate(Sender: TObject);begin Timer1.Interval := 100; Color := clWhite;end;procedure TForm1.Timer1Timer(Sender: TObject);begin Canvas.Pen.Color := Random($FFFFFF); Canvas.MoveTo(
架構師的要害就是：架構師的領導力。這是一個與技術完全不同的方向，是一個人文的方向。我認識的一位資深HR經理和我的老經理都曾經告訴過我：從技術的思維轉換到與人打交道的思維是非常難的；一旦一名技術員（程式員/測試員）同時也掌握了與人打交道的本領，那簡直就是無敵的了。有誰還認為架構師只僅僅是一個技術高手？那你永遠也成不了架構師！為什嗎？你可以把自己的架構寫得天衣無縫——我相信，每個架構師都有這個本事——但接下來呢？你至少有兩件事去做：你需要讓開發人員理解它、接受它、認同它，甚至，讓他們來一些讚美
uses TypInfo; {擷取類的資訊, 需要這個單元}//擷取對象的 RTTI 屬性與事件的函數function GetPropertyAndEventList(obj: TObject; pList,eList: TStringList): Boolean;var ClassTypeInfo: PTypeInfo; {類的資訊結構指標} ClassDataInfo: PTypeData; {類的資料結構指標} propertyList : PPropList;
問題來源: http://www.cnblogs.com/del/archive/2008/08/15/1268301.html#1806783unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormCreate(Sender: TObject)
Start building with 50+ products and up to 12 months usage for Elastic Compute Service
1 on 1 presale consultation
24/7 Technical Support 6 Free Tickets per Quarter Faster Response
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.
A comprehensive suite of global cloud computing services to power your business
Payment Methods We Support
