Opbyg Case i Pascal

Jeg skal have opbygget en case, hvor jeg sætter forskellige variabler true, ud fra værdien i en anden variabel.
Lige pt er det lavet med ifsætninger, som ser således ud:

If Flow > 300 and Flow < 800 then
        1Forbrug :=True;
        2Forbrug :=False;
        3Forbrug :=False;
End;

Næste if-sætning, sætter så 2'eren true og de andre false og så fremdeles. Jeg har ABSOLUT ingen anelse om, hvordan man laver det som en case, men har ladet mig fortælle at det er MÅDEN at gøre det på.

På forhånd tak for hjælpen.