Delphi-Quellcode:
Function GetWordOfAnsiString(Text :
string; WordPos : Word):
string;
var
p : PChar;
begin
p := PChar(Text);
repeat
Dec(WordPos);
while p^ <> #0
do
begin
if WordPos = 0
then
Result := Result + p^;
Inc(p);
end;
if WordPos = 0
then Exit;
Inc(p);
until p^ = #0;
end;
wenn ich auf den 3 tel zugreife kommt der 3 und der 4 warum ???
Bsp
GetWordOfAnsiString('bla'+#0+'b'+#0+'b'+#0+'b'+#0+ 'b'+#0+'b'+#0,1);
kommt bla
bei
getwordofansistring('bla'+#0+'b'+#0+'b'+#0+'b'+#0+ 'b'+#0+'b'+#0,3);
kommt 'bb' was ist los ???