Declaring API externs with structures

BlitzMax Forums/BlitzMax Programming/Declaring API externs with structures

Something like this I think:
SuperStrict
Framework brl.basic

Import "-lkernel32"

Const TH32CS_SNAPPROCESS:Int = 2
Const MAX_PATH:Int = 260

Type PROCESSENTRY32
    Field dwSize:Int
    Field cntUsage:Int
    Field th32ProcessID:Int
    Field th32DefaultHeapID:Int
    Field th32ModuleID:Int
    Field cntThreads:Int
    Field th32ParentProcessID:Int
    Field pcPriClassBase:Int
    Field dwFlags:Int
    Field szExeFile:String
End Type  

Extern "Win32"
	Function WinExec(lpCmdLine:Byte Ptr,nCmdShow:Int) = "WinExec@8"
	Function CreateToolhelp32Snapshot:Int(lFlags:Int, lProcessID:Int)
	Function ProcessFirst(hSnapShot:Int, uProcess:Byte Ptr)
	Function ProcessNext(hSnapShot:Int, uProcess:Byte Ptr)
	Function CloseHandle(hPass:Int)
End Extern

' Global pe:PROCESSENTRY32=New PROCESSENTRY32
' result=ProcessFirst(0,Byte Ptr(pe))