Сравните текст в памятке с другой запиской?

Question

В анкете, я опустил 3 примечания: memo1, memo2, и memo3.

Когда я ввожу вопрос с полным предложением в memo2, ответ, который хранится в memo1, должен быть отображен в memo3.

Например, предположим, что в memo1 я писал:

what is your name?=my name is john 

Когда я типа what is your name? в memo2, my name is john должен появиться в memo3.

Как это сделать?

Answer 1

Memo1 содержит name=value пар. Объект TMemo.Lines - это объект TStrings, а TStrings имеет некоторые полезные свойства для работы с name=value парами. В вашем примере, решение Простейшее будет использовать вопрос в Memo2 в качестве параметра Name из TStrings.Values[] свойства, например:

var 
    question: string; 
    answer: string; 
begin 
    question := Trim(Memo2.Text); 
    answer := Memo1.Lines.Values[question]; 
    Memo3.Text := answer; 
end;