edit:
Genaue Beschreibung:
array explode ( string separator, string string [, int limit] )

Gibt ein Array aus Strings zurück, die jeweils Teil von string sind. Die Abtrennung erfolgt dabei an der mit separator angegebenen Zeichenkette (ein oder mehrere Zeichen). Ist der Parameter limit angegeben, werden maximal limit Teile zurück gegeben. Das letzte Element enthält dann den kompletten Rest von string.

Du könntest das mit AnsiString.pos und AnsiString.delete realisieren.
So in etwa (hab aber grad keinen BCB zur Hand)

String DerString="Hallo. Das ist, Naja. Ein String.";
TStringList lst=new TStringList;

int pos;
for(pos=0;pos>-1;)
{
pos=DerString.pos(".");
if(pos!=-1)
lst.add(DerString.SubString(0,pos));
DerString.Delete(0,pos);
}

Ein Blick in die BCB-Hilfe zu den Methoden der Klasse AnsiString und du weißt die korrekte Schreibweise der Methode.

/Edit : Ich bin heut zu langsam

bis bald
akari

hier mien Code:

for(pos=0;pos>-1;)
 {
  pos=sstring.Pos(".");
  if(pos!=-1)
  sestring[apos] = (sstring.SubString(0,pos));
  sstring.Delete(0,pos);
  apos++;
 }

 Edit2->Text = sestring[0];
 Edit3->Text = sestring[1];
 Edit4->Text = sestring[2]

Du hast nicht berücksichtigt, das bei AnsiString (und nur bei AnsiString) die Elemente (also die chars) nicht von 0 bis Length() -1 gezählt werden, sondern von 1 bis Length().
Und das betrifft auch die AnsiString-Methoden.

bis bald
akari

Geht nicht^^

(kleiner Tip: Klick mal auf "Einzelschritt" und schau dir genauer an, was das Programm macht)

for(pos=1;pos>-1;)
 {
  pos=sstring.Pos(".");
  if(pos!=-1)
  sestring[apos] = (sstring.SubString(1,pos));
  sstring.Delete(1,pos);
  apos++;
 }

Und das mit einzelschritt wieß ich net wie geht

if(pos!=-1)
{
  sestring[apos] = (sstring.SubString(1,pos));
  sstring.Delete(1,pos);
}

Wegen Debugging schau mal hier rein
http://www.junix.ch/bcb/help/debug.html

if(pos > 0)

ist hier notwendig

for (pos = 1; pos > 0;)

oder bei

for (pos = 1; pos > -1;)

belassen?

apos = 0;
while(((pos = sstring.Pos(".")) > 0) && (apos < limit))
{
  sestring[apos++] = (sstring.SubString(1,pos));
  sstring.Delete(1,pos);
}