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

delphi Á¬½ÓsqliteÊý¾Ý¿â£¬insert±¨´í

¿ÉÒÔÌí¼ÓÊý¾Ý£¬µ«ÊǵãÌí¼Óºó»á±¨.access violation at address 0049AB84 in module 

Ô´Âë
procedure Tstudent.add_buttonClick(Sender: TObject);
var
  sqlstr:string;
begin
  if (id_edit.Text='') and (username_edit.Text='')  then
  begin
    application.MessageBox('ÇëÊäÈëÍêÕûÊý¾ÝÐÅÏ¢','Ìí¼Ó³ö´í',0);
    id_edit.SetFocus;
    exit;
  end;
  with ASQLite3Query1 do
  begin
    close;
    sql.clear;
    sql.add('insert into student values(:id,:username,:telephone,:address,:state)');
    ASQLite3Query1.Params.ParamByName('id').Value:=strtoint(id_edit.Text);
    ASQLite3Query1.Params.ParamByName('username').Value:=username_edit.Text;
    ASQLite3Query1.Params.ParamByName('telephone').Value:=strtoint(phone_edit.Text);
    ASQLite3Query1.Params.ParamByName('address').Value:=address_edit.Text;
    ASQLite3Query1.Params.ParamByName('state').Value:=state_edit.Text;
    execSQL;
    showmessage(ASQLite3Query1.SQL.Text);
  end;
end;

ÊÇÕâ¶Î´úÂëµÄÎÊÌâÂð£¿ÄãÏȼӸö¶Ïµã¿´¿´£¬ºÃÏñ²»ÊÇÕâ¶Î´úÂëµÄÎÊÌ⣡Ӧ¸ÃÊÇÄĸöÄ£¿é³öÎÊÌâÁË£¡

Â¥Ö÷µÄÄǸöÒ²²»ÐÐ
{{----}


Ïà¹ØÎÊ´ð£º

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

delphiÖÐselect µÄ whereºóÃæµÄid=±äÁ¿Ôõôд°¡

ÎҵijÌÐòÖÐÓÐÒ»¶Î¸üÐÂijһÌõ¼Ç¼µÄÓï¾ä£º
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.textµÄÖµÒѾ­È¡µÃ;
...
...
...
adoQuery1.sql.add('update ¼Æ»®Çåµ¥±í set ¼Æ»®ÈÕ ......

´ó¼Ò¾õµÃÓÃdelphi×öÀàËÆ¿áÎÒÒôÀֺеÄÈí¼þ¿ÉÐÐÐÔÈçºÎ£¿

ÓÐʲô¹¹ÏëÌÖÂÛһϡ£
ÕâÀà¶«Î÷Ö÷ÒªÊÇÈËÆøºÍ½çÃæ»¨ÉÚ,¼¼ÊõÉÏûʲôÄѵã.

ÕâÎÒÖªµÀ£¬ÄǼ¼ÊõÉϵÄÄØ£¿ÓÐûÓй¹ÏëһϸÃÔõôÉè¼Æ£¿Ö÷ÒªÊÇdelphi×ÔÉíÄܲ»Äܹ»Íê³É£¬Èôͬʱ´óÁ¿¿Í»§µÇ½£¬·´Ó¦ËÙ¶ÈÈçºÎµÈµÈ¡£

ÒýÓÃ ......

ÇëÎÊÄĸöÅóÓÑÄÜÍÆ¼ö¸öwinsockAPI±à³ÌµÄÊé(DelphiµÄ)£¿

Òª°üº¬winsock2 ¶øÇÒÏêϸЩµÄ¡£
ÄÇЩʹÓÿؼþµÄµÄÊé±¾¾Í²»ÒªÁË£¬
Ï£ÍûÂò¹ýÕâÀàÊéµÄÅóÓÑÄÜÍÆ¼öÏÂ×Ô¼º¾õµÃ²»´íµÄ¡£
À´¹Ø×¢Ï¡£

WindowsÍøÂçÓëͨÐųÌÐòÉè¼Æ(µÚ2°æ)
À¶Æ¤µÄÊÇаæ,ËäÈ»ÊÇÖйúÈËдµÄµ«ÊǷdz ......

100·Ö£¡¹ØÓÚvbµ÷ÓÃdelphi±àдµÄdllµÄÎÊÌ⣬¼±£¡£¡£¡

¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ