Memo RichEdit . .
Memo (, , ) Font.
RichEdit RTF. SelAttributes, : Color (), Name (), Size (), Style () . , , , , ( SelStart). RichEdit DefAttributes ( ), , , SelAttributes. DefAttributes Assign SelAttributes, .
, .. Paragraph, :
| Alignment | . taLeftJustify(), taCenter ( ) taRightJustify() |
| FirstIndent | . |
| Numbering | , . - nsNone − , nsBullet − - |
| LeftIndent | |
| RightIndent | |
| TabCount | |
| Tab |
Paragraph , .
Memo RichEdit − Lines, . , Lines . .
Lines.
, String, , Text.
, , : Memo1->Lines->String[0].
Count .
Clear().
Add Append Lines.
LoadFromFile SaveToFile. ,
RichEdit1->Lines->LoadFromFile(text.rtf);
RichEdit1->Lines->SaveToFile(text.rtf);
Memo RichEdit () .
|
|
|
1. .
2. , LabeledEdit1. EditLabel Caption.
3. Button1. Caption (<=10).
4. Button2 Caption.
5. , Memo1 RichEdit1 , 10x10. Courier ( ).
6. , :
int k=0,n,m;
void __fastcall TForm1::Button1Click(TObject *Sender)
{ if(k==0) {LabeledEdit1->EditLabel->Caption=" =";
LabeledEdit1->SetFocus();
}
if(k==1) {n=StrToInt(LabeledEdit1->Text);
LabeledEdit1->EditLabel->Caption=" =";
LabeledEdit1->SetFocus();
}
if(k==2) {m=StrToInt(LabeledEdit1->Text);
LabeledEdit1->EditLabel->Caption=" : " +
IntToStr(n)+" x "+IntToStr(m);
LabeledEdit1->Text="";
Button2->Caption=" ";
}
if(k==0||k==1)k++;
else k=0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int x[10][10],i,j;
Memo1->SetFocus();
AnsiString s[10][10],s1[10],s2[10];
Memo1->Clear();
Memo1->Lines->Add(" ");
for(i=0;i<n;i++){
s1[i]="";
for(j=0;j<m;j++){
x[i][j]=random(101)-50;
if(x[i][j]<-9) s[i][j]=" "+IntToStr(x[i][j]);
else if(x[i][j]<0||x[i][j]>9) s[i][j]=" "+IntToStr(x[i][j]);
else s[i][j]=" "+IntToStr(x[i][j]);
s1[i]+=s[i][j];}
Memo1->Lines->Add(s1[i]);}
Memo1->Lines->Add("");
Memo1->Lines->Add(" ");
for(j=0;j<m;j++){
s2[j]="";
for(i=0;i<n;i++)
s2[j]+=s[i][j];
Memo1->Lines->Add(s2[j]);}
RichEdit1->SetFocus();
RichEdit1->Clear();
/* */
RichEdit1->Paragraph->Alignment=taCenter;
/* */
RichEdit1->SelAttributes->Style =
RichEdit1->SelAttributes->Style << fsBold;
RichEdit1->Lines->Add(" ");
/* */
RichEdit1->SelAttributes->Assign(RichEdit1->DefAttributes);
/* */
RichEdit1->Paragraph->Alignment=taLeftJustify;
for(i=0;i<n;i++)RichEdit1->Lines->Add(s1[i]);
RichEdit1->Lines->Add("");
/* */
RichEdit1->SelAttributes->Size=12;
/* */
RichEdit1->SelAttributes->Color= clHotLight;
/* fsItalic*/
RichEdit1->SelAttributes->Style=
RichEdit1->SelAttributes->Style<<fsItalic;
/* */
RichEdit1->Paragraph->Alignment=taCenter;
RichEdit1->Lines->Add(" ");
|
|
|
/* */
RichEdit1->SelAttributes->Assign(RichEdit1->DefAttributes);
for(j=0;j<m;j++)RichEdit1->Lines->Add(s2[j]);
}
//---------------------------------------------------------------------------
7. . , ( ) .
