Discussion :

[Cameleon45]

Bonsoir à tous

Mon problème est résumé dans le titre... Mais je donne quand même un exemple :

Avec la methode "createprocess", je lance notepad.exe avec le fichier C:\montexte.txt en paramètre. Il s'ouvre avec... Mais comment faire pour demander à ce même notepad d'ouvrir un autre fichier ?

Merci

[jmjmjm]

Pourquoi ne le ferme tu pas puis le réouvre avec un autre fichier ??
Sinon je ne pense pas que l'on puisse envoyer une commande au notepad permettant de faire cela !

[Cameleon45]

J'avais déjà pensé à cette solution - et c'est sans doute celle que je vais retenir - mais je la trouve pas très "propre".

Peut-être est-il possible, avec le handle du process et le chemin du fichier à ouvrir, de "simuler un drag-and-drop"... ou quelque chose dans ce style... :

[TicTacToe]

Il y a une autre solution
tu peux interagir avec le notepad (ou autre application) en envoyant des messages.
Comme le notepad en particulier, gère le glisser/déposer fichier,

Tu peux envoyer une message au notepad le fichier, cela fonctionne parfaitement, et évite effectivement d'ouvrir/ferme le notepad causant lenteur et flickering.

je te donnes un extrait de mon code brut de pomme, il faut que tu l'adaptes (que j'ai trouvé et adpaté d'ailleurs!)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
var
   i : Integer;
   wparam : THandle;
   pDrop: PDropFiles;
   pFiles: PChar;
begin
     ...
     wParam :=  GlobalAlloc( GMEM_ZEROINIT or GMEM_MOVEABLE or GMEM_DDESHARE, Length( SFichier ) + 20);
     pDrop := GlobalLock( wparam );
     try
     pDrop^.pFiles := 20;
     pDrop^.fWide := False;
     pFiles := Pointer(pDrop);
     Inc( pFiles, pDrop^.pFiles);
     for i := 1 to Length( SFichier ) do
       begin
       pFiles^ := SFichier[ i ];
       Inc( pFiles );
       end;
     pDrop.fNC := False;
     pDrop.pt := Point( 10, 10 );
     finally GlobalUnLock( wParam ); end;
     // Glisser virtuel
     PostMessage( HandleViewver, WM_DROPFILES, wparam, 0 );
     ...
end

HandleViewver est le Handle de l'appli Notepad lancé

[Cameleon45]

Il y a une autre solution
tu peux interagir avec le notepad (ou autre application) en envoyant des messages.
Comme le notepad en particulier, gère le glisser/déposer fichier,

Tu peux envoyer une message au notepad le fichier, cela fonctionne parfaitement, et évite effectivement d'ouvrir/ferme le notepad causant lenteur et flickering.

je te donnes un extrait de mon code brut de pomme, il faut que tu l'adaptes (que j'ai trouvé et adpaté d'ailleurs!)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
var
   i : Integer;
   wparam : THandle;
   pDrop: PDropFiles;
   pFiles: PChar;
begin
     ...
     wParam :=  GlobalAlloc( GMEM_ZEROINIT or GMEM_MOVEABLE or GMEM_DDESHARE, Length( SFichier ) + 20);
     pDrop := GlobalLock( wparam );
     try
     pDrop^.pFiles := 20;
     pDrop^.fWide := False;
     pFiles := Pointer(pDrop);
     Inc( pFiles, pDrop^.pFiles);
     for i := 1 to Length( SFichier ) do
       begin
       pFiles^ := SFichier[ i ];
       Inc( pFiles );
       end;
     pDrop.fNC := False;
     pDrop.pt := Point( 10, 10 );
     finally GlobalUnLock( wParam ); end;
     // Glisser virtuel
     PostMessage( HandleViewver, WM_DROPFILES, wparam, 0 );
     ...
end

HandleViewver est le Handle de l'appli Notepad lancé

C'est pile poil ce que je cherchais !

Je regarderai cela plus en détail ce week-end...

Merci bcp pour le coup de pouce.

[jmjmjm]

Ok TicTacToe je prend note aussi MERCI