FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
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. Código:
'10 15' is not valid floating point value |
#2
|
||||
|
||||
Hola
Al ser texto si esta vacío dara un error, para eso es mejor decirle que si esta vacio que no haga nada. No se necesitan declarar variables se puede hacer directo. Saludos
__________________
Siempre Novato |
#3
|
||||
|
||||
A lo que te dice Carlos yo le añadiría unos bloques Try...Except por si hubiera algo, es decir no se hallará vacío pero no fuera número o su formato no fuera el correcto.
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#4
|
||||
|
||||
Hola
Lo que me parece que esta tratando de hacer es varias multiplicaciones consecutivas. El código que le mostré no lo hará. Creo que se necesita crear un array. Saludos
__________________
Siempre Novato |
#5
|
||||
|
||||
Desde luego si el planteamiento es el que comenta Carlos, lo mejor es que te olvides de los Memos que no son adecuados para el fin que persigues.
Puedes utilizar efectivamente un "array" y luego recorrerlo con un bucle. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#6
|
|||
|
|||
Gracias amigos quedo resuelto use un array.
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Multiplicar 2 celdas de un stringgrid | Elite237 | OOP | 3 | 11-11-2008 02:02:59 |
Como imprimir varios memos con QuickReport | fcios | Impresión | 4 | 03-07-2007 17:08:24 |
como obtener un numero entero a raiz de multiplicar dos campo string | buzon | MS SQL Server | 5 | 10-12-2006 18:03:28 |
multiplicar dos tablas | fabian20s | SQL | 1 | 31-03-2005 15:31:08 |
Multiplicar en una consulta | muli | Firebird e Interbase | 1 | 20-06-2003 00:05:37 |
|