Saber Número negativo y pasarlo a positivo

[BuRtOn]

Saludos amigos, lo que necesito saber es como hago para saber si una variable de tipo integer es negativa y pasarla a positivo ?, es algo asi lo que trato de plantear:

Código Delphi [-]
var a: Integer;
if -a = True Then //Es negativa procedo.
begin
( -a ) * (-) = +a; // multiplico -a * - para que me de la variable a positiva
end;

por favor espero que me puedan colaborar, gracias.

[[egostar]]

Hola

Código Delphi [-]
if a < 0 then begin
   a := a * -1;
end;

Salud OS

[BuRtOn]

Jajajajajaja, Hay Dios se nota que hoy no estoy procesando nada, jajajajaa, como no pense en eso que es lo mas logico, que pena por prgeuntar tremenda bobada jajajaa, solo que hoy no estoy muy creativo, pero muchas gracias egostar....

[[egostar]]

Empezado por BuRtOn

Jajajajajaja, Hay Dios se nota que hoy no estoy procesando nada, jajajajaa, como no pense en eso que es lo mas logico, que pena por prgeuntar tremenda bobada jajajaa, solo que hoy no estoy muy creativo, pero muchas gracias egostar....

Suele pasar, pero que tal esto sin tener que preguntar si es o no negativo

Código Delphi [-]
  a := Abs(a);

Salud OS