// a:=stringtoguid('');
// ichart 和 chart介面各自具有不同的guid根本不相容
// a:=stringtoguid('');}
// stringtoguid 用於將 字串guid轉換為 tguid
// guidtostring 用於將tguid轉換為字串guid
//varsupports 判斷 variant 變數 是否支援 tguid這個介面
procedure tform1.btngenerateclick(sender: tobject);
varguid: tguid;
begin
cocreateguid(guid);
memo1.lines.add(guidtostring(guid));
end;
supports 函式 判斷是否支援特定介面;
cocreateguid 這個procedure 可以生成guid號。
guidtostring 將tguid轉換成字串guid
stringtoguid 將字串guid轉換成 tguid 型別
tguid 宣告
tguid = packed record
d1: longword;
d2: word;
d3: word;
d4: array[0..7] of byte;
end;
guid 例子:
當 inte***ce 變數 賦值為nil時自動釋放。
可以將實現某介面的變數作為引數直接賦值給需要這個介面作為引數的過程或函式。
介面陣列的宣告:
femparray: array[1 .. max_employees] of iunknown;
介面真的是好亂啊:
匯入每個***元件的***x_tlb.pas每個物件都有自己的模式?並不相同?怎麼回事?不明白!
Delphi的學習筆記十四 介面
1.介面命名約定i起頭,類是t起頭的。delphi view plain copy imyinte ce1 inte ce function func1 integer function func2 integer end 2.介面都是從iinte cej繼承的,若是從根介面繼承,則可省略 delp...
Delphi介面幽默解釋
介面分廣義和狹義之分,很多國內翻譯的書對此誤人非淺。在delphi中,廣義介面除了你要問的介面還包括抽象類 在單元文件前宣告的inte ce等,狹義介面指的是在程式設計中用inte ce定義的。簡單地說狹義介面 以後稱介面 就是定義了方法和屬性的空架子 術語為方法簽名,包括函式和過程 屬性本身也是存...
Delphi介面幽默解釋
介面分廣義和狹義之分,很多國內翻譯的書對此誤人非淺。在delphi中,廣義介面除了你要問的介面還包括抽象類 在單元文件前宣告的inte ce等,狹義介面指的是在程式設計中用inte ce定義的。簡單地說狹義介面 以後稱介面 就是定義了方法和屬性的空架子 術語為方法簽名,包括函式和過程 屬性本身也是存...
delphi 主窗體介面設計
1.選單設計 最上 2.工具條部分 1 加一個win32 coolbar 2 在coolbar 其上加一個win32 在 上 new button new spearator.size 8 3 設定 showcaption true 顯示文字 設定 flat true 設定images new im...
Delphi的介面委託示例
unit testunit inte ce uses windows,messages,sysutils,variants,classes,graphics,controls,forms,dialogs,stdctrls const testmsgguid tguid type 原始介面中新增需要暴...