[[maeyanes]]

Hola...

Puedes concatenar la cadena:

Código Delphi [-]
var
  Username: string;

begin
  Username = 'dario.perez';
  ShellExecute(Handle, nil, 'http//www.facebook.com/' + Username, nil, nil, SW_SHOW)
end;

Saludos...