Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Copy Methode Fehlerhaft?
Jerk - Mo 30.06.08 18:45
Titel: Copy Methode Fehlerhaft?
Ich habe jetzt schon bei mehreren Programmen Probleme damit gehabt und es letztendlich mit einer Zählerschleife umgangen. Entweder bin ich zu dumm und mache einen Cardinalen Fehler oder die Methode ist evtl wirklich fehlerhaft...
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
| function TInterpreter.Order(line: string) : String;
var
i,NumC : integer;
FrLine : Array[1..1000] of String;
ObCount : integer;
begin
Numc := 0;
ObCount := 0;
for i := 1 to length(line) do
begin
if (ord(Line[i]) > 47) and (ord(Line[i]) < 58) then
inc(NumC,1)
else
begin
inc(ObCount,1);
Frline[ObCount]:=Copy(Line,I-NumC,I-1);
showmessage(Frline[ObCount]);
NumC:=0;
end;
end;
...
end; |
Diese Funktion soll nur alle Zahlen aus einem String auslesen und dann in ein Array schreiben.
Die Zahlen sind jeweils nur durch ein Zeichen Unterbrochen.
Die Erste Zahl ist auch komplett richtig aber bei der Nächsten Zahl kommt dann nur quatsch bei raus -.-
Er kopiert die Zahl richtig + den Rest des Strings bis zum ende, aber erst immer ab der zweiten Zahl -.-
Gausi - Mo 30.06.08 19:00
Probier mal so:
Delphi-Quelltext
1:
| Frline[ObCount]:=Copy(Line[1],I-NumC,I-1); |
Edit: Äh, ne. Ich glaube, ich war grade in einer ganz anderen Funktion. :oops:
Lannes - Mo 30.06.08 19:01
Hallo,
schau Dir mal an was die Delphi-Hilfe schreibt:
Delphi-Quelltext
1:
| function Copy(S: string; Index, Count: Integer): string; |
Copy gibt einen String zurück, der
Count Zeichen ab S[Index] enthält.
Jerk - Mo 30.06.08 19:01
@Gausi
Das würde ja bedeuten das der String fürs Copy nur ein Zeichen hat -.-
Funktioniert auch leider nicht :(
@Lanes
Frline[ObCount]:=Copy(Line,I-NumC,NumC);
Jo das wars danke!!!
Ich bin aber der Meinung das es mal String,Von,Bis war...
Naja vielen Dank!!!
BenBE - Di 01.07.08 10:33
Ne, das von\Bis ist Java ...
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!