±¯¾ç°¡£¬Ôõôѧdelphiѽ
°¥£¬¿´ÁËpascal¾«Òª£¬¶ÔÓï·¨ãÂ㶮¶®£¬È»ºó¿´Á˵ãdelphiµÄ²Ù×÷½çÃ棬×Ô¼ºÑ§ÁË2ÖÜÁË£¬¸Ð¾õģģºýºýµÄ¡£»ù±¾Ã»Ñ§µ½É¶¡£¡£ÊÖÉÏÓиö×öºÃµÄÏîÄ¿£¬Ò²¿´²»¶®¡£¡£Ôõô¼ÌÐøѧÏÂÈ¥ÄØ¡£¡£»¹ÓÐÐÂÊÖ±àдpascal³ÌÐòÓÐɶºÃµÄÈí¼þÄØ
ÓïÑÔÊÇ×öÈí¼þµÄ ÄѵÀ»¹ÒªÈí¼þ
¹Ø¼üÊÇÄ͵Ãס¼Åį ¾µÃÆðÀäÂä °¢ÃÖÍÓ·ð ÎÒ·ðÓë³ÌÐòԱͬÔÚ
ÎÒÒ²ÕýÔÚѧ£¬¾õµÃÕÒ¸öÏîÄ¿Ç××Ô×öÏÂ
»á±È½ÏÓаïÖú
Äã×Ô¼º×ö×öµãСDEMOÂÂýÂýµÄÀ´
Ïà¹ØÎÊ´ð£º
³ÌÐòʹÓõÄÊÇOrcalÊý¾Ý¿â£¬Ï붨ÆÚ£¨Ã¿¼¾¶È£©¶ÔÊý¾Ý¿â½øÐб¸·Ý£¬Ã»É¶Í·Ð÷£¬ÇëÎÊÓ¦¸ÃÔõôŪ£¿
ÓÐʲôÌØÊâÒªÇóÂ𣬱ÈÈçҪǰ¶Ë½çÃ棿
Ò»°ãÓÃÊý¾Ý¿â×Ô´øµÄ¡°¼Æ»®ÈÎÎñ¡±ÅäÖÃһϾ͹»ÁË
ûÓÐʲôÌØÊâÒªÇó¡£ÀýÈ磬ֻҪµ ......
Àý×Ó³ÌÐò¼û¸½¼þ£¬ÓÃDelphi 7½øÐбàÒë
ÎÊÌâ´úÂëΪ
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......
delphi 數據類ÐÍ ¶¨義A~Z 為ÓÐÐòÐÍ£¬A為×îС£¬Z×î´ó¡£
Delphi(Pascal) code:
var
arr:array ['A'..'Z'] of Char;
Óü¯ºÏ¸ã¶¨
Ôõ麼È¥運ËãÄØ£¿inc() ......
ÔÚ°²×°Íê³ÉDelphiµÄʱºò£¬´ò¿ªDelphi½øÈë´°¿Ú£¬µãÔËÐеÄʱºòΪʲô×Ô¶¯Í£Ö¹ÔËÐÐÁË¡£
ʲôÒâ˼£¬ÊÇн¨µÄÓ¦ÓÃÔËÐÐÍ£Ö¹£¬»¹ÊdzÌÐòÍ£Ö¹ÁËÄØ¡£
ûÃ÷°×LZÒâ˼~~
ÒýÓÃ
ÔÚ°²×°Íê³ÉDelphiµÄʱºò£¬´ò¿ªDe ......