Delphi-Quellcode:
gk1 := StrToInt (Edit28.Text);
gk2 := StrToInt (Edit27.Text);
gk3 := StrToInt (Edit26.Text);
gk4 := StrToInt (Edit38.Text);
gk5 := StrToInt (Edit36.Text);
gk6 := StrToInt (Edit35.Text);
gk7 := StrToInt (Edit34.Text);
gk8 := StrToInt (Edit33.Text);
gk9 := StrToInt (Edit32.Text);
gk10 := StrToInt (Edit41.Text);
gk11 := StrToInt (Edit18.Text);
gk12 := StrToInt (Edit19.Text);
gk13 := StrToInt (Edit20.Text);
gk14 := StrToInt (Edit22.Text);
gk15 := StrToInt (Edit21.Text);
gk16 := StrToInt (Edit25.Text);
gk17 := StrToInt (Edit24.Text);
gk18 := StrToInt (Edit31.Text);
gk19 := StrToInt (Edit30.Text);
gk20 := StrToInt (Edit29.Text);
gk21 := StrToInt (Edit40.Text);
gk22 := StrToInt (Edit23.Text);
wtf?
ich versuch mal das programm vernünftig zu schreiben....