在override時,如果override的是procedure,則加上關鍵字inherited; 就會執行父類同名procedure的所有過程,然後再執行子類中特有的過程。如果override的是function則不會執行父類中同名function的內容。但是,可以通過下面的方法來執行父類的內容:
例如:tbasecls = class
public
function add(i1,i2:integer):integer;vitual;
end;
tchildcls = class(tbasecls)
public
function add(i1,i2:integer):integer;overridd;
end;
tchildcls.add(i1,i2:integer):integer;
vari:integer;
begin
i:=inherited add(i1,i2);
//這兒進行你的處理。
end;
Delphi中使用多執行緒
這些天在indy的阻塞式socket模型的強迫下,開始在delphi中使用多執行緒。總結了一些經驗,儘管非常膚淺 1 對於vcl的控制項 大部分vcl的控制項的方法和屬性是不能保證執行緒安全的。我粗淺的理解執行緒安全為如果這個函式同時被兩個執行緒呼叫時,由於內部的指令不能保證按順序 即中間插入其他執...
在Delphi中使用事務
1 直接在delphi中使用事務 procedure tform1.button1click sender tobject begin adoconnection1.begintrans tryaq2.close aq2.sql.clear aq2.sql.add update bank set c...
delphi中使用資源檔案
資源檔案的原始檔是普通的文字檔案,副檔名是 rc。比如說test.rc.編寫乙個副檔名 rc的檔案,格式為資源名稱 資源型別 檔名稱,例如 2.編譯rc檔案為res資源檔案 注意 要把資源檔案test.rc和sqlite3.dll sea.bmp sea.ico放在同乙個資料夾中 利用delphi自...