최대 256개의 원소(0..255)를 가질 수 있고 in이라는 예약어를 지원해서 님이 원하시는 포함개념을 쉽게 적용할 수 있습니다. 열거형이나 부분범위형과 함께 쓰면 보기에도 쉽습니다...
type
TWeek = (Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday);
TWeeks = set of TWeek;
var
Compare: TWeeks;
Value: TWeeks;
Week: TWeek;
begin
Compare := [Sunday, Tuesday, Wednesday];
Value := Sunday;
if Value in Compare then
ShowMessage('Included...');
end;
비트연산에서 Compare란 변수에 Value란 비트들이 셋팅되었을 때를 말한다면... 간단히 비트연산 하세요...
if (Compare and Value) = Value then
ShowMessage('Included...');
포함되었다는 의미가 불분명하군요...
이게 집합에서 원소가 어떤 집합에 속해있을때를 말한다면...
데이터 형중에 집합이 있습니다. 써보세요...
최대 256개의 원소(0..255)를 가질 수 있고 in이라는 예약어를 지원해서 님이 원하시는 포함개념을 쉽게 적용할 수 있습니다. 열거형이나 부분범위형과 함께 쓰면 보기에도 쉽습니다...
type
TWeek = (Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday);
TWeeks = set of TWeek;
var
Compare: TWeeks;
Value: TWeeks;
Week: TWeek;
begin
Compare := [Sunday, Tuesday, Wednesday];
Value := Sunday;
if Value in Compare then
ShowMessage('Included...');
end;
비트연산에서 Compare란 변수에 Value란 비트들이 셋팅되었을 때를 말한다면... 간단히 비트연산 하세요...
if (Compare and Value) = Value then
ShowMessage('Included...');
^^ 항상 즐코하세요...