[Win] Open et saveFileRequester() temporisé

[Mesa]

D'après un code en anglais que j'ai francisé.

Code : Tout sélectionner

; - OpenFileRequester()
; - SaveFileRequester()


Global Title$

Procedure FBrowser(Parameter)
	Repeat
		hwnd = FindWindow_("#32770",Title$)
	Until hwnd

	
	Button = FindWindowEx_(hwnd, 0, @"Button", @"Annuler");@"&Ouvrir"
	For i=5 To 1 Step -1
	SetWindowText_(Button, "&Annuler = "+ Str(i))  
	Delay(1000)
	Next i
	
	Debug button
SendMessage_(Button, #WM_KEYDOWN, #VK_SPACE, 0)
SendMessage_(Button, #WM_KEYUP, #VK_SPACE, 0)
EndProcedure



Thread = CreateThread(@FBrowser(), 0)

Title$ = "Nouveau titre perso..."
File$ = OpenFileRequester(Title$, "Install.log", "", 0)
; File$ = SaveFileRequester(Title$, "", "", 0)

If File$ 
	Debug File$ 
	KillThread(Thread)
EndIf

M.

[Micoute]

Merci beaucoup pour le partage.