日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

20150504-日报

發布時間:2023/12/18 编程问答 34 豆豆
生活随笔 收集整理的這篇文章主要介紹了 20150504-日报 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
1、Delphi中的存儲過程 參數 數據類型Delphi7中的使用存儲過程的話,加入要獲取輸入參數的話,一般都是通過這樣的方式:
  • with spDelRights do
  • begin
  • if Active then Close;
  • Parameters.Clear;
  • Parameters.Refresh;
  • Parameters.ParamByName('username').Value:= edtUserName.Text; //當前界面的輸入框
  • Parameters.ParamByName('menuid').Value:= DelRight.menu_id;
  • prepared:=true;
  • execProc;
  • MessageDlg('取消授權成功!',mtInformation,[mbOK],1);
  • end;
  • 不知道為什么對于以下string類型的或發現參數值錯誤(在sql環境下直接執行sql腳本是沒有任何問題的);不知道什么原因(注:上面的代碼是正確的執行的,這里只是表示以下,因為錯誤的已經被我刪除了,但是忘了對比),不過有一種這種執行存儲過程的執行方式:直接使用查詢用的插件,然后將sql語句寫為:call 存儲過程名稱(參數列表)
    2、在數據輸入時校驗數據的合法性(一般第一種):設計思路:凡是擁護輸入非法數據的方式有兩種方式:? ? 1、禁止用戶輸入輸入非法數據,即屏蔽掉鍵盤上的一些鍵;
    ? ? 2、在用戶輸入非法數據后,顯示提醒信息,并清空數據;
    實現:通過實現鍵盤按鍵的監聽方法
  • procedure TfrmEditInfo.edtIDKeyPress(Sender: TObject; var Key: Char);
  • begin
  • if not (((key >= #48) and (key <= #57)) or (Key = '.')or (key = #8)) then
  • Key := #0;
  • //以上判斷條件是:非 數字 小數點
  • //中文句號是缺陷 --已解決,只要正常的'.'判斷即可!無需想太多
  • end;
  • 監聽鍵值的方式:? ? 1、ASCII碼與key值對比;
    ? ? 2、如果是個別的還或者有中英文區別的就可以使用:
  • if key ='?' then //直接對字符對比,因為key的數據類型是char

  • ? ??



    來自為知筆記(Wiz)

    轉載于:https://www.cnblogs.com/ufindme/p/4477758.html

    總結

    以上是生活随笔為你收集整理的20150504-日报的全部內容,希望文章能夠幫你解決所遇到的問題。

    如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。