extract string from string

[marabu]

Hi,

have a look at NameValueSeparator:

Delphi-Quellcode:

begin
  myString := 'Age:16' + sLineBreak + 'Name:molley' + sLineBreak + 'Country:Austria';
  with TStringList.Create do
  try
    Text := myString;
    NameValueSeparator := ':';
    edit1.text := Values['Age'];
    edit2.text := Values['Name'];
    edit3.text := Values['Country'];
  finally
    Free;
  end;
end;

Regards