Einzelnen Beitrag anzeigen

MStoll

Registriert seit: 15. Nov 2005
131 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Meine Explode-Funktion optimieren

  Alt 3. Dez 2006, 23:41
Hallo,

ich fasse mal grad ein paar Punkte zusammen, die mir aufgefallen sind:

1.
if (p[i] = separator[0]) and (p[i+seplen] = separator[seplen]) then Du scheinst hier nur den Anfang und das Ende des Separators zu überprüfen.
Was passiert denn, wenn man "das wandern ist des müllers lust" an Hand von "des" "explodet"?
Du solltest deine PChars vll besser in Strings verwandeln und dann mittels Copy auf das Vorkommen des ganzen Separators prüfen.

2. Result := Result sollte überflüssig sein

3. Ist das überhaupt ne explode-Fkt? Normalerweise gibt die doch ein Array zurück, oder verwechsel ich da was?

Gruß
Michael
  Mit Zitat antworten Zitat