procedure TForm1.Button1Click(Sender: TObject);
Var IM : Array[0..69560] Of Char;
MyIndex : Integer;
begin
MyIndex := ComboBox1.ItemIndex;
Case MyIndex Of
0 : IM := '60';
1 : IM := '300';
2 : IM := '600';
3 : IM := '3000';
4 : IM := '6000';
End;
end;
를 실행시키면
Too many costants, User shorter procedure 라고 에러가 나네요.
이게 무슨뜻이죠?