Forum: Object-Pascal / Delphi-Language
Delphi
by Alexander Roth,
24. Jun 2004
Hab ich schon gemacht. Geht trotzdem noch nicht. Bin super ratlos!!! :(
Forum: Object-Pascal / Delphi-Language
Delphi
by Alexander Roth,
22. Jun 2004
OK, geht aber nicht mehr da älter als 1440 Min.
Die Procedure soll die Quersumme der Zahl in edit1 ermitteln und in edit2 ausgeben.
Forum: Object-Pascal / Delphi-Language
Delphi
by Alexander Roth,
21. Jun 2004
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? :?:
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 :=...