Выбор из combobox

[deadneoo]

Мне нужно вывести в word из combobox, а выводит пустой документ
word: OleVariant;
begin
word := CreateOleObject('Word.Application') ;
if C1.Text =('анализ ликвидности баланса') then r1.Lines.SaveToFile('C:\diplom\1.rt f');
if C1.Text =('анализ платежеспособности') then r2.Lines.SaveToFile('C:\diplom\1.rt f');
if C1.Text =('анализ финансовой устойчивости') then r3.Lines.SaveToFile('C:\diplom\1.rt f');
if C1.Text =('Оценка рентабельности') then r4.Lines.SaveToFile('C:\diplom\1.rt f');
word.Documents.Open('C:\diplom\1.rt f');
word.Visible := true;