13 stellige zahl bearbeiten

[Ferber]

13-Stellige Zahl - Klingt irgendwie nach EAN und Checksumm modulo 10

[Schaedel]

Ohman ...
Ach komm scheiß drauf hier der Code -.-

Delphi-Quellcode:

Var 
  meinstring : string;
  Zahl,i : integer;
begin
  meinstring := Edit1.text ;
  for i := 1 to length(meinstring) do
    Zahl := strtoint(Meinstring[i]);
    // bearbeitungsprozedure
  end;

end;

sorry an die anderen ich konnt nich zusehen -.-

[dfried]

Zitat von Schaedel:

Delphi-Quellcode:

Var 
  meinstring : string;
  Zahl,i : integer;
begin
  meinstring := Edit1.text ;
  for i := 1 to length(meinstring) do
  begin // <-- das hat gefehlt
    Zahl := strtoint(Meinstring[1]);
    // bearbeitungsprozedure
  end;

end;

Ein Begin hat noch gefehlt

Zitat von Schaedel:

sorry an die anderen ich konnt nich zusehen -.-

Und wieder ist einer schwach geworden.

[alzaimar]

Zitat von dfried:

Und wieder ist einer schwach geworden.

Buuuuuh! Spalter!

Verft ten Purchen chu Poden!

http://www.delphipraxis.net/internal...ct.php?t=72859

[Schaedel]

Ich hatte den Theard auch schon durchgelesen :-/
Aber ein guter Lehrer wird erkennen das er den QUelltext aus dem Netz hat ..
Naja zu sehr OT jetzt...

schönen Tag noch ...

[angos]

Zitat von Schaedel:

Ich hatte den Theard auch schon durchgelesen :-/
Aber ein guter Lehrer wird erkennen das er den QUelltext aus dem Netz hat ..
Naja zu sehr OT jetzt...

schönen Tag noch ...

zumal der quellcode auch noch nicht 100% das passende liefern wird

Zitat:

Zahl := strtoint(Meinstring[1]);

da sollte doch noch die 1 ersetzt werden

[alzaimar]

Zitat von angos:

Zitat:

Zahl := strtoint(Meinstring[1]);

da sollte doch noch die 1 ersetzt werden

Womit denn? Mit ner 2?

[Schaedel]

nein durch i
War ein Tippfehler von mir...
Naja .... Hups

[Daniel]

Um 08:21 Uhr hast Du diesen Thread erstellt und genau 21 Minuten später drängst Du auf eine Lösung?

Was glaubst Du eigentlich, wo Du hier bist? Sitzen unsere Benutzer Deiner Meinung nach nur in den Startlöchern und freuen sich auf jede Aufgabe, die man ihnen vor die Füße wirft? Im Übrigen hast Du es bis jetzt nicht für nötig befunden, auch nur ein leises Dankeschön zu hinterlassen.

Aufgabe gelöst - danke, das war's? Nö - so gehen wir hier nicht miteinander um. Halte Dich bitte an unsere Spielregeln, diese findest Du en detail in unserem Kodex.