Discussion :

[lohot]

Bonjour,

Je désirerais exécuter des lignes de commandes. Pour essayer, j'ai créé ce code qui fonctionne parfaitement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
AProcess := TProcess.Create(nil);
AProcess.CommandLine := 'dia';
AProcess.Execute;
AProcess.Free;

Par contre, je désire y insérer un accès administrateur, en créant le code suivant, rien ne se passe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
AProcess := TProcess.Create(nil);
AProcess.CommandLine := 'sudo dia';
AProcess.Execute;
AProcess.Free;

Quelqu'un aurait-il une solution ?

Merci d'avance.

Lohot

[mittag]

Bonjour,

Bonjour,

De mémoire, essaie plutôt quelque chose comme:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
AProcess := TProcess.Create(nil);
AProcess.CommandLine := 'bash -c  sudo dia';
AProcess.Execute;
AProcess.Free;

A tester.

[lohot]

Mittag,

Je te remercie pour ta réponse.

Malheureusement elle semble inopérationnelle. En effet, quand je clique sur le bouton pour exécuter ce code, il ne se passe toujours rien.

Lohot

[mittag]

Je vais peut-être dire une bêtise, mais il me semble que sous linux Tprocess ne peut pas être fenêtré, or sudo demande le password à l'utlisateur, c'est peut-être là le problème?

De mon côté dans mes programmes qui créent des fichiers temporaires, j'utilise un Tprocess avec la commande 'bash -c rm ...' pour faire automatiquement le ménage dans le répertoire. C'est l'équivalent du 'cmd /C del ...' sous win.

[lohot]

J'ai contourné le problème en passant par un fichier bash installtion

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
AProcess := TProcess.Create(nil);
AProcess.CommandLine := 'bash installation';
AProcess.Execute;
AProcess.Free;

avec ce fichier bash

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
#!/bin/bash
xterm -e "sudo dia"
exit

Lohot