¿Una función en Delphi, puede devolver varios parámetros?

[socger]

Hasta ahora cuando he usado una función sólo he devuelto un parámetro, cuando he tenido que devolver varios por ejemplo he declarado variables públicas y luego las he leido desde otras partes del módulo en el que estoy desarrollando.

Por ejemplo una función podría que uso muy a menudo es algo parecido a esto

function TModuloPrograma.Comprobar_Algo : ShortString;
var Mensaje_Error : ShortString
begin
Mensaje_Error := '';
try
// Cuerpo de lo que quiero hacer
Except
// Si se produce un error que quiero controlar
Mensaje_Error := 'se ha producido un error';
End;

Result := Mensaje_Error;
end;

Lo que no se es si una función puede devolver varias variables. ¿Podría amáblemente decirme alguien esto ó como lo solucionais?.

Gracias de antemano.