delphiÊý×éÓù»·Êä³öÎÊÌ⣿
ÎÒʼÖÕ²»Ã÷°×ËüµÄÒâ˼?
Delphi(Pascal) code:
program Project2;
{$APPTYPE CONSOLE}
const
n=10;
type
intarray=array[1..n]of integer;
var
a:intarray;
i:integer;
begin
for i:=1 to n do
a[i]:=i;
for i:=1 to n do
begin
write(a[i]:4); //Õâ¸öðºÅÆðʲô×÷ÓÃ?ΪʲôҪ4£¿
if(i mod 5=0)then //Èç¹û±äÁ¿³ý5µÈÓÚ0Ϊ¼Ù,ËùÒÔÖ´ÐÐÏÂÃæÕâÌõÓï¾ä?ÊÇÕâÑùµÄÂð?
writeln;
end;
readln;
end.
write(a[i]:4); //Õâ¸öðºÅÆðʲô×÷ÓÃ?ΪʲôҪ4£¿
:4ΪÊä³ö¸ñʽ,±íʾ¿í¶È(²»×ãÓÿոñ)
if(i mod 5=0)then //Èç¹û±äÁ¿³ý5µÈÓÚ0Ϊ¼Ù,ËùÒÔÖ´ÐÐÏÂÃæÕâÌõÓï¾ä?ÊÇÕâÑùµÄÂð?
mod²»Êdzý,ÊÇÈ¡Óà,ÉÏÃæ±íʾÈç¹ûi¿ÉÒÔ±»5Õû³ý,ÔòÖ´ÐÐÏÂÃæµÄÓï¾ä
-------------------------------
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
begin
case wParam of
WM_KEYDOWN:
fEatKeystroke := (p.vkCode = VK_RETURN);
& ......
ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£
µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË
ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......
ÏÖÔÚ×öÁËÒ»¸ö¼òµ¥µÄ³ÌÐò£¬Óõ½ÁËXML×÷Êý¾Ý¿â£¨ÄÚÈÝÓеã¶à£©£¬
ĿǰÎÒÊǰÑXMLÄÚÈÝдÔÚDELPHIÀïµÄÒ»¸öConst ±äÁ¿À¿ÉÊÇXMLÄÚÈÝÉÙµÄʱºò£¬Ã»ÓÐÎÊÌ⣬
¶àÁ˾ÍÌáʾ[´íÎó] Unit1.pas(144): Too many local ......