Реферат: Разработка текстового редактора

iCtr++;

}

Ruler->Caption = (AnsiString)sTmp;

}

void __fastcall TForm1::FormCreate(TObject *Sender)

{

OpenDialog->InitialDir = ExtractFilePath(ParamStr(0));

SaveDialog->InitialDir = OpenDialog->InitialDir;

SetupRuler();

for (int i = 0; i < Screen->Fonts->Count; i++)

ComboBox1->Items->Add(Screen->Fonts->Strings[i]);

RichEdit1->SelStart = 0;

}

void __fastcall TForm1::ToolButton14Click(TObject *Sender)

{

if(RichEdit1->Paragraph->Numbering == TNumberingStyle(nsBullet))

RichEdit1->Paragraph->Numbering = TNumberingStyle(nsNone);

else

RichEdit1->Paragraph->Numbering = TNumberingStyle(nsBullet);

}

void __fastcall TForm1::ComboBox1Change(TObject *Sender)

{

TCharsetObject* ChasrsetObject;

if ( !FUpdating ){

ChasrsetObject = (TCharsetObject*)ComboBox1->Items->Objects[ComboBox1->ItemIndex];

CurrText()->Name = ComboBox1->Items->Strings[ComboBox1->ItemIndex];

}

}

void __fastcall TForm1::ToolButton15Click(TObject *Sender)