delphi è¯è¨éï¼å£°æä¸ä¸ªç±»ï¼éå¸¸ä½¿ç¨ type.... class ææ¯ object å
³é®åï¼ä¸è¬å®ä¹å½¢å¼å¦ä¸ï¼
type ç±»å = class(ç±»å)
{æ°æ®æå声æ}
{è¿ç¨åå½æ°å£°æ}
{å±æ§ç声æ}
end;
示ä¾å¦ä¸ï¼
type
TEncrypt = class
private
value: integer;
public
constructor Create;
destructor Destroy; override;
end;