On Sun, 20 Jan 2013 18:43:44 +0100
Sven Barth <[email protected]> wrote:

> On 20.01.2013 18:40, Eric Kom wrote:
> > Good afternoon all,
> >
> > Please after write the above procedure, I received the errors: Upper
> > bound of case range is less than lower bound and duplicate case label
> >
> > procedure DisplayGrade(Sender: TObject);
> > var
> >    grade    : String;
> >    tuitionFee: String;
> >    gradeSelected: String;
> > begin
> >     gradeSelected := cbbGradeList.Items[cbbGradeList.ItemIndex];
> >     case gradeSelected of
> >          '12'..'12': tuitionFee := '14500.00';
> 
>             ^       ^   This should be easy to spot...

Maybe changing the message to "lower or equal" would help?

Mattias

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to