Hola,
Yo lo que veo "raro" (luego de lo que comenta Seoane) es que estás definiendo una clase que cuenta con un método, pero, no implementas dicho método correctamente.
¿Dónde acaba? No acaba. Además parece que quieras usar en su interior varios miembros de la clase "TUsuario", pero, el procedimiento "Mostrar_Tusuario" no pertenece a dicha clase y no tendrá acceso a los miembros de esta así como así.
El asunto tendría que quedar más o menos así:
Código Delphi
[-]
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
type
TUsuario = class
procedure Mostrar();
end;
procedure TUsuario.Mostrar();
begin
end;
var
Usuario: TUsuario;
begin
Usuario := TUsuario.Create();
try
finally
Usuario.Free();
end;
end.
Edito: Se me ha adelantado Román.