¹ØÓÚdelphi ADOquery - Delphi / Êý¾Ý¿âÏà¹Ø
´úÂëÊÇÕâÑùµÄ:
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('insert into jsj615_ORDER_TEMP
values( '''+edit1.Text+''', strtoint(combobox3.Text), strtoint(edit3.Text) )
');
ADOQuery2.Open;
´íÎóÊÇ:
ÔÚ´ËÉÏÏÂÎÄÖв»ÔÊÐíʹÓÃÃû³Æ"combobox3.Text".ÓÐЧ±í´ïʽ°üÀ¨³£Á¿¡¢³£Á¿±í´ïʽºÍ±äÁ¿£¨ÔÚijЩÉÏÏÂÎÄÖУ©¡£²»ÔÊÐíʹÓÃÁÐÃû¡£
ÕâÊÇΪºÎ£¿°ïæ½â¾öÏ£¬£¬Ð»Ð»ÁË
1¡¢SQLÓï¾ä¡°Æ´½Ó¡±²»¶Ô
2¡¢insert/updateÓï¾ä²»ÄÜÓÃOpen·½·¨À´Ö´ÐÐ
Delphi(Pascal) code:
//¼ÙÉè×Ö¶ÎÃûΪf1-×Ö·ûÐÍ¡¢f2-ÊýÖµÐÍ¡¢f3-ÊýÖµÐÍ
//¼Ù¶¨ÊýÖµÐÍÊäÈëÒÑ×÷ÈÝ´íÐÔÅжÏ
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery1.SQL.Add('insert into jsj615_ORDER_TEMP(f1, f2, f3) values('
+ QuotedStr(edit1.Text) + ', '
+ combobox3.Text + ', '
+ edit3.Text);
ADOQuery2.ExecSQL;
3¡¢³ýÁËʹÓÃADOQuery.ExecSQLÀ´Ìá½»SQLÓï¾ä£¬Ò²¿ÉÒÔʹÓÃADOConnection.Execute('insert ....');
Â¥ÉÏÕý½â£¬Ö»ÊDZÊÎóÁËÒ»´¦¡£
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
delphi 數據類ÐÍ ¶¨義A~Z 為ÓÐÐòÐÍ£¬A為×îС£¬Z×î´ó¡£
Delphi(Pascal) code:
var
arr:array ['A'..'Z'] of Char;
Óü¯ºÏ¸ã¶¨
Ôõ麼È¥運ËãÄØ£¿inc() ......
Êý¾Ý£º Äê Ô ÈÕ ¿ªÅÌ ÊÕÅÌ
ʹÓÃÏÂÃæÓï¾äËÑË÷µ½ÁË Ã¿Äêÿ¸öÔµÄÔ³õºÍÔÂÄ©¶¼ÊǼ¸ºÅ
select Äê,ÔÂ,MIN(ÈÕ) as frist,MAX(ÈÕ) AS laset from mt4his.DB GROUP BY Äê,ÔÂ
ÎÒÏëµÃµ½ ÿÄêÿ¸öÔµÄÔ³õºÍÔÂÄ© ......