lo malo es que en linux no te funcionará el shellexecute
supongo que podrias usar libc.system('comando'); (aunque no estoy seguro de que funcione)y con defines ejecutar una linea u otra:
Código Delphi
[-]
uses Classes
{$IFDEF LINUX}
{$ENDIF}
{$IFDEF MSWINDOWS}
,shellapi,windows
{$ENDIF}
;
......
function AbrirURL(direccion:string):boolean;
begin
{$IFDEF MSWINDOWS}
ShellExecute(0,'open',Pchar(direccion),nil,nil,SW_SHOWNORMAL);
{$ENDIF}
{$IFDEF LINUX}
libc.system(direccion);
{$ENDIF}
end;
si funciona cuentanoslo ^_^