Ver Mensaje Individual
  #1  
Antiguo 14-12-2009
rufo rufo is offline
Miembro
 
Registrado: jul 2006
Posts: 240
Reputación: 18
rufo Va por buen camino
Question Como multiplicar dos memos

Hola amigos aqui de nuevo visitandolos y consultandolos, resulta que quiero hacer lo siguiente, es decir quiero multiplicar dos memos y que me visualice el resultado en otro memo cuando digite la cantidad en un memo y digite la otra cantidad en otro memo me aparesca automanticamente sin presionar cualquier boton el resultado en el otro memo, les anexo el codigo que estoy empleado en el memo que digito la segunda cantidad:

Código:
procedure TFacturacion.Memo3Change(Sender: TObject);
var
 no3,no4:double;
begin
 no3:=strtofloat(memo2.Text);
 no4:=strtofloat(memo3.Text);
 memo4.Text:=formatfloat('0.00',no3*no4);

end;

end.
El codigo esta bien cuando captura la primera linea pero al pasar a la segunda linea del segundo memo es cuando me marcar el siguiente error:
Código:
'10 15' is not valid floating point value
Espero que me ayuden y gracias de antemano y otro dato mas uso delphi 5
Responder Con Cita