Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Delphi Éè¼ÆÄ£Ê½£º¡¶HeadFirstÉè¼ÆÄ£Ê½¡·Delphi7´úÂë

1. ²úÆ·Àà
{¡¶HeadFirstÉè¼ÆÄ£Ê½¡·¹¤³§Ä£Ê½Ö®¼òµ¥¹¤³§ }
{ ²úÆ·Àà }
{ ±àÒ빤¾ß £ºDelphi7.0 }
{ ÁªÏµ·½Ê½ £ºxshlife@163.com }

unit uProducts;

interface

type
TPizza = class(TObject)
public
procedure Prepare; virtual; abstract;
procedure Bake; virtual; abstract;
procedure Cut; virtual; abstract;
procedure Box; virtual; abstract;
end;

TCheesePizza = class(TPizza)
public
procedure Prepare; override;
procedure Bake; override;
procedure Cut; override;
procedure Box; override;
end;

TVeggiePizza = class(TPizza)
public
procedure Prepare; override;
procedure Bake; override;
procedure Cut; override;
procedure Box; override;
end;

TClamPizza = class(TPizza)
public
procedure Prepare; override;
procedure Bake; override;
procedure Cut; override;
procedure Box; override;
end;

TPepperoniPizza = class(TPizza)
public
procedure Prepare; override;
procedure Bake; override;
procedure Cut; override;
procedure Box; override;
end;

implementation

{ TCheesePizza }

procedure TCheesePizza.Bake;
begin
Writeln('ºæ¿¾ÄÌÓͱÈÈø');
end;

procedure TCheesePizza.Box;
begin
Writeln('½«ÄÌÓͱÈÈø×°ºÐ');
end;

procedure TCheesePizza.Cut;
begin
Writeln('½«ÄÌÓͱÈÈøÇÐ³ÉÆ¬');
end;

procedure TCheesePizza.Prepare;
begin
Writeln('×¼±¸ÄÌÓͱÈÈø');
end;

{ TVeggiePizza }

procedure TVeggiePizza.Bake;
begin
Writeln('ºæ¿¾ËرÈÈø');
end;

procedure TVeggiePizza.Box;
begin
Writeln('½«ËرÈÈø×°ºÐ');
end;

procedure TVeggiePizza.Cut;
begin
Writeln('½«ËرÈÈøÇÐ³ÉÆ¬');
end;

procedure TVeggiePizza.Prepare;
begin
Writeln('×¼±¸ËرÈÈø');
end;

{ TClamPizza }

procedure TClamPizza.Bake;
begin
Writeln('ºæ¿¾¸òòñÈÈø');
end;

procedure TClamPiz


Ïà¹ØÎĵµ£º

Delphi ¸ø×Ö·ûÖ¸Õë·ÖÅäÄÚ´æ


ÎÄÕÂÀ´×Ô£ºhttp://www.cnblogs.com/del/archive/2009/05/15/archive/2008/11/08/1329543.html
GetMem
AllocMem
ReallocMem
FreeMem
GetMemory
ReallocMemory
FreeMemory
New
Dispose
NewStr
DisposeStr
StrNew
StrAlloc
StrDispose
GlobalAllocPtr
GlobalFreePtr
WideStrAlloc
AnsiStrAlloc
StrDispos ......

Îò͸delphi µÚ¾ÅÕ ¶à²ãÌåϵ½á¹¹

µÚÒ»Õ  DELPHIµÄÔ­×ÓÊÀ½ç
µÚ¶þÕ  DELPHIÓëWIN32ʱ¿Õ
µÚÈýÕ  ¶àÏß³Ì
µÚËÄÕ  ½Ó¿Ú
µÚÎåÕ  °ü
µÚÁùÕ  ʼþÓëÏûÏ¢
µÚÆßÕ  ×éÖ¯ÄãµÄÄ£¿é
µÚ°ËÕ  ̽Ë÷Êý¾Ý¿â
µÚ¾ÅÕ  ¶à²ãÌåϵ½á¹¹
µÚʮՠ ²Ù×÷½çÃæÓë²Ù×÷Âß¼­
µÚʮһÕ  ÃæÏò¶ÔÏóÊý¾Ý¿â»ù´¡
 ¿Õ ......

delphi Êý¾Ý¿â ÔÓÊÕ¡£

      µ±È»Óû§ÒªÏëͨ¹ýÊý¾Ýä¯ÀÀ²¿¼þ±à¼­ÐÞ¸ÄÊý¾Ý¿â±íÖеļǼ×Ö¶Îʱ£¬»¹ÒªÊܵ½ÆäËüÒòËØµÄÖÆÔ¼¡£³ýÁËÊý¾Ýä¯ÀÀ²¿¼þ±¾ÉíµÄReadOnlyÊôÐÔÉèÖÃΪFalseÍ⣬»¹ÒªÉèÖÃÆäÏàÓ¦µÄ×ֶβ¿¼þºÍÊý¾Ý¼¯²¿¼þµÄCanModifyÊôÐÔTrueÐÔ£»ÉèÖÃTDataSource²¿¼þµÄAutoEditÊôÐÔΪTrue£¬Èç¹ûÊý¾Ý¿â±íÊÇSQLÊý¾Ý¿â·þÎñÆ÷ÖеÄÊý¾ ......

Delphi 2010Õýʽ°æÏÂÔØ(RAD Studio 2010ÏÂÔØ)

Delphi 2010Õýʽ°æÏÂÔØ(RAD Studio 2010ÏÂÔØ)
ÔÚ8ÔÂ26ÈÕÕýʽ·¢²¼ÁËRAD Studio 2010£¬¾ÍÊÇÎÒÃÇËùνµÄDelphi 2010¡£RAD Studio 2010°üº¬Delphi¡¢C++ BuilderºÍDelphi PrismµÈ¡£ RAD Studio 2010 µÄй¦ÄÜÖ÷ÒªÔÚÓÚ£ºÔöÇ¿µÄ IDEºÍ¿ÉÊÓ»¯×é¼þ¿â (VCL) ¿ò¼ÜºÍ»ù´¡µÄ±àÒëÆ÷ÒÔ¼°ÆäËû¸÷Ï¾ß£¬ÕâʹµÃÄã¹¹½¨ÄÇЩ¿çÔ½ËùÓеÄÊý¾ÝÔ´ºÍ ......

DELPHIÉî¶È̽Ë÷ £¨µÚ2°æ£©PDFµç×ÓÊé

 ÍƼö¸ø´ó¼Ò[url=DELPHIÉî¶È̽Ë÷ £¨µÚ2°æ£©PDFµç×ÓÊé][/url]
ÒòΪÐèҪǰ¼¸ÌìÔÚÍøÉÏËÑËѹýÕâ±¾ÊéÊ飬¿ÉûÓУ¬Ô´Âëµ¹ÊÇÓУ¬½ñÌì´ò¿ª¾­³£È¥µÄÍøÕ¾£¬¾ÓÈ»·¢ÏÖÌṩÏÂÔØÁË£¬Õâ¸öÍøÕ¾×Ô¼º²î²»¶àÿÌì¶¼Òª´ò¿ª¿´¿´£¬Õ⼸ÌìæºýÍ¿ÁË£¬¾ÓȻûÓп´µ½£¬ÔÚÕâÍÆ¼ö¸ø´ó¼Ò£¬ÄÜÏÂÔØµÄ£¬ËٶȺܿ졣
[url=http://www.delphifans.com/Soft ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ