Casualmente tengo aquí un zip.exe y he hecho esta prueba:
Código Delphi
[-]
uses ShellApi;
function DQuotedString(S: String): String;
begin
Result := '"' + S + '"';
end;
procedure TForm1.Button1Click(Sender: TObject);
var
Parameters: String;
begin
Parameters :=
DQuotedString('c:\Documents and Settings\roman\Mis documentos\noseque.zip') +
' ' +
DQuotedString('C:\Documents and Settings\roman\Mis documentos\Trabajo\cdsview\*.*');
ShowMessage(Parameters);
ShellExecute(Handle, 'open', 'zip.exe', PChar(Parameters), nil, SW_SHOW);
end;
que funciona bien. Es decir, lo mismo que te digo con las comillas dobles pero más ordenado y usando ShellExecute.
Puedes intentar cambiando FileRun por ShellExecute. Antes puedes probar poner entre comillas dobles tambien a FileRun1.Directory, pues también tiene espacios.
¿De dónde sale FileRun? ¿Es un componente hecho por ustedes?
// Saludos