10-10-2010, 02:39 PM
استبدل السطرين:
بـ
بالتوفيق.
كود :
j:= j + Ord(A[i]);
Edit1.Text:=IntToStr(i);كود :
j:= j + [color=Blue]StrToInt[/color](A[i]);
Edit1.Text:=IntToStr([color=Blue]j[/color]);
