Cita:
Empezado por Kubelo
No quiero eliminar los decimales, el problema es q cuando llega un 1e-05 en lugar de pintar 0,00005 que sería lo correcto, me pinta -15. Jejejee
|
Tál como está tu código,
lo correcto es que muestre
1E-5. Lo que no entiendo a que puede deberse que te muestre
-15...
Realicé una prueba sencilla que te adjunto por si te sirve:
Código Delphi
[-]
...
implementation {$R *.dfm}
type
TNuevoEdit = class(TEdit)
private
FFloat: Double;
procedure SetFloat(Value: Double);
public
property Float: Double read FFloat write SetFloat;
end;
procedure TNuevoEdit.SetFloat(Value: Double);
begin
Text:= FloatToStr(Value);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
with TNuevoEdit.Create(Self) do
begin
Parent:= Self;
Float := 0.00001;
end;
end;
y el resultado es
1E-5, tál como se esperaría de la conversión efectuada:
Pero hay algo que todavía no me termina de quedar claro y es: ¿ Que formato de salida (exáctamente) deseas en la propiedad
Text de
TNuevoEdit ?
Un saludo.