Ver Mensaje Individual
  #1  
Antiguo 11-05-2012
rufo rufo is offline
Miembro
 
Registrado: jul 2006
Posts: 240
Reputación: 18
rufo Va por buen camino
Multiplicar un edit con separador de miles

Hola amigos, buenas tardes, resulta que quiero hacer una operacion basica pero con numeros que tengan separador de miles (,) ya que he leido y buscado y dicen que ponga el punto, pero la cuestion es que no quiero que sea asi, espero que ustedes me puedan ayudar.

Les pongo parte de mi codigo en el cual estoy algo atorado y no paso de aqui

Código Delphi [-]
procedure TFACTURA.Memo2Change(Sender: TObject);
var
n1:real;
suma: Extended;
i : integer;
begin
 suma := 0;
 for i := 0 to memo2.Lines.Count - 1 do
 suma := suma + strToFloat(memo2.Lines[i]);
 edit8.Text := floatToStrF(suma,ffNumber,20,2);   
 v_conta:=v_conta+1;

 n1:=strtofloat(edit8.Text);
 edit9.Text:=formatfloat('0,00',n1*0.16);

De antemano gracias y solo quiero decirles que estoy usando delphi2007
Responder Con Cita