Delphi 安裝次數超過解決方案!

購買 Embarcadero的Delphi XE3之後,因為硬碟操掛的原因!陸續重新安裝過幾次,昨天換了新的電腦後,發現無法線上註冊成功。

登入 https://reg.codegear.com/srs6/activation.do ,註入註冊碼以及登入EDN帳號後。

registrationcount01

 

 

 

 

點選 View extended serial number details

registrationcount02

 

接著發現已經超過預設的三次了

registrationcount

因為我是換電腦不是亂七八糟多安裝的,所以就到客服 http://www.embarcadero.com/support 然後點選”Registration & Installation”

support1

 

 

接著點選 Request a registration limit increase,接著點選原因送出就可以了。

support2

 

原本台灣捷康的Lucy告訴我說需要3~5個工作天,不過早上九點多提出後下午二點多就收到mail回覆了!

registrationcount09

這次要感謝台灣捷康科技(Qcom)的Lucy協助,雖然當初XE3是跟已經收掉的興德資訊買的,不過Lucy不厭其煩的幫忙解答 🙂  才能很快的解決

 

捷康科技股份有限公司 www.qcomgroup.com.tw

許玉香  Lucy Hsu
電話:886-2-2365-0238傳真:886-2-2365-0196
E-mail: Lucyhsu@qcomgroup.com

地址:10647台北市羅斯福路三段 149 號10樓

 

Delphi隨機產生英文大小寫、數字

Delphi如何透過隨機的函數產生英文大寫、英文小寫以及數字呢?
方法很簡單

[pascal]
// 英文小寫
Randomize;
S := Chr(ord(‘a’) + Random(26));
[/pascal]

[pascal]
// 英文大寫
Randomize;
S := Chr(ord(‘A’) + Random(26));
[/pascal]

[pascal]
// 數字
Randomize;
S := Chr(ord(‘0’) + Random(10));
[/pascal]