1樓：匿名使用者
沒明白你的意思，我理解的with用法都是用在結構或者類中，你使用with 列舉變數 do的意義何在？
另外，對於列舉變數如果你確切知道其值，例如你例子中的ca = 1，則使用minerals(1)表示ca應該沒有問題，不過你定義的列舉變數的名稱太容易和變數重複，會引起不可預料的編譯錯誤，建議前面加上字首碼，比如：ca -> mini_ca，i -> mini_i等
如果在賦值中需要和integer轉換，還可以使用ord函式，取得列舉變數在列舉序列中的位置資訊，當然也可以強制轉換。
2樓：匿名使用者
type minerals=(ca,p,mg,cl,k,na,su,co,cu,i,fe,mn,se,zn,mo,vita,vitd,vite);
var//定義變數
temminerals :minerals;
begin
//賦值
temminerals := ca;
//判斷
if temminerals =ca thenbegin
//...
showmessage('ca');
end else
begin
showmessage('xx')
//...
end;
end;
3樓：
不可以with minerals[1] do
end;
關於delphi的簡單問題，Delphi的8個技巧
000001 說明它是一個字串，只要。vari integer str string beginfor i 1 to 99 if i 10 then str 00000 inttostr 1 else if i 10 and i 100 then str 0000 i 如果數字還可能大於99，就接著...
Delphi做呼叫Bpl包 包含窗體 的Exe框架提示找不到類
只可能是兩個原因 1 這個類未註冊 2 主程式 exe程式 沒有勾選build with run package 因為你沒有在bpl裡面註冊這個類 delphi 如何呼叫bpl 好幾年，都忘記差不多了，我空間內好像有很多。如何用delphi製作bpl包 gcm3構造時間長的問題由來已久。伴隨著時間的...
關於手機的呼叫等待功能
手機自帶的，不收任何費用。一，假如你開啟呼叫等待，在你 處於通話狀態時又有第三者打你 你會看到新來電號碼或人名，1.你可以選擇暫停你之前的通話 讓和你通話的人別掛 稍等你一下 和新來電通話，完畢後可以切換到之前的通話。2.你可以拒接新來電，當前的通話不受影響。3.你可以不用理新來電.繼續當前通話.與...