FAQ C++ BuilderConsultez toutes les FAQ

1
2
3
4
5
6
7
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)  
{  
  if (Key == VK_RETURN) 
  { 
    Key = 0;  
  } 
}

1
2
3
4
5
6
__fastcall TForm1::TForm1(TComponent* Owner)  
: TForm(Owner)  
{  
    long StylesEdit = GetWindowLong(Edit1->Handle, GWL_STYLE);  
    SetWindowLong(Edit1->Handle, GWL_STYLE, StylesEdit | ES_NUMBER);  
}

1
2
int numLigne = RichEdit1->Perform(EM_EXLINEFROMCHAR, 0, (LPARAM) (DWORD) RichEdit1->SelStart); 
int numCaractere = (RichEdit1->SelStart - RichEdit1->Perform(EM_LINEINDEX, (LPARAM) (DWORD) numLigne, 0));

1
2
3
4
5
int numLigne = 10, numCaractere = 15; 
RichEdit1->SelStart = RichEdit1->Perform(EM_LINEINDEX, numLigne - 1, 0); 
RichEdit1->SelStart += numCaractere; 
RichEdit1->Perform(EM_SCROLLCARET, 0, 0); 
RichEdit1->SetFocus();

1
2
3
4
5
for (int i = 0 ; i < RichEdit1->Lines->Count ; i++) { 
    RichEdit1->SelStart = RichEdit1->Perform(EM_LINEINDEX, i, 0); 
    RichEdit1->SelLength = RichEdit1->Lines->Strings[i].Length(); 
    RichEdit1->SelAttributes->Color = 0x00F56B00 + 10 * i; 
}

RichEdit1->Lines->SaveToFile(Nom_fichier);

RichEdit1->PlainText = true;

1
2
3
4
5
6
7
8
9
10
11
12
13
void __fastcall TForm1::Button2Click(TObject *Sender) 
{ 
    Graphics::TBitmap *pBitmap = new Graphics::TBitmap(); 
    pBitmap->LoadFromFile("C:\\Documents and Settings\\blondelle\\Mes documents\\Mes images\\AG00004_.bmp"); 
    TControlCanvas *pCn; 
    pCn = new TControlCanvas(); 
    pCn->Control = RichEdit1; 
    pCn->Brush->Color = clGreen; 
    pCn->Rectangle(0, 0, 488, 289); 
    pCn->Draw(50,50,pBitmap); 
    delete pCn; 
    delete pBitmap; 
}

1
2
SysLocale.MiddleEast = True; 
MonEdit->BiDiMode = bdRightToLeft;