Delphi 7ʹÓÃADOConnection·ÃÎÊMySQL
½ñÌìÐÄѪÀ´³±ÔÚ×Ô¼ºµÄµçÄÔÉϰ²×°ÁËmysql-5.1.41-win32ºÍmysql-connector-odbc-5.1.6-win32¡£ÒÔǰ£¬ÎÒÔø¾³¢ÊÔʹÓãģţ̣Уȣɣ¶È¥Áª½Ó£Í£Ù£Ó£Ñ£Ìµ«ÊÇÔÚÍøÉÏÕҺܶà×ÊÁ϶¼²»ºÜºÃÓ㻽ñÌìͻȻҲÏëÆðÕâ¸öÎÊÌâ¾Í¸ÉÆð»ØÀ´ÁË¡£
¡¡¡¡£±.¡¡½¨Á¢Êý¾Ý¿â
¡¡¡¡¡¡¡¡use mysql;
¡¡¡¡¡¡¡¡drop database myDB;
¡¡¡¡¡¡¡¡create database myDB;
¡¡¡¡¡¡¡¡use myDB;
¡¡¡¡¡¡¡¡CREATE TABLE Table_01 (
¡¡¡¡ ¡¡¡¡FLD_01 int not null auto_increment,
¡¡¡¡¡¡¡¡FLD_02 varchar(50) ,
¡¡¡¡¡¡¡¡FLD_03 int NOT NULL DEFAULT 0,
¡¡¡¡¡¡¡¡key(FLD_01)
¡¡¡¡¡¡¡¡);
¡¡¡¡£².¡¡Ê¹Óãϣģ£ý¨Á¢Ò»¸ö£Í£Ù£Ó£Ñ£ÌµÄ£Ä£Ó£Î£¬Ãû³Æ£¨£Í£Ù£Ó£Ñ£Ì_£Ä£Â£©Ê²Ã´¶¼¿ÉÒÔ¡£
¡¡¡¡£³.¡¡ÔڣƣϣңÍÖÐÔö¼ÓÁËAdoconnection,AdoQuery,DataSourceºÍDBGrid.
¡¡¡¡¡¡¡¡AdoConnection.connectionstring := 'MYSQL_DB';
¡¡¡¡¡¡¡¡AdoQuery.sql.text :='select * from Table_01';
¡¡¡¡£´.¡¡È«²¿£Á£Ã£Ô£É£Ö£Å¡¡£º£½TRUE;
¸ãºÃ¡£
Ïà¹ØÎĵµ£º
DelphiÖÐFormat×Ö·û´®ËµÃ÷
function Format(const Format: string; const Args: array of const):
string;
Format×Ö·û´®ËµÃ÷£º
"%" [index ":"] ["-"] [width] ["." prec] type
(1)
¸ñʽ»¯×Ö·û´®±ØÐëÒÔ%¿ªÍ·
(2) [index ":"]
Ë÷ÒýÖ¸µÄÊÇArgs²ÎÊýÁбíÖÐÒªÏÔʾµÄÿһÏîµÄÐòºÅ¡£±ÈÈ磺ArgsÊÇ
......
¼¼Êõ½»Á÷,DH½²½â. IOCompÊÇÒ»Ì×ÓÃÓÚ¹¤ÒµµÄͼÐλ¯¿Ø¼þ.
¿´ÏÂÔõôÔÚD2010ÏÂÃæ°²×°°É.Ê×ÏÈÏÂÔØµØÖ·,À´Ö® ºÐ×Ó,Download Here ½âѹËõºó,ÐèÒª×öµÄ²½Öè:
1 Ìí¼Ólib path
Tools –> Options –> Delphi Options
½«ÄãµÄ½âѹËõĿ¼Ìí¼Ó½øÀ´.
2 ɾ³ýÏà¹ØPNGµ¥Ôª.
ÒòΪ2010ÖÐ ......
¼¼Êõ½»Á÷,DH½²½â. ÔÚD2010µÄclassesÖÐÓиöTBitsÀà,Õâ¸öÀàÖ÷ÒªÊÇλ²Ù×÷µÄ. TBits = class
private
FSize: Integer;
FBits: Pointer;
procedure Error;
procedure SetSize(Value: Integer);
procedure SetBit(Index: Integer; Value: Boolean);
function GetBit(Index: Integer): Boole ......
Chr ½«Ò»¸öÓÐÐòÊý¾Ýת»»ÎªÒ»¸öANSI×Ö·û
Ord ½«Ò»¸öÓÐÐòÀàÐÍֵת»»ÎªËüµÄÐòºÅ
Round ת»»Ò»¸öʵÐÍֵΪËÄÉáÎåÈëºóµÄÕûÐÍÖµ
Trunc ת»»Ò»¸öʵÐÍֵΪСÊý½Ø¶ÏºóµÄÕûÐÍÖµ
Int ·µ»Ø¸¡µãÊýµÄÕûÊý²¿·Ö
IntToStr ½«Êýֵת»»Îª×Ö· ......
OracleÐÔÄÜÓÅ»¯ÓëDelphi´úÂë
¸ÕѧÁ˵ãoracle·½ÃæµÄ֪ʶ£¬¸Ð¾õÒÔǰд´úÂëֻƾϲºÃд£¬ÍêȫûÓÐÉԵÓÉ£¬µ¼ÖÂÔÚÄÚÐÐÈË¿´À´£¬Ð´µÄ¶¼ÊÇÀ¬»ø´úÂ룬ÏÖÔھͰÑѧµ½µÄһЩ¶«Î÷д³öÀ´£¬Ò²ËãÊǸø¸ÕÈëÃŵÄÅóÓÑÒ»µã°ïÖú°É¡£
ÒÔǰ£¬Ð´Êý¾Ý¿â·ÃÎÊ´úÂ룬¸Ð¾õºÜ¼òµ¥£¬²»¾ÍÊÇsqlÓï¾äÂËùÒÔʲôÓï¾ä¶¼ÊÇÕâÑùд£º
A£º
......