Category: Strings
Title: Use associative arrays
Date added: 15.03.2006
Hits: 11938
procedure TForm1.Button1Click(Sender: TObject);
var
DataField: TStrings;
begin
DataField := TStringList.Create;
DataField.Add(Format('%s=%s', ['Alex', '14.05.1984']));
ShowMessage(DataField.Values['Alex'])
DataField.Free;
end;