» Utilizator
LAMP
» Parteneri» De citit» Recomandari» Taskuri securitate » Statistici
  • 64782 de mesaje.
  • 7635 de topicuri.
  • 1081 de utilizatori.
  •  
  • purcelllefevreo e ultimul utilizator inregistrat.
[Detalii]

 

| |
Pagini: [1]
Print

TEdit cu aliniere [Delphi] [790 afisari]

DarkByte



Mesaje:

Cei care ati mai programat in Delphi vreodata probabil ca stiti ca TEdit nu are proprietatea Alignment (cum are de exemplu, un TMemo). Ce se intampla daca vrem totusi ca textul din Edit-ul nostru sa fie centrat sau aliniat la dreapta ?

Raspunsul clasic : folosim un Memo cu o singura linie  :rolleyes: ... Mie, sincer, nu-mi place raspunsul asta.

Am gasit altul si parca imi place mai mult Smile

Code:
var Style : dWord;
...
  Style := GetWindowLong(Edit1.Handle, GWL_STYLE);
  SetWindowLong(Edit1.Handle, GWL_STYLE, Style or ES_CENTER);
...
ES_CENTER poate fi inlocuit cu ES_LEFT sau ES_RIGHT. Evident ...

Un alt stil care se poate aplica unui Edit este ... numeric input Smile Adica, Edit-ul va primi doar numere (va primi totusi mesajele pentru orice tasta s-ar apasa, dar in casuta de editare vor aparea doar cifrele). Din pacate, nu primeste si semnul minus (un inconvenient minor, avand in vedere ca primim toate mesajele si putem adauga noi, din cod).

Pentru a folosi Edit ca o casuta de editare numerica, se va folosi ES_NUMBER. Bineinteles, se poate face si din cod acest lucru, si am sa arat cum intr-un snippet viitor.
Logged
15-05-2008, 13:43 Twitt ::
Pagini: [1]
Print
SkullBox Forum  |  Development  |  Delphi & Pascal  |  Topic: TEdit cu aliniere [Delphi]