Einzelnen Beitrag anzeigen

Benutzerbild von Salomon
Salomon

Registriert seit: 9. Jun 2002
453 Beiträge
 
#1

tEdit Eingabe formatieren

  Alt 21. Sep 2007, 11:02
Hallo,
kann ich die Eingabe in einem TEdit Rechtsbündig ausrichten, und die Eingabe so begrenzen, das nur 7 Ziffern eingegeben werden können, davon maximal 4 Vorkommastellen?


Bislang begrenze ich nur die länge auf 7. Und fange falsche Eingaben im Code ab.

Delphi-Quellcode:
procedure TFRM_AM_AddExpenses.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if not (Key in ['0'..'9',',', Char(VK_BACK)]) then
    Key := #0;
end;
Gruß Marcus
01001000 01100001 01101100 01101100 01101111
01010111 01100101 01101100 01110100 00100001

http://www.it-adviser.net
  Mit Zitat antworten Zitat