Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
TIWEdit - sample with pattern and regional settings
#3
Hello Alexandre,

thanks for your reply. However, it doesn't work. According to your information:

procedure TTstServer.IWServerControllerBaseConfig(Sender: TObject);
begin
RegionalSettings.DecimalSeparator := ',';
RegionalSettings.ThousandSeparator := '.';
RegionalSettings.CurrencyString := 'NZD';
RegionalSettings.CurrencyFormat := 2; // currency symbol + a space are placed on the left side of the number.
RegionalSettings.ShowThousandSeparator := True;
end;

procedure TTstWindow.IWAppFormCreate(Sender: TObject);
begin
IWEdit1.DataType := stNumber;
IWEdit1.DataTypeOptions.FloatDP := 2;
IWEdit1.DataTypeOptions.NumberType := ntFloat;
IWEdit1.DataTypeOptions.NumberValidation := nvIntraWeb;
end;

When entering, no comma is possible.

I suggest extending the demo program on GitHub accordingly. The mistakes should become obvious.

Thanks in advance for checking and fixing.

Detlef
The way to success is always under construction ... but i see a light at the end of the tunnel  Idea Big Grin
Reply


Messages In This Thread
RE: TIWEdit - sample with pattern and regional settings - by Lorbass - 04-24-2022, 11:38 AM

Forum Jump:


Users browsing this thread: 1 Guest(s)