delphiÓësqlite
from : http://zhyhero.googlepages.com/heartset
file:0 Ç°ÑÔ
±¾ÎĵÄÄ¿µÄÔÚÓÚ²ÉÓÃÁ÷Ë®ÕË·½Ê½À´¼Ç¼ѧϰdelphi·ÃÎÊǶÈëʽÊý¾Ý¿âsqliteÖеÄһЩµãµÎ¡£»¶Ó¸÷λͬºÃ¹²Í¬Ñ§Ï°ºÍÅúÆÀÖ¸Õý¡£
file:1 ×¼±¸¹¤×÷part1
delphi°æ±¾:delphi2007 for win32 update3¡£ÈÎÒâ°²×°°æ±¾¼´¿É¡£
sqlite dll°æ±¾:3.5.3¡£Ä¿Ç°×îа汾µÄsqliteÒýÇæ¡£[ http://www.sqlite.org/
]
sqlite for delphi:simple sqlite 3.0 for delphi¡£Ä¿Ç°µÄ×îа汾µÄ·¢²¼ÈÕÆÚΪ27 August 2007£¬Ö§³Ösqlite dll°æ±¾3.4.2¡£¾¼òµ¥²âÊÔ£¬3.5.3Ò²ÊÇ¿ÉÒԵġ£×Ô´ødemo¡£[ http://www.itwriting.com/sqlitesimple.php
]
file:2 ×¼±¸¹¤×÷part2
н¨Ò»¸ö´°ÌåÓ¦ÓóÌÐò¹¤³Ì£¬²¢É趨±£´æµÄÎļþ¼Ð¡£½«simple sqlite 3.0 for delphi ÖеÄ
sqlite3.pas£¬sqlite3table.pas£¬sqlite3udf.pas¿½±´ÖÁ¹¤³ÌËùÔÚµÄÎļþ¼Ð¡£²¢ÔÚ¹¤³ÌÖÐÌí¼ÓÕâÈý¸öÎļþ¡£¿½±´
sqlite.dllµ½±àÒëÉú³ÉexeÎļþµÄÎļþ¼Ð¡£Õâ¸öÒª¿´¸öÈ˵ÄÉ趨¡£
file:3 ³õ²½²âÊÔ
ÒýÓÃSQLiteTable3.pasµ¥Ôª¡£
ÔÚ´°ÌåÉÏ´´½¨Ò»¸ö½ÐbtnVersionµÄ°´Å¥(Tbutton)¡£ÔÚbtnVersionµÄclickʼþÖÐдÈëÏÂÃæµÄ´úÂë¡£
procedure TfrmAbout.btnVersionClick(Sender: TObject);
var
SqliteDB:TSQLiteDatabase;
begin
SqliteDB:=TSQLiteDatabase.Create('');
showmessage('Sqlite dll version:'+SqliteDb.version);
SqliteDB.Free;
end;
±àÒëÔËÐУ¬³É¹¦µÄ»°£¬½«»áÏÔʾµ±Ç°µÄsqlite dllµÄ°æ±¾ºÅ£¬ÎÒµÄÊÇ3.5.3¡£
file:4 ¼òµ¥¹¤×÷ÔÀíÃèÊö
ÔÚsimple sqlite3.0 for delphiµÄ¼¸¸öÎļþÖУ¬Ö÷ÒªÓõ½Á½¸öÎļþ¡£·Ö±ðÊÇsqlite3.pas£¬sqlite3table.pas¡£
sqlite3.pasʵÏÖsqlite.dllµÄ½Ó¿ÚÍⲿ¶¨Òå¡£
sqlite3table.pas½øÐмòµ¥µÄ·ÃÎʺ¯Êý·â×°¡£
ÔÚdelphiÖУ¬Í¨¹ýsqlite3table.pasÀ´ÊµÏÖ¶ÔsqliteÊý¾Ý¿âµÄ¸÷ÖÖ·ÃÎÊ¡£
&nbs
Ïà¹ØÎĵµ£º
Format
typeµÄ¿ÉÄÜÖµÓÐÏÂÁÐÕâЩ£º
(1) d ÓзûºÅÊ®½øÖÆÊý
Args±ØÐëÊÇÓзûºÅÕûÐÍÊý¡£Èç¹ûÔÚ¸ñʽ»¯×Ö·û´®Öл¹¼ÓÈëÁË["." prec]£¬ÔòÈç¹ûArgs
µÄ³¤¶ÈÈç¹ûСÓÚ¸ø³öµÄ¾«¶ÈÊýʱ£¬ÔÚÇ°±ßÌî²¹0£»Èç¹û´óÓÚ¾«¶ÈÊý£¬°´Êµ¼Ê³¤¶ ......
Delphi 7Ö®ºóµÄ°æ±¾£¬Ôö¼ÓÁËÔËËã·ûµÄÖØÔØ¡£ËäÈ»²»¾¡ÈËÒ⣨ÐèҪдÌض¨Ó¢ÎÄ£©£¬µ«ÓÐ×ܱÈûÓÐÇ¿¡£
Àý£º
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
T3DPoint = record
X, Y, Z: Doub ......
ʹÓÃdelphi¶àÄê,ǰЩÌìºöÈ»Óöµ½²»»ástringתpbyte,ºÜÊÇʧÂä,´Ëʱ¶ÔÓÚ±à³Ì»ù±¾¹¦µÄÖØÒªÐÔÉîÓÐÌå»á.ÕâÆäÖÐÓõ½MOVEº¯Êý.
¸ãÁ˺ÃÒ»»á²Å¸ãÃ÷°×ÆäÓ÷¨.ËùÒÔÏëÌù³öÀ´°ïÖúÐèÒª°ïÖúµÄÈË.
var
s:string;
ps:Pchar;
b:pbyte;
len:integer;
begin
&nb ......
½ñÌìÏîÄ¿×é·¢ÉúÒ»¸öÊÂÇé¾ÍÊÇ£¬ºǫ́aixÉ϶ԶàÓïÑÔÎı¾£¨Ó¢Óï+ºº×Ö£©»»ÐÐÎÊÌâ¸ã²»Ì«Çå³þ¡£
×îÔçǰ̨µÄ¶à×Ö·ûµÄ´úÂëÎÒ¼ì²éÁËһϣ¨°´ÕÕ0-128ÒÔÍâËãÖÐÎĵĴúÂ룩·¢ÏÖ²»ÊÇ°²È«µÄ´úÂë¡£
(delphi 7.0)
delphi°²È«µÄ»ìºÏ×Ö·ûµÄ²Ù×÷·½·¨ÊÇ£º
ÔÚstrsUtilsµ¥ÔªÖÐ
leftstr
MidStr
Rightstr
aixÏÂÊÇ£º ......
ÔÎIJμû£º http://blog.csdn.net/ingener/archive/2007/12/22/1958535.aspx
¹ØÓÚDelphiÖÐDLL·â×°¶ÔÏóµÄ¼¸ÖÖ·½·¨ÕûÀí¼°Ìå»á
DelphiÓÃDLLÀ´·â×°¶ÔÏóµÄ¼¼ÊõÖ÷ÒªÓÐÈýÖÖ:
ÓýӿÚʵÏÖ
Óô¿ÐéºÍ³éÏóÀà·½·¨ÊµÏÖ
ÓÃÀàÒýÓÃʵÏÖ
Ç°Á½ÖÖ£¬¶¼ÊÇÔÚDLLÖÐÉú³ÉÀàʵÀý£»µÚ3ÖÖͨ¹ýÔÚµ÷Ó÷½Éú³ÉʵÀý¡£ÈýÖÖ·½·¨µÄ¹²Í¬¾ÖÏÞÈçÏ£º ......