其他

//==============================================================================// 多線程查詢      cxg           2008-09-26 14:29:42//==============================================================================unit uSelect;interfaceuses  sysUtils,ADODB,

網格（Grid）控制項，可直觀描述二維資訊。因此它具有橫向和縱向二軸，就是一個二維表格。1、TCustomGrid為所有網格控制項的父類，定義了網格控制項的主要特徵和網格控制項的主要功能。在這裡，我們著重要瞭解的是它的兩個保護級（protected）方法：（1）procedure

RS-232、RS-422與RS-485串口標準簡介一、RS-232C、RS-422與RS-485的由來

//==============================================================================// ADO串連池         cxg                  2008-09-26 16:47:40//==============================================================================unit uADOPool;interfaceuses 

  //設定IP和Port  RemoteUdpConnection1.RemoteIp:=Edit1.Text;  RemoteUdpConnection1.RemoteLoginPort:=StrToInt(Edit2.Text);  RemoteUdpConnection1.RemoteDataPort:=StrToInt(Edit3.Text);  //啟動登陸(StartLogin屬於非阻塞的方法)  RemoteUdpConnection1.StartLogin;procedure

SysUtils.StrCat //把源串添加到目標串後, 要求目標串必須有足夠的空間StrCat(  Dest: PChar;        {目標串}  const Source: PChar {源串}): PChar;             {返回目標串}//測試 1:procedure TForm1.Button1Click(Sender: TObject);var  p1,p2,p3: PChar;begin  p1 := 'abc';  p2 := '123'; 

 使用 UNION 運算子組合多個結果UNION 運算子使您得以將兩個或多個 SELECT 語句的結果組合成一個結果集。使用 UNION 組合的結果集都必須具有相同的結構。而且它們的列數必須相同，並且相應的結果集列的資料類型必須相容。有關更多資訊，請參見 UNION 運算子使用指南。UNION 的指定方式如下：select_statement UNION [ALL] select_statement例如，Table1 和 Table2 具有相同的兩列結構。Table1     Table2  

function HexStrToStr(const S:string):string;//16進位字串轉換成字串var  t:Integer;  ts:string;  M,Code:Integer;begin  t:=1;  Result:='';  while t<=Length(S) do  begin   //xlh 2006.10.21    while (t<=Length(S)) and (not (S[t] in

 ADOQuery 執行預存程序並取的輸出參數   寫這個只是為了將來自查用的，呵呵，當然，不會的人也可以看看第一步建立proccreate proc MyABC @a int ,@b int, @c int output as  set @c=@a*@b在SQL中執行：declare @a int,@b int,@c int set @a=250set @b=40exec MyABC @a,@b,@c output --注意要添加output 關鍵字！select @c在D中： 

 深入淺出SQL教程之嵌套SELECT語句 嵌套SELECT語句也叫子查詢，形如： SELECT name FROM bbc WHERE region = (SELECT region FROM bbc WHERE name = 'Brazil') 一個 SELECT

//動態建立四級菜單var  MainMenu:TMainMenu;  SubMenu,SubMenu2,submenu3,submenu4:TMenuItem;  MainMenu:=TMainMenu.Create(self);  MainMenu.AutoHotkeys:=maManual;    SubMenu:=TMenuItem.Create(self);      SubMenu.Caption:='一級菜單';    MainMenu.Items.Add(SubMenu);   

DupeString重複字串 與StringOfChar的區別 StringOfChar 是反覆 "字元" 成 "字串" 的函數;DupeString 是反覆 "字串" 成 "新字串" 的函數;StringOfChar 來自 System 單元, 可以直接使用;DupeString 來自 StrUtils 單元, 使用時需要 uses StrUtils;如果僅僅是反覆 "字元", 當然應該用 StringOfChar , 它是用彙編代碼實現的, 速度會稍好一些.var  p:

{-------------------------------------------------------------------------------  過程名:    16進位數相加效驗和程式  作者:      陳新光  日期:      2008.07.24  參數:      AStr: string; AIndex: Integer(從第幾個字元開始計算)  傳回值:    string---------------------------------------------

 使用osql執行sql指令碼 @echo offecho              ╬　╱◥███◣╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬╬ echo              ╬ ︱田︱田 田 ︱　　　　　　　　　             ╬echo              ╬            綠色佳軟                          ╬echo              ╬  Copyright (c) 詠南工作室                    ╬echo  

論函數呼叫慣例　　在C語言中，假設我們有這樣的一個函數：　　　　int function(int a,int b)　　　　調用時只要用result =

 深入淺出SQL之左串連、右串連和全串連 我們介紹了表串連，更確切的說是inner joins內串連。內串連僅選出兩張表中互相匹配的記錄．因此，這會導致有時我們需要的記錄沒有包含進來。 為更好的理解這個概念，我們介紹兩個表作示範。蘇格蘭議會中的政黨表(party)和議員表(msp)。 party(Code,Name,Leader)Code: 政黨代碼Name: 政黨名稱Leader: 政黨領袖 msp(Name,Party,Constituency)Name: 議員名Party:

看新表 ASCII值  控制字元 注釋0NUT　1SOH標題開始2STX本文開始3ETX本文結束4EOT傳輸結束5ENQ詢問字元6ACK承認7BEL警示8BS(Backspace)退格9HT橫向製表10LF換行11VT垂直製表12FF走紙控制13CR(Enter)斷行符號14SO移位輸出15SI移位輸入16DLE空格17DCI裝置控制118DC2裝置控制219DC3裝置控制320DC4(Caps Lock)裝置控制4(大寫鎖定)21NAK否定22SYN

procedure EnumComPorts(Ports: TStrings);var  KeyHandle: HKEY;  ErrCode, Index: Integer;  ValueName, Data: string;  ValueLen, DataLen, ValueType: DWORD;  TmpPorts: TStringList;begin  ErrCode := RegOpenKeyEx(    HKEY_LOCAL_MACHINE,   

  Delphi中開發的DLL如何被其它開發語言隱式調用        我曾經用Delphi中開發了《IAPWS-IF97/IFC67水和蒸汽性質計算軟體包》。為了方便其它開發人 員進行進一步的熱能動力分析軟體的開發，我編製了動態連結程式庫(DLL)。其它開發人員也非專業程 序設計人員，對於動態連結程式庫的顯式動態調用使用不好(覺得雖然靈活但煩瑣)，為了協助他們用好 我開發的“水和蒸汽性質計算動態連結程式庫”，我開始對各種現代流行的程式設計語言(VC++、 C++Builder、VC#、C#

 --****************--計算id--使用//表級排它鎖//防止使用者同時修改該記錄--****************CREATE PROCEDURE GetId@xh integer,@id integer outAS /*如果想在串連一中鎖住整個表,不允許其他事務更新表中任何記錄，但可以讀取記錄，可使用HOLDLOCK選項，即(HOLDLOCK   等同於   SERIALIZABLE)  ｓｑｌ　ｓｅｒｖｅｒ　對並發的處理由它本身的鎖控制,貌似並發，其實有等待排隊的現象，