Date: 02-16-2022
Return to Index
created by gbSnippets
'Compilable Example: (Jose Includes)
#Compile Exe
#Include "win32api.inc"
Function PBMain() As Long
Local i As Long, hDlg As Dword
Dialog New Pixels, 0, "PowerBASIC",300,300,200,200, %WS_OverlappedWindow To hDlg
i = ShellExecute(hDlg, "Open", "Explorer", "/root,::{645FF040-5081-101B-9F08-00AA002F954E}", $Nul, %SW_ShowNormal)
Dialog Show Modal hDlg
End Function
'gbs_01449
'Date: 10-17-2014
http://www.garybeene.com/sw/gbsnippets.htm