Ich versuche es schon die ganze Zeit hinzubekommen die einzelnen Shapes dem Array zuzuordnen, aber es klappt nicht:
Delphi-Quellcode:
Shape[1] := Shape52 ;
Shape[2] := Shape53 ;
Shape[3] := Shape54 ;
Shape[4] := Shape55 ;
Shape[5] := Shape56 ;
Shape[6] := Shape57 ;
Shape[7] := Shape58 ;
Shape[8] := Shape59 ;
Shape[9] := Shape60 ;
Shape[10] := Shape61 ;