PDA

Ver la Versión Completa : Manejo de Enteros y Reales


kirios
14-04-2012, 20:35:47
Hola! Tengo un pequeño incinveniente a la hora de imprimir numeros en un archivo de texto.

El código sería

writeln(arch, floattostr(sin((2*pi*(x-i))/23)) + ' ' + floattostr(sin((2*pi*(x-i))/28)) + ' ' + floattostr(sin((2*pi*(x-i))/33)));

donde x e i son dos variables cualesquiera. El tema es que cuando escribo estos numeros en el archivo de texto, tengo distintas longitudes, unos con mas o menos decimales y me queda todo desordenado.

Cuando trabajaba en consola, usaba el

Writeln(x:2:2)

y tenia un numero con dos decimales, pero en OOP no me es posible. Hay algún método similar?

Graciaas

ecfisa
14-04-2012, 21:02:53
Hola kirios.

Intentá de este modo:

Writeln(arch, Format('%8.8f %8.8f %8.8f', [Sin((2*pi*(x-i))/23), Sin((2*pi*(x-i))/28), Sin((2*pi*(x-i))/33)]));

Revisá en la ayuda de Delphi: Format strings por los diferentes especificadores de formato.

Saludos.

kirios
14-04-2012, 22:41:31
Hola! Muchisimas gracias, funciona perfecto! :D