Problem mit function
Hi,
leider ist mir kein passender titel eingefallen :roll: ich habe folgendes prob: ich brauche eine function, die mir aus einem string 'bla bla1 bla2 bla3 blan' über einen index blan zurückgibt, z.B. beim index 2 bla2. dazu hab ich folgendes geschrieben:
Delphi-Quellcode:
was soweit auch geht, nur eben immer den ganzen restlichen string zurückgibt und nicht nur den string bis zum nächsten leerzeichen. ich bin ziemlich ratlos wie ich das jetzt machen soll :(
function GetParam(ParamString: string; ParamIndex: Integer): string;
var i,t,count: integer; x: string; begin count := 0; for i := 0 to ParamIndex do begin for t := 1 to length(ParamString) do begin if ParamString[t] = ' ' then begin count := count + 1; if count = ParamIndex then begin x := Copy(ParamString,t,length(ParamString)); end; end; end; end; end; plz hlp! *MFG* |
Re: Problem mit function
Hallo Meflin,
also wenn ich das richtig verstehe, hat Dein String Leerzeichen und Du willst danach trennen. Also bietet es sich doch an, diese Leerzeichen zu zählen und in einem zweiten Schritt, anhand der Menge der Leerzeichen mit den Funktionen Copy erst den Teilstring zu isolieren und anschließend mit Delete den Teilstring entfernen - und das sooft Leerzeichen vorhanden sind. Gruß Jochen |
Re: Problem mit function
Du könntest die Funktion Explode aus der Code-Lib benutzen.
|
Re: Problem mit function
thx
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:13 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz