Search found 1 match
- Tue Jul 04, 2006 5:30 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Shortcut (*.lnk) from FWH
- Replies: 12
- Views: 4315
.Lnk for FWH
I don't use Fivewin, but i hpoe this helps... //**** FUNCTION CreateAppShorcut( cName, cLetter ) //**** LOCAL oError, oShell, oDeskTop, cDeskTop, cCurDir, cWorkingDir, nRET // cName := HB_OemToAnsi( cName ) cCurDir := UPPER( CURDIR() ) IF ( cWorkingDir := CURDRIVE() ) == "\" cWorkingDir :=...