Hy,
erstmal der quelltext
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| Procedure Laden;
var bla: array[1..9] of Boolean;
i: Byte;
begin
for i:= 1 to 9 Do bla[i]:= False;
bla[5]:= True;
for i:= 1 to 9 Do
If bla[i] = True Then Form1.ListBox1.Items.Add('1') else Form1.ListBox1.Items.Add('0');
mmh(bla);
end;
Procedure mmh(bla: array of Boolean);
var i: Byte;
begin
for i:= 1 to 9 Do
If bla[i] = True Then Form1.ListBox2.Items.Add('1') else Form1.ListBox2.Items.Add('0');
end; |
so nun das problem in der Prozedur Laden setze ich den wert bla[5] auf True
dann geb ich den array an die prozedure mmh weiter aber dort wird der bla[4] auf True gesetz, woran kann das liegen? und wie änder ich das das dort auch bla[5] True ist?
das ganze mit den listboxen drum rum ist nur damit ich den fehler finde und ihr euch auch mal ein bild von machen könnt falls ich es etwas unglücklich formuliert habe
hoffe mir kann jemand helfen, danke
ich verwend d3 Pro falls es relevant ist
raziel