Hallo,
ich habe diese Arrays in meiner neuen Komponente,
Delphi-Quellcode:
ZeichenListe1, ZeichenListe2 : Array[1..223] of char;
ZeichenListe2_1 : Array[1..112] of Char;
ZeichenListe2_2 : Array[1..111] of char;
ZeichenListe2_1_2, ZeichenListe2_2_2 : Array[1..56] of Char;
ZeichenListe2_1_1, ZeichenListe2_2_1 : Array[1..55] of Char;
Ich lade in ZeichenListe1 und ZeichenListe2 alle wesentlichen Zeichen rein.
Delphi-Quellcode:
y:=1;
for i:=032 to 255 do
begin
ZeichenListe1[y]:=char(i);
Y:=y+1;
end;
y:= 223;
for i:=255 downto 032 do
begin
ZeichenListe2[y]:=char(i);
Y:=y-1;
end;
Nun, kopiere ich die erste Hälfte von Zeichenliste2 in Zeichenliste2_1, und die Zweite Hälfte in Zeichenliste2_2.
Delphi-Quellcode:
for i:= 1 to 112 do
begin
ZeichenListe2_1[i]:= Zeichenliste2[i];
end;
for i:= 112 to 223 do
begin
ZeichenListe2_2[i]:= Zeichenliste2[i];
end;
Jetzt teile ich noch einmal jedes Array durch zwei.
Delphi-Quellcode:
for i:= 1 to 56 do
begin
ZeichenListe2_1_1[i]:= Zeichenliste2_1[i];
end;
for i:= 56 to 112 do
begin
ZeichenListe2_1_2[i]:= Zeichenliste2_1[i];
end;
for i:= 1 to 55 do
begin
ZeichenListe2_2_1[i]:= Zeichenliste2_2[i];
end;
for i:= 55 to 111 do
begin
ZeichenListe2_2_2[i]:= Zeichenliste2_2[i];
end;
So, und zum Schluss möchte ich die Arrays in einer anderen reihen folge wieder zusammen setzen,
ZeichenListe2:= Zeichenliste2_2_2+Zeichenliste2_2_1+Zeichenliste2_1_2+Zeichenliste2_1_1;
doch da bekomme ich immer den Fehler, "E2010 Inkompatible Typen: 'Array' und 'ShortString'". Doch ich habe da doch nur Arrays oder??
wenn icht wie verwandle ich die/den ShortString/s wieder in Arrays??