제 사례 설명문이 쓰여지는 방식이 정확히 잘못되었다는 것을 알려주십시오. 내가 잘못 본 건 없지만 컴파일러는 HatchSytle.Horizontal이있는 줄에 "Duplicate case item : '0',"이라는 오류를 계속 발생시킵니다. 그 줄을 주석 처리하면 오류없이 컴파일되고 컴파일됩니다.중복 케이스 항목 : "0"
당신이 볼 수 있듯이, 내가 확인하고있는 요소 중 어느 것도 동일하지 않습니다. 그래서 나는 어떤 오류도 있어서는 안된다. 내가 틀렸다면 나를 바로 잡아라.
case TMakerGraphic(obj).theBrushStyle of
HatchStyle.Min: BrushStyleCombo.SelectedIndex := 1;
HatchStyle.ZigZag: BrushStyleCombo.SelectedIndex := 0;
HatchStyle.BackwardDiagonal: BrushStyleCombo.SelectedIndex := 2;
HatchStyle.ForwardDiagonal: BrushStyleCombo.SelectedIndex := 3;
HatchStyle.Cross: BrushStyleCombo.SelectedIndex := 4;
HatchStyle.DiagonalCross: BrushStyleCombo.SelectedIndex := 5;
HatchStyle.Horizontal: BrushStyleCombo.SelectedIndex := 6; <<<< Line raising error.
HatchStyle.Vertical: BrushStyleCombo.SelectedIndex := 7;
end;
감사
이것은 파스칼에서 각각의 경우에 break 문을 추가하지 않아도된다는 것을 상기시켜줍니다 ... –
@ vc74, 매우 멋지 답니다. – ThN