Maskedit - Edit c маской

← →
TATIANA (2003-12-26 11:27) [0]

Здрвствуйте ! Господа , подскажите пожалуйста , есть MaskEdit , сделала маску ввода вещественного числа < !сссссссссссс,сс;0;_ > , ввод работает хорошо , а когда вызываю форму для редактирования , то число без дроби , например 8000 , выравнивается к правому краю и на экране выглядит как - ____80,00 . Господа как мне выравнять к левому краю , чтобы на экране было - 8000_____,__ .
Cпасибо .

← →
DCoder © (2003-12-26 11:50) [1]

Используй обычный TEdit и обрабатывай нажатие символьных клавиш
procedure TEngineMF.Edit1KeyPress(Sender: TObject; var Key: Char); var vch: set of char; begin inherited ; // VK_Back=#8 vch:=["0".."9",#8,decimalseparator]; if not (Key in vch) then Key:=#0; end;

Если речь идет про отображение денег используй маску
0.00

Maskedit - Edit c маской Найти похожие ветки