Y solo por curiosidad intente hacer que en la sentencia que me diste
ShellExecute(Handle, 'open', 'NET', 'TIME \\SERVIDOR /SET /Y', nil, SW_HIDE);
'SERVIDOR' sea una variable, lo intente de varias formas pero me marca un erros no se si esto se pueda hacer:
Código Delphi
[-]procedure TForm1.btn1Click(Sender: TObject);
var
servidor:string;
begin
servidor:='FCIANNA';
ShellExecute(Handle, 'open', 'NET', 'TIME \\'+SERVIDOR+' /SET /Y', nil, SW_HIDE);
end;
me podrian comentar en que me esta fallando? gracias