Hola tengo por ejemplo la cadena 'inválido' y la tratar de mostrarla con un ShowMessage sale
invĀilido
He probado con hacer:
Código Delphi
[-]
Cadena := AnsiString(Cadena);
pero sigue igual.
Las cadenas las tengo en una unidad a parte así:
Código Delphi
[-]
unit uMensajes;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils;
const
Cadena1 = 'inválido';
Cadena2 = 'contraseña';
implementation
initialization
end.
¿Cómo puedo arreglarlo?
Saludos.