Convertir un valor a negativo

[Delphitest]

Buenas tardes,

creo que voy a preguntar algo realmente básico, pero no se como hacerlo.

En un Edit espero que el usuario introduzca un valor que despues convierto con StrToInt para obtener un valor (ya que lo necesito para realizar una operacion aritmetica). Ese valor siempre es positivo.

Un vez tengo ese valor, lo meto en una variable llamada puntos

Puntos : = StrToInt(Edit1.text)

El caso es que necesito que ese valor vaya a parar a un campo de una tabla pero que siempre sea negativo, es decir que en el campo aparezca como -1 por ejemplo.

¿Existe alguna funcion que convierta el numero en negativo?

Muchas gracias por vuestra ayuda

Un saludo

[ecfisa]

Hola.

Código Delphi [-]
   Puntos:= StrToInt(Edit1.Text) * -1;

Saludos.

[liser]

Multiplicalo por -1

Puntos : = StrToInt(Edit1.text) *-1

[roman]

También podemos sólo agregar el signo:

Código Delphi [-]
Puntos : = -StrToInt(Edit1.text);

// Saludos

[[coso]]

hola,

El caso es que necesito que ese valor vaya a parar a un campo de una tabla pero que siempre sea negativo

solo por puntualizar, si quieres que siempre sea negativo

Código Delphi [-]

num := -Abs(strtofloat(Edit1.text));

saludos

[Delphitest]

Muchas Gracias por vuestra ayuda,

todas las soluciones me sirven.

La verdad es que ya había probado alguna de ellas pero tenía otro error al que no prestaba atención y al final de tantas vueltas que le daba me quedé en blanco.

Buenas noches