全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1607
推到 Plurk!
推到 Facebook!

type 宣告時的初值問題

 
adonis
高階會員


發表:140
回覆:258
積分:159
註冊:2002-04-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2006-09-11 11:51:51 IP:210.201.xxx.xxx 訂閱

各位前輩 ~

我使用 type TcMouse = (mdLeft = 1, mdTop = 2, mdRight = 3, mdBottom = 4);

編譯時會出現錯誤..我記得在宣告時是可以給定初值的呀,不知是哪忽略了?

謝謝

------
我也在努力學習中,若有錯謬請見諒。
h@visli
資深會員


發表:103
回覆:429
積分:431
註冊:2004-02-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2006-09-12 15:05:53 IP:58.61.xxx.xxx 未訂閱

沒有問題啊。聲明一個枚舉類型,是可以指定序號值的。你把你的代碼貼出來看看。

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;

type
TcMouse = (mdLeft = 1, mdTop = 2, mdRight = 3, mdBottom = 4);

TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

end.


===================引 用 文 章===================

各位前輩 ~

我使用 type TcMouse = (mdLeft = 1, mdTop = 2, mdRight = 3, mdBottom = 4);

編譯時會出現錯誤..我記得在宣告時是可以給定初值的呀,不知是哪忽略了?

謝謝

------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------
adonis
高階會員


發表:140
回覆:258
積分:159
註冊:2002-04-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2006-09-12 15:22:55 IP:210.201.xxx.xxx 訂閱

謝謝您熱心的回應 ~

我在想是不是版本的問題.. 你所使用的是否為 D6 的環境?我所使用的是 D5 的環境..

我開一個專案,什麼都沒做,只單純的宣告該行就編譯錯誤了...

[Error] Unit1.pas(9): ',' or ')' expected but '=' found

以上,謝謝 ~

------
我也在努力學習中,若有錯謬請見諒。
h@visli
資深會員


發表:103
回覆:429
積分:431
註冊:2004-02-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2006-09-13 08:58:22 IP:58.61.xxx.xxx 未訂閱

可能在D5中不支持這麼聲明。我用的是D7

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