斷斷續續學習delphi，對類的定義和物件的操作始終處於朦朦朧朧的一種狀態，今天搜尋看到用類寫的對物件的方法操作，我就編寫控制台程式，使用沒有通過，後來想起物件就是指標，用@傳遞，編譯通過，這樣基本算是了解了類的定義。
program project1;
uses
cthreads,
classes ,windows,dialogs,sysutils
;type
tbb=procedure of object ;//定義過程
type
ta=class //class a
private
s:string;
gh:tbb;
public
q:string;
procedure myadd;
procedure mj;
procedure wl;
property onchlick:tbb read gh write gh ;
end;
procedure ta.mj;
begin
writeln('this is ta.mj');
end;
procedure ta.myadd;
begin
onchlick:=@mj;
writeln('this procedure ta.myadd');
end;
procedure ta.wl;
begin
writeln('this is wl');
end;
function k(u:ta):string;
varl:string;
begin
u.q:='alok';
l:=u.q;
result:=(u.q);
end;
varp:ta;
d:string;
kl:tbb;
begin
p:=ta.create;
p.myadd;
p.onchlick;
p.free;
readln;
end.
對math物件的操作
前面講了對string物件的操作，現在講一下對math物件的操作 1 abs 方法 用來求絕對值 var number 101 console.log math.abs number 返回1012 min 和max 方法 求最大最小 var min math.min 2,12,30 返回23 捨入方...
對String物件的操作
寫乙個方法，實現字串的反轉，如 輸入abc，輸出cba test public void testrerverse 總結 string物件沒有反轉的方法，但是stringbuilder和stringbuffer有這個方法 寫乙個方法，實現字串的替換，如 輸入bbbwlirbbb，輸出bbbhhtcc...
PHP對類的操作
一直都想寫乙個類似與檢測使用的system。現在估計有機會了。可以好好計畫下。今天看了下php類這塊的東西。寫了段 貼一下，以後很好理解！header cache control no cache,must revalidate flush class web select class web po...