Ver Mensaje Individual
  #7  
Antiguo 11-11-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 26
delphi.com.ar Va por buen camino
Si puedes hacerlo con un edit normal, con el CurrencyEdit, será mucho mas fácil y estético.


Código:
procedure TForm1.Edit3Change(Sender: TObject);
begin
  LMDTrackBar1.Position:=Trunc(StrToFloatDef(edit3.text, LMDTrackBar1.Position div 10)*10);
  ganancia := LMDTrackBar1.Position div 10;
end;

Creo que en las últimas versiones de Delphi, apareció la funcion StrToFloatDef, yo trabajo en Delphi 5 así que no te lo puedo confirmar.


Román:



Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita