Aufzählungstypen For schleife

**DeluxXx**

Also ich will/muss eine For Schleife mit unterschiedlichen Aufzählungstypen aufrufen

Delphi-Quellcode:

			type

   Tlinienset = 'A'..'G' ;

   TLinienSet2 = (J,K,H,I) ;

   Tlinienset3= (B,K,I,F) ;

   TLinienSet4 = (D,J,I,H) ;

   TLinienSet5 = (L,D,C) ;

...

var

Linie : TLinienset ;

Linie2 : Tlinienset2 ;

...

for Linie:= edit1.text[1] to edit2.text[1] do

begin

...

end;

for Linie2:= edit1.text[1] to edit2.text[1] do

begin

...

end;

Problem dabei ist:
[Pascal Error] Unit1.pas(15): E2004 Identifier redeclared: 'K'
[Pascal Error] Unit1.pas(16): E2004 Identifier redeclared: 'J'
[Pascal Error] Unit1.pas(17): E2004 Identifier redeclared: 'D'

Ich muss die For schleife aber in diesen Reihenfolgen aufrufen gibt es noch eine andere möglichkeit oder kann man das Problem irgendwie beheben ?
Danke

Aufzählungstypen For schleife

Aufzählungstypen For schleife

Forumregeln