Como multiplicar dos memos

[rufo]

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:

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:

'10 15' is not valid floating point value

Espero que me ayuden y gracias de antemano y otro dato mas uso delphi 5