delphi Êý×é¸úfor
ÈçºÎÓÃÊý×é¸úfor´òÓ¡³öÏÂÃæµÄͼÐÎ
*
**
***
****
Èç¹ûÓиüºÃµÄ·½·¨×îºÃҲдÉÏ XX
procedure TForm1.Button2Click(Sender: TObject);
var
arr: array of Integer;
i,j: Integer;
stra,strb : string;
begin
setlength(arr,4);
for i := 0 to 3 do
begin
arr[i] := i+1;
end;
for i := 0 to high(arr) do
begin
stra := '';
for j := 0 to i do
begin
stra := stra + '*';
end;
strb := strb + stra + #13;
end;
ShowMessage(strb);
end;
Ïà¹ØÎÊ´ð£º
ÈçÌâ¡£
¸Ð¾õÈçºÎ£¿½»Á÷Ï¡£
ûÓÐÑо¿¹ý£¬ºÇºÇ
ÓÐɶÑо¿Í·£¿
ÄǸö¶«Î÷£¬ÊǸö¼¦Àߣ¬£¬Ã»ÓÐʲôÒâ˼£¬·¢ÏÖ£¡£¡
ÓÃÀ´×öB/S¼Ü¹¹µÄMISϵͳµÄ»°Ó¦¸Ã¿ÉÒÔÌá¸ß½çÃæ¿ª·¢µÄЧÂʰɣ¿
ÒòΪ²»ÊìϤDelphi £ ......
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂð£¿
......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
DBGridÁ¬½ÓÊý¾Ý¿âÎļþ£¬ÔÚQueryµÄCachedUpdateΪFalseµÄʱºòÒ»Çж¼Õý³££¬²åÈ룬ɾ³ý
µ±ÎÒ°ÑCachedUpdate¸ÄΪTrueʱ£¬²åÈë±í¾Í»áÌáʾ"Table is not indexed"£¬Èç¹û½¨Á¢Ö÷¼üË÷Òý¾Í¿ÉÒÔÁË£¬µ«ÊÇÎÒµÄÊý¾Ý±í ......