du musst dem Property eine SetMethode zuweisen und darin prüfen ob das Format richtig ist. Beispiel:
Delphi-Quellcode:
TMyClass = class(TComponent)
private
ffloatproperty: Extended;
procedure fSetValue(AValue: Extended);
published
property MeinProperty: Extended read ffloatproperty write fSetValue;
end;
procedure TMyClass.fSetValue(AValue: Extended);
begin
if (AValue <> ffloatproperty) and (AValue im richtigen Format) then
begin
ffloatproperty := AValue;
end;
end;