<dfn id="is4kg"></dfn>
  • <ul id="is4kg"></ul>
  • <abbr id="is4kg"></abbr>
  • <ul id="is4kg"></ul>
    <bdo id="is4kg"></bdo>

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


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

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

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


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








    簽名
    主站蜘蛛池模板: 国语free性xxxxxhd| 欧美一卡2卡3卡4卡公司| 国产成人免费全部网站| 一本大道一卡2卡三卡4卡麻豆| 曰批免费视频播放30分钟直播| 免费播放在线日本感人片| 被男按摩师添的好爽在线直播| 国内精品久久久久久久影视| 中日韩一区二区三区| 曰批视频免费40分钟试看天天| 免费人成在线观看视频播放| 美女视频黄频a免费观看| 国产精品一级片| а√天堂资源8在线官网在线| 无码办公室丝袜OL中文字幕| 亚洲免费在线观看视频| 波多野结衣aa| 嗨动漫在线观看| 青娱乐国产视频| 国产精品无码V在线观看| yy11111光电影院手机版| 成年免费A级毛片免费看| 亚洲一区二区三区影院| 欧美精品黑人粗大视频| 啊灬啊灬啊灬快灬深一| 调教奴性同桌h| 国产精品亚洲一区二区三区在线| 一区二区三区无码高清视频| 我的好妈妈6中字在线观看韩国| 亚洲中字慕日产2021| 欧美最猛黑人xxxx黑人猛交98 | 一级做a爰片欧美一区| 搞黄网站免费看| 亚洲AV无码国产一区二区三区| 欧美午夜精品久久久久免费视 | 嘟嘟嘟www在线观看免费高清| 阿娇囗交全套高清视频| 国产精品亚洲а∨无码播放| bt自拍另类综合欧美| 成年福利片120秒体验区| 久久综合欧美成人|