Ich war dabei ein schönes Programm zuschreiben als irgendwann Delphi Fehler gemeldet hat die vorher noch nicht da warn.
Vielleicht hab ich mich aber auch geirrt, aber was ist an dieser mimi-Procedure bitt falsch?
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
quer := 0;
for i := 1 to length(edit1.Text) do quer := quer + strtoint(copy(edit1.Text,i,1)) ;
edit2.Text := inttostr(quer);
end;
quer ist als integer deklariert.
er meldet in der Zeile mit der Schleife einen Fehler wegen inkopatibler Typen.
[edit=Christian Seehase]Titel geändert. Mfg, Christian Seehase[/edit]