Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How register a new keyboard in windows
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00946287
Message ID:
00946323
Vues:
22
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform