Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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

¼òµ¥·½±ã

{{


Ïà¹ØÎÊ´ð£º

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

Delphi ʹÓÃshockwaveflash¿Ø¼þµÄÎÊÌâ

ÎÒдÁ˸öС³ÌÐò£¬ÉÏÃæÌí¼ÓÁËÒ»¸öshockwaveflash¿Ø¼þ£¬È»ºóÔÚmovieÀïдÈëswfÎļþµÄ·¾¶£¬È»ºóÖ´ÐÐûÓÐÎÊÌâ¡£
µ±ÎÒ°ÑÕâ¸ö³ÌÐòתÒƵ½Áíһ̨µçÄÔÖ´ÐÐʱ£¬ shockwaveflash ¿Ø¼þÏÔʾ¿Õ°×¡£Ò²¾ÍÊÇûÓмÓÔØÄǸöswfÎļþ¡£ ......

delphi¶¯Ì¬Êý×éÈçºÎÈ¥µôÒ»¸öÔªËØ

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë
begin
P:=PLongint(A);// È¡µÄ A µÄ ......

Delphi ¶àỊ̈߳¬µ¯³ö¿òÖжÏÎÊÌâ

ÈçÌ⣺

ÎҵijÌÐò Create µÄʱºò ´´½¨ÁËN ¸öỊ̈߳»ÕâN¸öÏ̲߳»Í£µÄÔÚ ¼àÌýN¸öCOM¿ÚµÄÊý¾Ý£»µ±·ÖÎöÊý¾Ýʱ£¬ÓÐЩʱºòÒªµ¯³öapplication.messagebox ¶Ô»°¿òÅÐ¶Ï ÊÇ·ñ¼ÌÐø Ö´ÐÐỊ̈߳¬»¹ÊǹÒÆðÏ̡߳£µ±¶à¸öÏß³Ìͬʱ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ