Курсовая работа: Алгоритм, написание и отладка программы "Текстовый редактор"
RichEdit1->SelAttributes->Style=TFontStyles()<<fsItalic<<fsUnderline;
}
if ((SpeedButton11->Down==false)&&(SpeedButton12->Down==true))
{
RichEdit1->SelAttributes->Style =TFontStyles()<<fsItalic;
}
if ((SpeedButton13->Down==true)&&(SpeedButton12->Down==true)&&(SpeedButton11->Down==true))
{
RichEdit1->SelAttributes->Style=TFontStyles()<<fsBold<<fsItalic<<fsUnderline;
}
if ((SpeedButton11->Down==false)&&(SpeedButton12->Down==true)&&(SpeedButton13->Down==true))
{
RichEdit1->SelAttributes->Style =TFontStyles()<<fsBold<<fsItalic;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton3Click(TObject *Sender)
{
if (SaveDialog1->Execute()) RichEdit1->Lines->SaveToFile(SaveDialog1->FileName);
StatusBar1->Panels->Items[0]->Text=SaveDialog1->FileName;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N5Click(TObject *Sender)
{
if (SaveDialog1->Execute()) RichEdit1->Lines->SaveToFile(SaveDialog1->FileName);
StatusBar1->Panels->Items[0]->Text=SaveDialog1->FileName;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton1Click(TObject *Sender)