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

    Rss & SiteMap

    曙海教育集團論壇 http://www.bjzhda.cn

    曙海教育集團論壇
    共1 條記錄, 每頁顯示 10 條, 頁簽: [1]
    [瀏覽完整版]

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

    1樓
    wangxinxin 發表于: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自動顯示可以使用的控件列表功能,但我強加上后面的代碼仍然可以使用。怎么回事?


    共1 條記錄, 每頁顯示 10 條, 頁簽: [1]

    Copyright © 2000 - 2009 曙海教育集團
    Powered By 曙海教育集團 Version 2.2
    Processed in .01563 s, 2 queries.
    主站蜘蛛池模板: 亚洲免费人成视频观看| 国产国产东北刺激毛片对白| 丰满少妇高潮惨叫久久久| 校花被扒开尿口折磨憋尿| 免费真实播放国产乱子伦| 车车好快的车车流水网站入口| 国内免费在线视频| 中文字幕日韩专区| 日韩中文字幕免费在线观看| 亚洲精品99久久久久中文字幕| 精品久久久久香蕉网| 国产妇女乱一性一交| 97久久精品一区二区三区| 好大好爽快点视频| 久久伊人色综合| 日韩美aaa特级毛片| 亚洲精品国产高清不卡在线| 精品久久久久久久免费人妻| 国产在线无码精品电影网| 91久久香蕉国产线看观看软件| 好男人在线社区www在线视频一| 久久精品一区二区免费看| 极品丝袜乱系列在线阅读| 亚洲美女色在线欧洲美女| www.亚洲成在线| 成人福利在线视频| 久久综合色视频| 最近高清中文在线字幕在线观看| 人人狠狠综合久久亚洲| 精品久久中文字幕有码| 国产亚洲精品精品国产亚洲综合| 2021国产精品一区二区在线| 国内一级纶理片免费| 一区二区三区观看| 成人a在线观看| 久久天天躁狠狠躁夜夜爽| 日韩精品在线一区二区| 亚洲日韩欧美综合| 欧美视频在线播放bbxxx| 免费看美女吃男生私人部位| 精品视频www|