Запись в текстовый файл результатов

[Treyka]

Как в калькуляторе сохранить в файл все примеры которые решал?

[Morpho]

В процедуру SetOutput можно добавить:

AssignFile(FileVar, 'путь к файлу');
Reset(FileVar);  // открывает файл для записи и ставит курсор в начало файла

Read(FileVar, SaveVar); // FileVar - переменная файла, SaveVar -то, что сохраняем

CloseFile(FileVar);

Предварительно надо описать переменную

FileVar : File of integer

Конечно, вместо integer можно другой тип использовать.

[Stilet]

В данном случае скорее никак. Ты не решаешь сразу всю строку выражения, а просто выполняешь пооператорно. Тебе практически нечего сохранять.
Максимум что:

procedure TMainForm1.SetOutput(C: Char);
begin 
 if C='C' then Output.Caption:='' else Output.Caption:=Output.Caption+C 
 st.append(c);
end;

Где st:TStringList, глобальная, создаваемая в OnCreate и сохраняемая в OnClose:

st.SaveToFile('Мой файл');st.free;