Создание простого текстового редактора
Обработчик команды сохранения файла: if(SaveDialog1->Execute()) Memo1->Lines->SaveToFile(SaveDialog1->FileName); Если был вызван диалог сохранения файла «if(SaveDialog1->Execute())«, наш текст «Memo1->Lines» сохраняется в выбранный в диалоге файл «SaveToFile(SaveDialog1->FileName)» Обработчик команды изменения шрифта: if(FontDialog1->Execute())