delphiÁ¬postgresql³É¹¦£¬µ«²»ÄÜÔö¼Ó»òÐ޸ļǼ
»·¾³winXP,delphi 7, postsgresql 8.4, ÒѰ²×°odbc for postgresql
Á¬½Ó·½Ê½ado -> odbc -> postgresql
Delphi(Pascal) code:
con1.ConnectionString := 'Provider=MSDASQL.1;Extended Properties="DRIVER={PostgreSQL ODBC Driver(UNICODE)};DATABASE=DataBase1;'
+ ' SERVER=127.0.0.1;PORT=5432;UID=postgres;PWD=123456; '
+ ' ReadOnly=0;Protocol=7.4;FakeOidIndex=0;ShowOidColumn=0; '
+ ' RowVersioning=0;ShowSystemTables=0;ConnSettings=;Fetch=100; '
+ ' Socket=4096;UnknownSizes=0;MaxVarcharSize=254; '
+ ' MaxLongVarcharSize=65536;Debug=0;CommLog=0;Optimizer=1;Ksqo=1; '
+ ' UseDeclareFetch=0;TextAsLongVarchar=1;UnknownsAsLongVarchar=0; '
+ ' BoolsAsChar=1;Parse=0;CancelAsFreeStmt=0; '
+ ' ExtraSysTablePrefixes=dd_;LFConversion=1;UpdatableCursors=1; '
+ ' DisallowPremature=0;TrueIsMinus1=0;BI=0;ByteaAsLongVarBinary=0; '
+ ' UseServerSidePrepare=0"' ;
qry1.Sql.Text := 'select id from table1';
qry1.Active := True;
qry1.Append;
qry1.FieldValues['id'] :='1';//Ö´Ðе½Õâ¾ä±¨´íField 'id' cannot be modified
Delphi(Pascal)
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ
ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......
ÇëÎÊÈçºÎÉèÖÃÒ»¸ö°´Å¥£¬Ò»µãµ½Ëü¾Í²»¶ÏÖ´Ðа´Å¥ÉϼÓÔØµÄʼþ£¬ÖªµÀµã»÷ÁíÒ»¸ö°´Å¥²Å»áÍ£Ö¹£¬ÒòΪдÁ˸öÑ¡ºÅµÄС³ÌÐò£¬Ï£Íû¿ÉÒÔÏñµçÊÓÉÏÄÇÑù£¬Ò»µã¾Í²»¶ÏµÄË¢ ¶ø²»ÊǵãÒ»ÏÂˢһϣ¡£¡
Á½ÖÖ·½·¨
1.ÓÃtimerÈ¥¿ØÖÆÖ´ ......
ÇëÎʸ÷λÄܲ»ÄÜ¿´µ½delphiÖÐ×Ô´ø×é¼þµÄÄÚ²¿´úÂë,±ÈÈçÔõôȥ¿´speedbuttonµÄflat·½·¨ÖеĴúÂëµÈ.
SpeedButton1.Flat
Êó±êÒÆµ½FlatÉÏ£¬°´×¡Ctrl¼ü£¬×ó»÷
¶ÔÁË£¬SpeedButton1 ±ØÐëÊÇ´´½¨ºÃµÄ
Êǰ¡£¬¾ÍÕâà ......
ÎÒÓÃftpÉÏ´«Ò»¸öÎļþµ½ftp·þÎñÆ÷ÉÏ£¬Ç°¼¸Ìì¶¼Óõĺúõģ¬ºóÃæÒ»Ö±µ½ÏÖÔÚÁ¬²»ÉÏftpÁË
-------------------------------------
IdHTTP1:=TIdHTTP.Create(GetIP); //Ϊ·ÀÖ¹¶ÏÍøºóidhttpÎÞ·¨Æô¶¯ÆðÀ´,ËùÒÔ ......
ÎÒÔÚc#ÀïдÁËÒ»¸öClassLibrary1Àà¿â£¬ ÉùÃ÷Ò»¸ö½Ó¿Ú£¬ÔÙʵÏָýӿڡ£
ÔÚ³ÌÐò¼¯ÐÅÏ¢ÀïÒѾ¹´Ñ¡ÁËʹCOM¿É¼û¡£
È»ºó¶Ô´Ë±àÒë³É¹¦µÄDLL¡¾beep_Class.dll¡¿½øÐд¦Àí£¬´ò¿ªvs2005×Ô´øµÄÃüÁîÐй¤¾ß¡£ ......