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

delphiÖÐÒ»¶Î´úÂëÎÊÌâ

ÎÒÓÐÒ»¸öedit£¬Ò»¸öbutton£¬½«editÊäÈëµÄÄÚÈÝÔÚsqlÖнøÐвéÕÒ£¬button°´ÏºóÔÚºóÃæÏÔʾ³öÀ´£¬µ«ÊÇÎÒÓÐÒ»¸öÎÊÌ⣬Èç¹ûÔÚsql²éѯ²»µ½¾ÍºÜÂé·³£¬Ïñ±¨´íÒ»ÑùµÄÌøÒ»¸ö¶Ô»°¿ò³öÀ´£¬ÎÒÏëÈç¹ûûÓÐËÑË÷µ½£¬ÄÇÌøÒ»¸ö¶Ô»°¿ò³öÀ´ÌáʾûÓкÏÊʵIJéѯ£¬ÇëÎÊÔõôŪ£¿ÊÇ×Ô¼ºÌí¼ÓÒ»¸öform»¹ÊÇÓÃshowmessage£¿
¶¼ÐУ¬showmessage¿ÉÄÜ×öÆðÀ´¸ü¿ì

ÌáʾÓÃshowmessage×îºÃ.Äã¿ÉÒ԰Ѳéѯ·Åµ½TRYÖÐ

if Qry.RecordCount = 0 then
  ShowMessage('ûÓÐÕÒµ½¼Ç¼');

Èç¹ûÒªËü²»±¨´í£º
ÓÃ
try
...
except
...
finally


Õâ¸öÎÊÌâÔÚÓÚÄãÏëÔõô×ö£¬showmessage¾ÍÄܵ¯³ö¸ö¿òÌáʾ£¬Èç¹ûÄãÏ븽¼Ó¸ü¶àµÄÐÅÏ¢£¬¾Í×Ô¼º×öÒ»¸ö´°Ì壬ÏÔʾһ¸ö´°ÌåÒ²²»Âé·³


try
 if qy.IsEmpty then showmessage('ûÓÐÕÒµ½¼Ç¼£¡')£»
except
  on E:Exception do
  ShowMessage(E.Message);
end;

showMessageºÜ·½±ãµÄ

begin
if cus_name.Text=''
then showmessage('ÇëÊäÈëÒª²éѯµÄ¿Í»§ÐÕÃû')
else
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('select * from Ô¤¶©¿Í»§²éѯ±í where ¿Í»§ÐÕÃû=:name');
Parameters.ParamByName('name').Value:= Trim(cus_name.text);
open;
try
if adoquery1.RecordCount = 0 then
  ShowMessage('ûÓÐÕÒµ½¼Ç¼');
except
 while not eof do
 begin
  cus_time.Text:=adoquery1.Fieldbyname('Èëסʱ¼ä').AsString;
  cus_rnum.Text:=adoquery1.Fieldbyname('·¿¼äºÅ').AsString;
  Next;


Ïà¹ØÎÊ´ð£º

delphiµÄdll×Ó´°ÌåÎÊÌâµÄ½â¾ö - Delphi / ·Ç¼¼ÊõÇø

Ò»Ö±ÏëʹÓÃdll£¬µ«delphiµÄdll×Ó´°Ìå¾­³£Óи÷ÖÖÎÊÌ⣬±ÈÈçÖ÷´°¿ÚÓëdll×Ó´°¿ÚµÄ½¹µãÎÊÌ⣬×Ó´°¿ÚÖпؼþµÄtab¼ü¡¢Èȼü¡¢enter¼üµÈµÄÎÊÌ⣬×Ó´°¿ÚÍ˳öµÄÎÊÌ⡢ƽÃæ°´Å¥ÎÊÌâµÈµÈ£¬ÍøÕ¾ÉϽøÐÐÁËËÑË÷£¬Ã»ÓбȽÏÍêÃÀµÄ½â¾ö· ......

Õâ¸öSQLÓï¾äÓÐʲôÎÊÌâ? - Delphi / ·Ç¼¼ÊõÇø

select * from shuju.DB where ¿ªÅ̼Û-ÊÕÅ̼Û<=0.02
¿ªÅÌ¼Û ÓëÊÕÅÌ¼Û ÊÇÊý¾Ý¿âÀïµÄ×Ö¶Î
select * from aTableName where ((¿ªÅ̼Û-ÊÕÅ̼Û) <=0.02 )

¿ªÅ̼۱ÈÊÕÅ̼۵ÍÁ½·ÖÒÔϵÄÇé¿ö

Mark!!!!!!

se ......

ÓÃdelphi×öÒ»¸ö½çÃæ

ÎÒÃǵ¼Ê¦ÈÃÎÒÃÇÓÃdelphi×öÒ»¸ö½çÃæ,ÒÔǰûÓÐѧ¹ý,¸Ð¾õÓкöà¿Ø¼þҪѧ,²»ÊǺܶ®,ÓÐË­Äܹ»Ö¸µ¼Ö¸µ¼°¡,лл!!
´ò¿ªdelphi£¬ÔÚÉÏÃæÕҿؼþ£¬ÍùformÉÏÍϾÍÊÇÁË£¬²¼¾ÖÉèÖúþÍÐÐÁË

¿ªdelphi£¬°Ñ¿Ø¼þÀ¸ÉϵĿؼþÍϵ½´°ÌåÉ ......

delphi ÔõôÑùʹÓÃsqliteÊý¾Ý¿â£¿

ÊÖÍ·ÓÐÒ»¸öСCASE£¬ÒªÓõ½Êý¾Ý¿â£¬Ïë²ÉÓÃSQLite¡£
ÓÐÓùýµÄÅóÓÑÂð£¿
ÒªÔõô°²×°sqlite·þÎñ£¿»¹ÊDz»ÐèÒª°²×°£¿
ÓÃʲôÈí¼þÀ´¹ÜÀíSqliteÊý¾Ý¿â£¿ÈçÌí¼Ó±í£¬Ð´´æ´¢¹ý³ÌµÈ¡£
delphiÖÐÔõôÑùÁ¬½Óµ½sqliteÊý¾Ý¿â£¿ÓÃʲ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ