मैं डेल्फी सेट कैसे भरूं?

Question

यदि मेरे पास के सेट के रूप में परिभाषित एक प्रकार है, तो एक विस्तृत प्रकार है, [] के साथ एक खाली सेट बनाना आसान है, लेकिन मैं पूर्ण सेट कैसे बना सकता हूं?

संपादित करें: हाँ, स्पष्ट समाधान लूप का उपयोग करना है। अगर कोई दूसरा तरीका है तो यह भी वास्तव में एक बुरा समाधान है। क्या किसी को ऐसे तरीके से पता है जो निरंतर समय में काम करेगा?

Answer 1

कम() और उच्च() "संकलक जादू" कार्यों कि संकलन समय पर मूल्यांकन किया जा सकता है।

 
var 
    MySet : TBorderIcons; 
    MySet2 : TBorderIcons; 
const 
    AllIcons : TBorderIcons = [Low(TBorderIcon)..High(TBorderIcon)]; 
begin 
    MySet := [Low(TBorderIcon)..High(TBorderIcon)]; 
    MySet2 := AllIcons; 
end; 

Answer 2

प्रति बैरी सुझाव:

FillChar(VarSet, SizeOf(VarSet), $FF);