var Str := TStringList.Create;
Str.Text :=
'pr_fp=ea4b83cce35fe5dc744ef485372f1cdeec8862e546fc4ce353e309b5a88351d9'#13#10 +
'wasm=b1a91e0252cc91a33cb489f2f0ca5b06'#13#10 +
'rcid=111a5116-d8cd-405d-9c74-7776cba81515';
ShowMessage(Str.Values['wasm']);
Str.Free;
implementation
...
procedure refresh_questions;
begin
Form1.Memo1....
end;
TStringList - универсальный список. Может и пары хранить (как словарь
<string, string>
), может принять DelemitedText, который разделит текст на строки по DelemiterChar (например, пробел или запятая), даст доступ по индексу строки или по ключу, если там пары.