Prüfen ob Integer in Array?

[100nF]

hallo zusammen,

ich hoffe mal das ist die richtige sparte...

also ich habe ein array:
var a: Array[0..8] of Integer; nun möchte ich prüfen, ob in diesem array jede zahl von 1 bis 9 GENAU 1 MAL vorkommt.
ich wollte das so prüfen:

Delphi-Quellcode:

if 1 in a then // blabla
if 2 in a then // blabla
if 3 in a then // blabla
//...

leider geht das ja nicht mit arrays.

wie kann ich prüfen ob z.B. die Zahl 1 in dem array ist?

gruss
urbanbruhin