線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1347
推到 Plurk!
推到 Facebook!

字串與Cardinal的類型轉換

尚未結案
cwc65536
初階會員


發表:47
回覆:121
積分:48
註冊:2004-10-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-07-20 06:46:47 IP:58.114.xxx.xxx 訂閱
請教各位先進

字串轉換成整數有 StrToIntDef 函數

可是要轉換成 Cardinal 怎麼辦 ?
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2010-07-31 08:45:45 IP:114.27.xxx.xxx 未訂閱
這是你要的嗎?

[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var a1: cardinal;
a2, a3: integer;
a4: longword;
b2, b3: string;

begin
// cardinal to int to str
a2:= 1;
a3:= 2;
a1:= a2 a3;
showmessage(inttostr(a1));


// string to int to cardinal
b2:= '5';
b3:= '6';
a1:= StrtoIntDef(b2,0) StrtoIntDef(b3,0);
showmessage(inttostr(a1));
end;
[/code]

cwc65536
初階會員


發表:47
回覆:121
積分:48
註冊:2004-10-14

發送簡訊給我
#3 引用回覆 回覆 發表時間:2010-08-01 20:19:20 IP:58.114.xxx.xxx 訂閱
我是想在 RunTime 時期, 利用外部參考資料改變 Timer.Interval
因為 Timer.Interval 型別是 Cardinal
而讀到的外部資料是 string

改變 Timer.Interval 的 event 是放在 Form1.create
結果, 會出現錯誤訊息,

-----不好意思, 不會貼圖 -----
<meta content="text/html; charset=utf-8" http-equiv="Content-Type" /><meta content="Word.Document" name="ProgId" /><meta content="Microsoft Word 9" name="Generator" /><meta content="Microsoft Word 9" name="Originator" /><link href="file:///C:/DOCUME~1/ofey/LOCALS~1/Temp/msoclip1/01/clip_filelist.xml" rel="File-List" /><link href="file:///C:/DOCUME~1/ofey/LOCALS~1/Temp/msoclip1/01/clip_editdata.mso" rel="Edit-Time-Data" /><!--[if !mso]> <style> v\:* {behavior:url(#default#VML);} o\:* {behavior:url(#default#VML);} w\:* {behavior:url(#default#VML);} .shape {behavior:url(#default#VML);} </style> <xml> Normal 0 0 2 </xml><![endif]--><style type="text/css"> <!-- /* Font Definitions */ @font-face {font-family:新細明體; panose-1:2 2 3 0 0 0 0 0 0 0; mso-font-alt:PMingLiU; mso-font-charset:136; mso-generic-font-family:roman; mso-font-pitch:variable; mso-font-signature:3 137232384 22 0 1048577 0;} @font-face {font-family:"\@新細明體"; panose-1:2 2 3 0 0 0 0 0 0 0; mso-font-charset:136; mso-generic-font-family:roman; mso-font-pitch:variable; mso-font-signature:3 137232384 22 0 1048577 0;} /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0cm; margin-bottom:.0001pt; mso-pagination:none; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:新細明體; mso-font-kerning:1.0pt;} /* Page Definitions */ @page {mso-page-border-surround-header:no; mso-page-border-surround-footer:no;} @page Section1 {size:612.0pt 792.0pt; margin:72.0pt 90.0pt 72.0pt 90.0pt; mso-header-margin:36.0pt; mso-footer-margin:36.0pt; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style><span lang="EN-US" ="miter" />
P.D.
版主


發表:603
回覆:4038
積分:3874
註冊:2006-10-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2010-08-02 22:01:05 IP:111.255.xxx.xxx 未訂閱
其實  timer1.interval 利用 integer 宣告也是可以用的, 或者你放的位置不對
不要放在 oncreate中, 放在 onactive 上或者參考討論關鍵字 startrun , 可以解決一些希望在create可以指定但卻又不能放在 create 上宣告的東東!
===================引 用 cwc65536 文 章===================
我是想在 RunTime 時期, 利用外部參考資料改變 Timer.Interval
因為 Timer.Interval 型別是 Cardinal
而讀到的外部資料是 string

改變 Timer.Interval 的 event 是放在 Form1.create
結果, 會出現錯誤訊息,




系統時間:2024-04-26 11:44:42
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!