delphiÔõÑùÁ¬½ÓSqlite Ôöɾ¸Ä²é
ÇódelphiÔõÑùÁ¬½ÓSqlite Ôöɾ¸Ä²éÀý×Ó
ÓÃASqlite3Query,ÉèÖÃËûµÄconnectionΪASqlite3DB
ASqlite3Query.Sql.text := 'insert into ....';
ASqlite3Query.Execsql;
sqlstr:='insert into student_test(id,username,telephone,address,state) values(:id,:username,:telephone,:address,:state)'; dm.ASQLite3Query1id.Value:=Trim(id_edit.Text);
dm.ASQLite3Query1username.Value:=Trim(username_edit.Text);
dm.ASQLite3Query1telephone.Value:=Trim(phone_edit.Text);
dm.ASQLite3Query1address.Value:=Trim(address_edit.Text);
dm.ASQLite3Query1state.Value:=Trim(state_edit.Text);
dm.ASQLite3Query1.ExecSQL;
dm.ASQLite3Query1.Close;
dm.ASQLite3Query1.SQL.Clear;
dm.ASQLite3Query1.SQL.Text:='select * from student_test';
dm.ASQLite3Query1.Open;
end;
ÎÒÕâÑùдΪʲô²»ÐÐÄØ
Â¥Ö÷¿ÉÒÔÊÔÊÔÕâ¸ö£º
http://www.itwriting.com/blog/a-simple-delphi-wrapper-for-sqlite-3
¼òµ¥·½±ã
{{
Ïà¹ØÎÊ´ð£º
ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£
µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË
ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......
ÎÒдÁ˸öС³ÌÐò£¬ÉÏÃæÌí¼ÓÁËÒ»¸öshockwaveflash¿Ø¼þ£¬È»ºóÔÚmovieÀïдÈëswfÎļþµÄ·¾¶£¬È»ºóÖ´ÐÐûÓÐÎÊÌâ¡£
µ±ÎÒ°ÑÕâ¸ö³ÌÐò×ªÒÆµ½Áíһ̨µçÄÔÖ´ÐÐʱ£¬ shockwaveflash ¿Ø¼þÏÔʾ¿Õ°×¡£Ò²¾ÍÊÇûÓмÓÔØÄǸöswfÎļþ¡£ ......
ÎҵĴúÂëÈçÏÂ,Ôõô×ÜÌáʾÁ¬²»³É¹¦:
type
GUID = record //ÉêÃ÷µ÷ÓÃRAS£¨´´½¨VPNÁ¬½ÓÓ㩺¯ÊýËùÐè½á¹¹Ìå
Data1: integer;
Data2: Shortint;
Data3: Shortint;
......
VC ¿ØÖÆÌ¨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......