Til Ziron :)

prøv med det, og ellers, så ja vent til imorgen, der installere jeg delphi...

var
  sted : Integer;
  dintext : String;
Begin
dintext := \'hejhej:hej:he:h\';
while dintext.Length > 0 do
  sted := pos(dintext, \':\');
  Showmessage(copy(dintext, 1, sted);
  delete(dintext, 1, sted)
end;

/ZIRON

Virker stadig ikke :(
Men - det kommer jo nok til at gå... :)

hvad virker ikke...

/ZIRON

while dintext.Lenght > 0 do   
x := pos(dintext, \':\');
Showmessage(copy(dintext, 1, x);
delete(dintext, 1, x)

Stadig samme fejl..

den markere linien
while dintext.Lenght > 0 do   
og sætter cursoren ved \'.\' mellem dintext og Lenght....

kan ikke hjælpe lige nu, har ikke delphi, men prøv at fjern denne linie:

while dintext.Length > 0 do

og så se om det ellers virker...

men godnat herfra...

/ZIRON

Nat nat :) Drøm sødt :)

takker :-) og ilm

/ZIRON