delphiÖÐÈçºÎµÃµ½Ò»¸öcount£¨¼±Óã©
ÎÒÒѵõ½ÎÒÏëÒªµÄËùÓм¯ºÏ µ«ÊÇÎÒ¸ÃÓõõ½Õâ¸ö¼¯ºÏµÄcount ÄØ £¨¾ßÌåÏ£ºµ÷ÄǸö¿Õ¼äµÄÊôÐÔ»ò·½·¨£©Ð»Ð»ÁË£¬¿ÉÄܼܺòµ¥£¬µ«ÊÇÎÒÕæµÄ²»»á
ËùÓм¯ºÏÊÇָʲôµÄ¼¯ºÏ°¡?
Õâ¸öÊDz»ÊÇÄãÒªµÄ ÈÝÆ÷ÀàµÄControlCount¿ÉÒÔʹÓÃ
panel1.ControlCount
form1.ControlCount
var
cnts : integer;
adoquery1.close;
adoquery1.add('select count(*) from table_name');
adoquery1.open;
cnts := adoquery1.fields(0).asstring;
²»ÖªËùÔÆ...
self.ControlCount
ÎÒµÄÒâ˼¾ÍÊǶþÂ¥µÄÒâ˼ ¿ÉÊÇÓöþÂ¥µÄ·½·¨ ÎÒÕⱨ´í
ADOQuery1.RecordCount
cnts : integer;
cnts := ¡£¡£¡£.asstring £¿£¿
¶þÂ¥ÕâÒ»¶¨ÊDZàÒë²»¹ýµÄµ±È»¡£
¸ÄΪ£ºcnts :string;
ADOQuery1.RecordCount; //Õâ¸ö¾Í¿ÉÒÔÁ˰É
form1.ComponentCount
..........
лл 7Â¥µÄ
Ïà¹ØÎÊ´ð£º
ÈçÌâ¡£
¸Ð¾õÈçºÎ£¿½»Á÷Ï¡£
ûÓÐÑо¿¹ý£¬ºÇºÇ
ÓÐɶÑо¿Í·£¿
ÄǸö¶«Î÷£¬ÊǸö¼¦Àߣ¬£¬Ã»ÓÐʲôÒâ˼£¬·¢ÏÖ£¡£¡
ÓÃÀ´×öB/S¼Ü¹¹µÄMISϵͳµÄ»°Ó¦¸Ã¿ÉÒÔÌá¸ß½çÃæ¿ª·¢µÄЧÂʰɣ¿
ÒòΪ²»ÊìϤDelphi £ ......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
ÎÒÏÖÔÚÒª¶Áȡһ¸öTXTÎļþ ÀïÃæ ´æ·ÅµÄ¸ñʽÊÇÕâÑù´ø¸ñʽµÄ
Êý¾Ý1----Êý¾Ý2----Êý¾Ý3----Êý¾Ý4
ÎÒÏëʵÏÖ·Ö±ð¶ÁÈ¡ Êý¾Ý1 Êý¾Ý2 Êý¾Ý3 Êý¾Ý4
ÇëÎÊdelphiÏÂÓÐʲôºÃµÄ·½·¨Â𣿠......
const
WM_REFRESH_USERS = WM_USER + 330;
type
TRefreshParam = (rpRefreshAll, rpAppendItem, rpDeleteItem);
PCmdRec = ^TCmdRec;
TCmdRec = record
&nbs ......
³ÌÐòÀï·ÅÖÃÒ»¸öWebBrowser£¨ÔÚInternetÒ³ÃæÀȻºó£º
procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.Navigate('http://www.baidu.com');
end;
ÇëÎÊÒ»ÏÂÈçºÎ¿Ø ......