delphiÔõÑùÁ¬½ÓSqlite Ôöɾ¸Ä²é
delphiÁ¬½ÓSqlite Ôöɾ¸Ä²éÀý×Ó
Êý¾Ý¿âÒѾÁ¬Í¨ÁË, ²åÈë»á±¨´í£¬no query specified
with dm.ASQLite3Query1 do
begin
dm.ASQLite3Query1.Close;
dm.ASQLite3Query1.SQL.Clear;
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;
Delphi(Pascal) code:
with dm.ASQLite3Query1 do
begin
dm.ASQLite3Query1.Close;
dm.ASQLite3Query1.SQL.Clear;
sqlstr:='insert into student_test(id,username,telephone,address,state) values(:id,
Ïà¹ØÎÊ´ð£º
ÎÒдÁ˸öС³ÌÐò£¬ÉÏÃæÌí¼ÓÁËÒ»¸öshockwaveflash¿Ø¼þ£¬È»ºóÔÚmovieÀïдÈëswfÎļþµÄ·¾¶£¬È»ºóÖ´ÐÐûÓÐÎÊÌâ¡£
µ±ÎÒ°ÑÕâ¸ö³ÌÐò×ªÒÆµ½Áíһ̨µçÄÔÖ´ÐÐʱ£¬ shockwaveflash ¿Ø¼þÏÔʾ¿Õ°×¡£Ò²¾ÍÊÇûÓмÓÔØÄǸöswfÎļþ¡£ ......
½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall;¡¡//ÕâÀï¸ù¾ÝDLLÀïÃæº¯ÊýµÄÉùÃ÷ÐÞ¸Ä
var
......
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 ......