delphi指針簡(jiǎn)單入門(mén).txt懂得放手的人找到輕松，懂得遺忘的人找到自由，懂得關(guān)懷的人找到幸福！女人的聰明在于能欣賞男人的聰明。生活是燈，工作是油，若要燈亮，就要加油！相愛(ài)時(shí)，飛到天邊都覺(jué)得踏實(shí)，因?yàn)橛心愕臓繏?；分手后，坐在家里都覺(jué)得失重，因?yàn)闆](méi)有了方向。delphi指針簡(jiǎn)單入門(mén)：看一個(gè)指針用法的例子:1var2X,Y：Integer;//XandY整數(shù)類型3P："Integer;//P指向整數(shù)類型的指針4begin5X：=17;//給X賦值6P:=@X;//把x的地址賦給p7Y：=P";//取出p所指向的數(shù)值賦給y8end;第二行定義了兩個(gè)變量X,y. 第三行聲明了p是指向整數(shù)類型的指針;意味著p能夠指向x或者y的地址.第五行賦給x值，第六行把x的地址賦給p.最后通過(guò)p指向的變量賦值給y.此時(shí),x和y有相同的值.操作符@用來(lái)取出變量的地址，也可以取出過(guò)程和函數(shù)的地址.而符號(hào)”有兩個(gè)目標(biāo)，當(dāng)它出現(xiàn)在類型定義的前面時(shí)如"typename表示指向這種類型的指針；當(dāng)它出現(xiàn)在指針變量后邊時(shí) 如point”返回指針指向的變量的值；理解指針比較容易理解面向?qū)ο蟮膒ascal語(yǔ)言，因?yàn)橹羔樈?jīng)常在幕后操作.任何要求動(dòng)態(tài)分配大的內(nèi)存空間的類型可以用指針類型.例如,long-string變量，實(shí)際在使用指針進(jìn)行操作.另外一些高級(jí)的編程技術(shù)需要使用指針類型.有時(shí)指針是適應(yīng)object pascal嚴(yán)格的類型限制的唯一方法.同過(guò)一個(gè)通用的指針類型,通過(guò)類型轉(zhuǎn)換成不同的指針類型，如下面的例子：typePInteger="Integer;varR:Single;I：Integer;P：Pointer;//通用的指針PI：PInteger;@R;//取出@R;//取出R的內(nèi)存地址PInteger(P);〃把通用類型轉(zhuǎn)換成指向整數(shù)類型的指針PIend;當(dāng)然了，實(shí)數(shù)和整數(shù)的存儲(chǔ)格式不同.這種賦值是把原始的二進(jìn)制數(shù)據(jù)從R拷貝到I,而不進(jìn)行轉(zhuǎn)換.保留字nil是一個(gè)特殊的常量可以賦給任何指針類型，當(dāng)nil賦鄉(xiāng)合一個(gè)指針時(shí)，指針什么也不指向，是一個(gè)空指針.@操作符返回變量的內(nèi)存中的存儲(chǔ)地址，或者是過(guò)程'函數(shù)'方法；如果變量,@X返回的是x的地址。如果編譯選項(xiàng)｛$T-｝沒(méi)有打開(kāi)，著返回的事一個(gè)通用的指針，如果編譯選項(xiàng)打開(kāi)了，著返回的是x的類型對(duì)應(yīng)的指針.如果是例程(過(guò)程'函數(shù))，@F返回的是F的入口點(diǎn)，@F的類型是一個(gè)指針。當(dāng)@用在類的方法中時(shí)，則方法的名稱必須有類名，例如@TMyclass.Dosomething指針指向TMyclass的dosomething方法。當(dāng)一個(gè)過(guò)程變量在賦值語(yǔ)句的左邊時(shí)，編譯器期望一個(gè)過(guò)程值在賦值語(yǔ)句的右邊。這種賦值使得左邊的變量可以指向右邊定義的過(guò)程或者函數(shù)入口點(diǎn)。換句話說(shuō)，可以通過(guò)該變量來(lái)引用聲明的過(guò)程或者函數(shù)，可以直接使用參數(shù)的引用。varF: function(X:Integer):Integer;I:Integer;functionSomeFunction(X:Integer):Integer;...F:=SomeFunction;//給f賦值I:=F⑷； //調(diào)用所指向的函數(shù)在賦值語(yǔ)句中，左邊變量的類型決定了右邊的過(guò)程或者方法指針解釋。varF,G:function:Integer;I:Integer;functionSomeFunction:Integer;F:=SomeFunction;//給f賦值G := F; // 把F的值拷貝給GI ：= G; // 調(diào)用函數(shù)第一句獲得函數(shù)的入口，第二句將指針復(fù)制，第三句獲得函數(shù)的返回值。有時(shí)候還可以這樣使用ifF=MyFunctionthen...;在這里，F(xiàn)的出現(xiàn)導(dǎo)致一個(gè)函數(shù)調(diào)用；編譯器調(diào)用F指向的函數(shù)，然后調(diào)用Myfunction，比較結(jié)果。這個(gè)規(guī)則是無(wú)論何時(shí)一個(gè)過(guò)程變量(proceduralvariable)出現(xiàn)在一個(gè)表達(dá)式中，它表示調(diào)用所指向的函數(shù)或者過(guò)程。有時(shí)F指向一個(gè)過(guò)程(沒(méi)有返回值)，或者f指向一個(gè)需要參數(shù)的函數(shù)，則前面的語(yǔ)句會(huì)產(chǎn)生一個(gè)編譯錯(cuò)誤。要比較F和Myfunction需要用if@F=@MyFunctionthen...;@F把F轉(zhuǎn)換成一個(gè)包含地址的無(wú)類型的指針變量,@myfunction返回myfunction的地址。獲得一個(gè)過(guò)程變量的內(nèi)存地址使用@@。例如，@@F返回F的地址。@操作符通常把一個(gè)無(wú)類型的指針值賦給一個(gè)過(guò)程變量，例如：varStrComp:function(Str1,Str2:PChar):Integer;???@StrComp:=GetProcAddress(KernelHandle,'Istrcmpi');調(diào)用GetProcAddres函數(shù)，用strcomp指向這個(gè)值任何過(guò)程變量可以賦成ni