mo1- gt; Height=Form2- gt; Height;
} __ fastcall TForm2 :: BitBtn1Click (TObject * Sender)
{- gt; ShowModal ();
} __ fastcall TForm2 :: TabControl1Change (TObject * Sender)
{(Form2- gt; TabControl1- gt; TabIndex == 0)
{-gt;BitBtn1-gt;Visible=true;-gt;BitBtn2-gt;Visible=true;-gt;BitBtn4-gt;Visible=true;-gt;Button2-gt;Visible=true;-gt;Button3-gt;Visible=true;-gt;Button4-gt;Visible=true;-gt;Edit1-gt;Visible=false;-gt;Label1-gt;Visible=false;
}
{-gt;BitBtn1-gt;Visible=false;-gt;BitBtn2-gt;Visible=false;-gt;BitBtn6-gt;Visible=false;-gt;BitBtn4-gt;Visible=false;-gt;Button2-gt;Visible=false;-gt;Button3-gt;Visible=false;-gt;Button4-gt;Visible=false;
} (Form2- gt; TabControl1- gt; TabIndex == 1)
{- gt; BitBtn7- gt; Visible=true;- gt; BitBtn8- gt; Visible=true; - gt; Edit1- gt; Visible=false; - gt; Label1- gt; Visible=false;
}
{- gt; BitBtn7- gt; Visible=false; - gt; BitBtn8- gt; Visible=false;
} (Form2- gt; TabControl1- gt; TabIndex == 2)
{-gt;BitBtn6-gt;Visible=true;-gt;Button5-gt;Visible=true;-gt;Edit1-gt;Visible=true;-gt;Label1-gt;Visible=true;
}
{- gt; BitBtn6- gt; Visible=false; - gt; Button5- gt; Visible=false;
} (Form2- gt; TabControl1- gt; TabIndex == 3)
{-gt;Button1-gt;Visible=true;-gt;Button6-gt;Visible=true;-gt;Edit1-gt;Visible=true;-gt;Edit1-gt;Visible=true;-gt;Label1-gt;Visible=true;
}
{- gt; Button1- gt; Visible=false; - gt; Button6- gt; Visible=false;
} (Form2- gt; TabControl1- gt; TabIndex == 4)
{-gt;Button7-gt;Visible=true;-gt;Label1-gt;Visible=false;-gt;Edit1-gt;Visible=false;
}
{- gt; Button7- gt; Visible=false;
}
} __ fastcall TForm2 :: BitBtn2Click (TObject * Sender)
{- gt; Memo1- gt; Lines- gt; Clear ();
} __ fastcall TForm2 :: BitBtn4Click (TObject * Sender)
{(Form2- gt; FontDialog1- gt; Execute ())
{-gt;Memo1-gt;Font-gt;Color=Form2-gt;FontDialog1-gt;Font-gt;Color;-gt;Memo1-gt;Font-gt;Size=Form2-gt;FontDialog1-gt;Font-gt;Size;-gt;Memo1-gt;Font=Form2-gt;FontDialog1-gt;Font;
}
} __ fastcall TForm2 :: BitBtn7Click (TObject * Sender)
{(Form2- gt; SaveDialog1- gt; Execute ())
{* list=new TStringList;gt;Add(Form2-gt;Memo1-gt;Lines-gt;Text);gt;SaveToFile(Form2-gt;SaveDialog1-gt;FileName+laquo;.txtraquo;);
}
} __ fastcall TForm2 :: BitBtn8Click (TObject * Sender)
{(Form2- gt; OpenDialog1- gt; Execute ())
{* list=new TStringList;gt;LoadFromFile(Form2-gt;OpenDialog1-gt;FileName);-gt;Memo1-gt;Lines-gt;Text=list-gt;Text;
}
} __ fastcall TForm2 :: BitBtn6Click (TObject * Sender)
{=laquo;raquo;;=laquo;raquo;;(i=1;ilt;=Form2-gt;Memo1-gt;Text.Length();i++)
{+=Form2- gt; Memo1- gt; Text [i];
} (i=1; i lt;=ser.Length (); i ++)
{(ser[i]==laquo;аraquo;)+=laquo;1raquo;;(ser[i]==laquo;вraquo;)+=laquo;2raquo;;(ser[i]==laquo;йraquo;)+=laquo;3raquo;;(ser[i]==laquo;цraquo;)+=laquo;4raquo;;(ser[i]==laquo;уraquo;)+=laquo;5raquo;;(ser[i]==laquo;кraquo;)+=laquo;6raquo;;(ser[i]==laquo;еraquo;)+=laquo;7raquo;;(ser[i]==laquo;нraquo;)+=laquo;8raquo;;(ser[i]==laquo;гraquo;);+=laquo;9raquo;;(ser[i]==laquo;шraquo;)+=laquo;0raquo;;(ser[i]==laquo;щraquo;);+=laquo;+raquo;;(ser[i]==laquo;зraquo;)+=laquo;!raquo;;(ser[i]==laquo;хraquo;)+=laquo;@raquo;;(ser[i]==laquo;ъraquo;)+=laquo;$raquo;;(ser[i]==laquo;фraquo;)+=laquo;*raquo;;(ser[i]==laquo;ыraquo;)+=laquo;%raquo;;(ser[i]==laquo;пraquo;)+=laquo;^raquo;;(ser[i]==laquo;рraquo;)+=laquo;?raquo;;(ser[i]==laquo;оraquo;)+=laquo;amp;raquo;;(ser[i]==laquo;лraquo;)+=laquo;#raquo;;(ser[i]==laquo;дraquo;)+=laquo;=raquo;;(ser[i]==laquo;жraquo;)+=laquo;~raquo;;(ser[i]==laquo;эraquo;)+=laquo;-raquo;;(ser[i]==laquo;яraquo;)+=laquo;lt;raquo;;(ser[i]==laquo;чraquo;)+=laquo;gt;raquo;;(ser[i]==laquo;сraquo;)+=laquo;/raquo;;(ser[i]==laquo;мraquo;)+=laquo;[raquo;;(ser[i]==laquo;иraquo;)+=laquo;]raquo;;(ser[i]==laquo;тraquo;)+=laquo;{raquo;;(ser[i]==laquo;ьraquo;)+=laquo;}raquo;;(ser[i]==laquo;бraquo;)+=laquo;|raquo;;(ser[i]==laquo;юraquo;)+=laquo;:raquo;;(ser[i]==laquo;.raquo;)+=laquo;.raquo;...
