Discussion :

[scara]

Bonjour à tous,

IL semble que la fonction Shellexecute pose problème sous Vista, en fait ça marche carrément pas pour moi...

Voici mon code :

Code :

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

1
2
3
4
5
6
begin
  if FileExists(GetTempDir + 'shoot2png.bmp') then begin
    ShellExecute(Handle, 'open', PChar(GetTempDir + 'bitmap.bmp'), nil, nil, SW_SHOWNORMAL);
  end
  else
    showmessage('Il n''y a pas de capture à visualiser');

Il s'agit de visualiser une image avec l'application de l'OS sélectionnée par défaut.

Merci.

[Lung]

Code :

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

1
2
3
4
5
6
begin
  if FileExists(GetTempDir + 'shoot2png.bmp') then begin
    ShellExecute(Handle, 'open', PChar(GetTempDir + 'bitmap.bmp'), nil, nil, SW_SHOWNORMAL);
  end
  else
    showmessage('Il n''y a pas de capture à visualiser');

Question bête : le nom de fichier entre le FileExist et le ShellExecute est différent. C'est pas ça le problème ?

[scara]

Arf, non , j'ai changé le nom du fichier en editant pour que ce soit plus clair, le nom est correct.


J'ai changé le paramètre "Operation" de la fonction ShellExecute , j'ai mis NIL à la place d'"Open".

Avant :

Code :

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

ShellExecute(Handle, 'open', PChar......

Aprés :

Code :

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

ShellExecute(Handle, NIL, PChar

Mais savoir pourquoi ça fonctionne à présent ....?

Merci pour ton aide !