Delphi как правильно установить переменную при использовании ShellExecute

Question

теперь у меня есть это

procedure TForm4.SpeedButton14Click(Sender: TObject);
begin
ShellExecute(0, nil,'C:\Users\MyExampleDoc.docx', nil, nil, SW_SHOWNORMAL);
end;

, но мне нужно что-то вроде этого из записки:

procedure TForm4.SpeedButton14Click(Sender: TObject);
    begin
    ShellExecute(0, nil,'Form1.DBmemo1.Text', nil, nil, SW_SHOWNORMAL);
    end;

как я могу вставить текст из других объектов? например, Dbmemo или DBEdit