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


  共有9506人關注過本帖樹形打印

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

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


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

1,ADOConnection和ADOTable在delphi中的使用

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

修改步驟:將LoginPrompt設置為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('數據庫連接有誤!!請檢查DataConfig.XML',mtConfirmation,[mbOk],0);
    Application.Terminate;
  end;

這樣程序運行起來,連接數據庫是沒有問題的。但出現的問題是在dlephi中ADOTable控件是不能連接表的,因為ConnectionString屬性沒有值。報錯為“無效的授權說明”。如何既能在delphi中使用ADOConnection和ADOTable控件,又可以不出現那個討厭的連接對話框。

2,在delphi中使用sql語句。

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

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

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

我使用后報錯,但有一個光盤的程序這樣使用沒有報錯。我使用的是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自動顯示可以使用的控件列表功能,但我強加上后面的代碼仍然可以使用。怎么回事?



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

返回版面帖子列表

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








簽名
主站蜘蛛池模板: 欧美性活一级视频| 国产成人av乱码在线观看| 欧美亚洲国产片在线播放| 美女扒开屁股让男人桶爽免费| 亚洲伊人久久大香线蕉结合| AAAAA级少妇高潮大片免费看| 中文字幕无线码一区| 亚洲酒色1314狠狠做| 国产床戏无遮挡免费观看网站| 性xxxxhd高清| 日本按摩xxxxx高清| 曰批全过程免费视频网址| 翘臀少妇被扒开屁股日出水爆乳| jlzzjlzz欧美大全| 亚洲国产精品尤物yw在线观看| 国产一区二区精品久久凹凸| 在线观看免费a∨网站| 日韩欧美三级在线| 波多野结衣一区二区三区88| 草草浮力影院第一页入口| 四虎永久在线观看视频精品| 91麻豆国产自产| www.jizz在线观看| 中文全彩漫画爆乳| 两领导在车上吃我的奶| 亚洲午夜久久久影院伊人| 免费网站看av片| 国产午夜福利在线观看视频| 国模吧双双大尺度炮交gogo| 尹人香蕉久久99天天| 日韩不卡视频在线| 欧美日韩不卡中文字幕在线| 狠狠97人人婷婷五月| 特级毛片全部免费播放| 男女边摸边吃奶边做免费观看| 丰满大白屁股ass| 99RE66在线观看精品免费| 久久6这里只有精品| 亚洲午夜国产精品无卡| 人人澡人人澡人人看添av| 伊人久久久大香线蕉综合直播|