Hi,
was mir auffällt, ist dass du auch nur bei der ersten edit-box auf das selected eingehst.
klammer das setzen der edit-boxen mal in begin/end (für das if)...
Delphi-Quellcode:
E:=-1;A:=1; D:=1; G:=1; H:=-1; E2:=-1;
for i:=0 to 11 do
begin
E:=E+1; A:=A+1; D:=D+1; G:=G+1; H:=H+1; E2:=E2+1;
...
wenn das nicht ist:
du setzt die werte ja auch immer gleich und gehst nicht darauf ein, was ausgewählt ist
der einzige punkt, wo darauf eingegangen wird ist beim setzen der edit-boxen...
vielleicht solltest du zeigen, was in der edit-box steht und welche Werte du erwartest bei welchem Item...
so eine wertetabelle
Gruß Frank