Convert Excel column to integer funtion with Delphi

See also: How to convert a column number (eg. 127) into an excel column (eg. AA)


Delphi code below:

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

function ColumnNumber(A_ColAddress: string): Integer; var   _Digits: array of Integer;   _Pos: Integer;   _Mul, _Res: Integer; begin   SetLength(_Digits, Length(A_ColAddress));   for _Pos := 0 to Length(A_ColAddress)-1 do   begin     _Digits[_Pos] := Ord(A_ColAddress[_Pos+1]) - 64;   end;     _Mul := 1;   _Res := 0;   for _Pos := Length(A_ColAddress)-1 downto 0 do   begin     _Res := _Res + (_Digits[_Pos] * _Mul);     _Mul := _Mul * 26;   end;     Result := _Res; end;

Visual Studio 主題和配色

請參閱：

Visual Studio 主題與配色方案

DataSnap Server 開發上可參考的資源

Building, debugging, and deploying a DataSnap/REST ISAPI dll

Tutorial: Using a DataSnap Server with an Application

Delphi XE – Datasnap Filter problems

Delphi XE Disconnect or Terminate a datasnap client session

Building the DataSnap Server (Service)

==使用純HTTP的呼叫技術==
DataSnap REST
Delphi XE2: How to define custom DataSnap REST URI?
ex: http://website/ISAPI_DIR/dsisapi.dll/datasnap/rest/TServerMethods1/ReverseString/ABC

使用 DataSnap 開發，是否要選擇 HTTPS？

最近和我們家的網管討論 WebService 應該用 TCP/IP 還是 HTTP。

但意外的是，我們家網管推薦使用 HTTPS 開發

但我想他應該沒想到後續的域名、金鑰賞味期限製作有多麻煩

不過更重要的是數位簽章的費用啊啊啊 >"< |||