Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How register a new keyboard in windows
Message
From
27/09/2004 12:34:14
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00946287
Message ID:
00946323
Views:
24
Dear Borislav,

I copied my keyboard file in dbf as memo using these codes.
************************
Function ExtractFile(tcFilename As String, tcDestPath As String)
LOCAL lcDestFilename
IF !USED("table1")
USE table1 IN 0
ENDIF

SELECT table1
LOCATE ALL FOR table1.mfilename=tcFilename && Field1 - its field where stored filename. no binary data.. just filename)

lcDestFilename = ADDBS(tcDestPath)+tcFilename
STRTOFILE(table1.mbinary,lcDestFilename) && Field2 - its field where stored binary file data, written with filetostr()
Return(FILE(lcDestFilename))
Endfunc
***********************
and copy in windows\system32\ with these codes
Declare Integer GetSystemDirectory In Kernel32.Dll ;
STRING @lpBuffer, Integer lnSize

lcFolder = Space(255)
lnLength = GetSystemDirectory(@lcFolder,255)
If lnLength>0
lcFolder = Left(lcFolder,lnLength)
Endif

ExtractFile("khubaibu.dll",lcFolder)

in these codes can i registerd my keyboard thanks
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform