曙海教育集團(tuán)論壇開發(fā)語言培訓(xùn)專區(qū)Delphi程序設(shè)計(jì) → 幾個(gè)delphi書中沒提過的數(shù)據(jù)庫問題與我的疑惑和心得(一起討論)


  共有8720人關(guān)注過本帖樹形打印

主題:幾個(gè)delphi書中沒提過的數(shù)據(jù)庫問題與我的疑惑和心得(一起討論)

美女呀,離線,留言給我吧!
wangxinxin
  1樓 個(gè)性首頁 | 博客 | 信息 | 搜索 | 郵箱 | 主頁 | UC


加好友 發(fā)短信
等級:青蜂俠 帖子:1393 積分:14038 威望:0 精華:0 注冊:2010-11-12 11:08:23
幾個(gè)delphi書中沒提過的數(shù)據(jù)庫問題與我的疑惑和心得(一起討論)  發(fā)帖心情 Post By:2010-12-14 11:16:27

1,ADOConnection和ADOTable在delphi中的使用

ADOConnection和ADOTable在delphi中像許多書中教的那樣設(shè)置好連接上數(shù)據(jù)庫(我用的SQLServer),運(yùn)行沒有問題。然后我修改,目的是可以修改連接數(shù)據(jù)庫而不用在delphi中修改ADOConnection的ConnectionString屬性,還不出現(xiàn)連接對話框。

修改步驟:將LoginPrompt設(shè)置為false,將ConnectionString屬性清空,添加連接代碼

conStr:='Provider=SQLOLEDB.1;Password=1982072019;User ID=sa;Initial Catalog=StorageManagement;Data Source=10.16.99.175';
  try
    loginForm.tempADOConnection.ConnectionString :=conStr;
    loginForm.tempADOConnection.Connected := true;
  except
    messagedlg('數(shù)據(jù)庫連接有誤!!請檢查DataConfig.XML',mtConfirmation,[mbOk],0);
    Application.Terminate;
  end;

這樣程序運(yùn)行起來,連接數(shù)據(jù)庫是沒有問題的。但出現(xiàn)的問題是在dlephi中ADOTable控件是不能連接表的,因?yàn)镃onnectionString屬性沒有值。報(bào)錯(cuò)為“無效的授權(quán)說明”。如何既能在delphi中使用ADOConnection和ADOTable控件,又可以不出現(xiàn)那個(gè)討厭的連接對話框。

2,在delphi中使用sql語句。

因?yàn)閟ql語句中給字符串賦值需要用雙引號,而delphi中用單引號括起字符串,我使用遇到了一些問題。我試驗(yàn)的結(jié)果是delphi中用兩個(gè)單引號代替sql語句中的雙引號。不知道對不對?

具體如何使用,我還是不太清楚。

3,在delphi 7.0中使用ADOQuery的返回結(jié)果,書中介紹使用Params['xxxx'].AsString;

我使用后報(bào)錯(cuò),但有一個(gè)光盤的程序這樣使用沒有報(bào)錯(cuò)。我使用的是Parameters['xxxx'],也使用不了.AsString

4,原代碼:
====================================================================
if canInsert then
  begin
    with allDataModule.AQ_OtherMaterielOut do
    begin
      Close;
      SQL.Clear;
      SQL.Text:='insert otherMaterielOut(materielID,amount) values (:insertID,:insertAmount,)';
      Parameters[0].Value:=myMateriel;
      Parameters[1].Value:=myAmount; 
      ExecSQL;
    end;
    with allDataModule.AQ_OtherMaterielStock do
    begin
      Close;
      SQL.Clear;
      SQL.Text:='update otherMaterielStock set amount=amount-:updateAmount where materielID=:updateID';
      Parameters[0].Value:=myAmount;
      Parameters[1].Value:=myMateriel;
      ExecSQL;
    end;
    materielOutForm.Close;
  end;

在這段代碼之后
with allDataModule.AQ_OtherMaterielOut do
    begin
      Close;
      SQL.Clear;
      SQL.Text:='update otherMaterielStock set amount=amount-:updateAmount where materielID=:updateID';
      Parameters[0].Value:=myAmount;
      Parameters[1].Value:=myMateriel;
      ExecSQL;
    end;

不能使用allDataModule自動(dòng)顯示可以使用的控件列表功能,但我強(qiáng)加上后面的代碼仍然可以使用。怎么回事?



支持(0中立(0反對(0單帖管理 | 引用 | 回復(fù) 回到頂部

返回版面帖子列表

幾個(gè)delphi書中沒提過的數(shù)據(jù)庫問題與我的疑惑和心得(一起討論)








簽名
主站蜘蛛池模板: 久久精品国产99国产精偷| 欧美精品黑人巨大在线播放| 69p69国产精品| 公车上玩两个处全文阅读| 无码日韩人妻精品久久| 国产福利专区精品视频| 亚洲免费人成视频观看| 又大又硬又爽又粗又快的视频免费| 黄a大片av永久免费| 成人窝窝午夜看片| 日韩精品在线一区二区| 女性高爱潮真实有声视频| 国产国语在线播放视频| 久久精品国产99国产精偷| 香蕉久久夜色精品国产| 日本亚洲天堂网| 国产又粗又长又更又猛的视频 | 国产欧美久久久精品影院| 亚洲精品影院久久久久久| a级毛片高清免费视频就| 青青青青青国产免费手机看视频| 日韩午夜在线视频不卡片| 国产色在线视频| 亚洲成av人片在线观看无| 51视频国产精品一区二区| 欧美帅老头oldmangay| 天堂8中文在线最新版在线| 亚洲欧美日韩国产综合| 91精品国产高清| 被催眠暴jian的冷艳美mtxt下载| 欧美性xxxx极品高清| 天天影院成人免费观看| 人妻系列av无码专区| 久久国产成人精品国产成人亚洲| 蜜桃av噜噜一区二区三区| 美女的让男人桶爽网站| 欧美大香线蕉线伊人久久| 国产成人福利免费视频| 中日韩美中文字幕| 香蕉网在线播放| 欧美1区2区3区|