Fehlermeldung: Inkompatibler Typ.

[Alexander Roth]

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. :gruebel:

[edit=Christian Seehase]Titel geändert. Mfg, Christian Seehase[/edit]

[axelf98]

Eine Zählvariable wie "i" muss lokal sein, d.h. unter var der Prozedur deklariert sein!

[sakura]

:warn: Ändere bitte den Titel, so daß dieser die Problematik erahnen lässt :!:

...:cat:...

[Alexander Roth]

OK, geht aber nicht mehr da älter als 1440 Min.
Die Procedure soll die Quersumme der Zahl in edit1 ermitteln und in edit2 ausgeben.

[Christian Seehase]

Moin Alexander,

Zitat:

Zitat von Alexander Roth

Die Procedure soll die Quersumme der Zahl in edit1 ermitteln und in edit2 ausgeben.

also die Routine funktioniert doch einwandfrei.
Da Du nur i nicht näher erläutert hast gehe ich mal davon aus, dass Du diese Variable nicht korrekt deklariert hast.

[MrKnogge]

Zitat:

Zitat von Christian Seehase

Da Du nur i nicht näher erläutert hast gehe ich mal davon aus, dass Du diese Variable nicht korrekt deklariert hast.

japs,sollte dann ungefair so aussehen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var
  i: integer; // hier deklarieren !
begin 
  quer := 0; 
  for i := 1 to  length(edit1.Text) do quer := quer + strtoint(copy(edit1.Text,i,1)) ; 
  edit2.Text := inttostr(quer); 
end;

PS & OT: Wie kann ich wörter inherhalb der Delphi-Tags färben :gruebel:

[Christian Seehase]

[OT]
Moin MrKnogge,

Zitat:

Zitat von MrKnogge

Wie kann ich wörter inherhalb der Delphi-Tags färben :gruebel:

Gar nicht, dafür müsstest Du die PRE Tags verwenden ([ PRE] und [/PRE])
[/OT]

[Alexander Roth]

Hab ich schon gemacht. Geht trotzdem noch nicht. Bin super ratlos!!! :(

[Christian Seehase]

Moin Alexander,

wenn Du es so gemacht hast, wie MrKnogge es geschrieben hat, kann der Fehler eigentlich nicht mehr auftreten.
Dann müsste der Fehler ganz woanders liegen.

Könntest Du vielleicht mal den Source hier gezippt als Attachment anhängen? (ohne DCUs und EXE)

[Alexander Roth]

Oh mist...
Tut mir echt leid, ich muss da irgendetwas falsch gemacht haben. Habe nämlich bisschen die dazugehörigen Dateien hin und herkopiert. Ich war mir nämlich ganz sicher dass ich die Delklination der Variable dazugeschrieben habe.
Jedenfalls klappt es jetzt und super vielen Dank!!!!!!!!
:lol:

Tschau!!!