Displaying 1 result from an estimated 1 matches for "getunixpath".
2008 May 09
4
VB6 and wine_get_unix_file_name
...ocessHeap Lib "kernel32" () As Long
Public Declare Function HeapFree Lib "kernel32" (ByVal hHeap As Long, ByVal
dwFlags As Long, IpMem As Any) As Long
Public Declare Function wine_get_unix_file_name Lib "kernel32" (ByVal
lpszSrc As String) As Long
Public Function GetUnixPath(ByVal sPath As String) As String
Dim ptr As Long
Dim sBuffer As String * 255
ptr = wine_get_unix_file_name(StrConv(sPath, vbUnicode))
lstrcpyA sBuffer, ptr
HeapFree GetProcessHeap(), 0, ByVal ptr
GetUnixPath = sBuffer
End Function
Sub Main()
UnixPath = GetUnixPat...