salut,

moi pour la description, je la change directement dans la base de registre :

Reg := TRegIniFile.Create;
try
  Reg.RootKey := HKEY_LOCAL_MACHINE;
  Reg.OpenKey('SYSTEM\CurrentControlSet\Services',False);
  Reg.WriteString('LE_NOM_DE_MON_SERVICE','Description','la description de mon service');
  Reg.CloseKey;
finally
  FreeAndNil(Reg);
end;

Salut,
Moi j'ai un probleme que j'ai du mal a résoudre avec un Service.
Mon service doit me lancer le client mail (outlook dans mon cas) mais il me le lance depuis le compte system, donc je n'ai pas les boites aux lettres de l'utilisateur de la session en cours :(
J'ai regardé du coté de CreateProcessAsUser pour lancer le client mail, mais il faut fournir le mot de passe ! Est ce qu'il y a un moyen d'executer un processus depuis un service avec l'utilisateur de la session en cours ?

une autre bonne méthode :

TImageType = (I_Jpeg, I_BMP, I_GIF, I_PNG, I_Unknow);

function GetImageType(FileName: String): TImageType;
var
  FS: TFileStream;
  Buff: String;
begin
  SetLength(Buff, 3);
  FS := TFileStream.Create(FileName, fmOpenRead + fmShareDenyNone);
  with FS do
  begin
    Read(Buff[1], 3);
    if (Ord(Buff[1]) = $FF) and (Ord(Buff[2]) = $D8) then result := I_Jpeg
    else if (Ord(Buff[1]) = $42) and (Ord(Buff[2]) = $4D) then result := I_BMP
    else if Buff = 'GIF' then result := I_GIF
    else if (Ord(Buff[1]) = $89) and (Ord(Buff[2]) = $50) and (Ord(Buff[3]) = $4E) then
      result := I_PNG
    else result := I_Unknow;
    Free;
  end;
end;