Überprüfen mehrerer Comboboxen

[snears]

Guten Abend, ich bin wieder auf ein Problem gestoßen und zwar wollte ich mehrere Comboxen mit einmal überprüfen und das ohne viel schreibkram. Ich hoffe sowas geht, ich hatte zwar eine Idee aber die wollte nicht funktionieren.

Delphi-Quellcode:

function changeColor :string;
var x,: integer;
    GkPunkte: string;
begin

 x:=1;

 
for x:= 1 to 10 do

if GkPunkte(x):= clred

then showmessage ('Alle Felder mit roter Farbe wurden mit 0 Punkten belegt.')

x:= GkPunkte(x)+x

;

hoffe das es so richtig ist, aber er sagt halt immer undefinierter bezeichner GkPunkte;


Schonmal jetzt Danke