Inkludera hjälp i din vb-applikation
Förord
Det brukar vara små enkla detaljer som gör en applikation mer professionell. En av de detaljerna är hjälpfil. Jag skall försöka förklara hur man inkluderar en helpfil i applikation. Enklaste sättet att skapa en helpfil är att använda verktyg för helpfiler. Det finns flera bra och gratis program. Jag använder ForeHelp (http://www.sinterphase.com/fhdemo.htm) och HTML Help Vorkshop. Båda programmen kan man hämta på Internet. För att testa nedanstående exempel behövs helpfil pellesoft.hlp. Ladda hem exemplet här till höger.Innehåll
»»
»
»
Project properties
För att inkludera helpfil i applikation räcker det att man i Project/Properties anger vilken .hlp (.chm) fil skall användas i programet. 1. Skapa ett nytt projekt i Visual Basic.
2. Placera en CommandButton, sätt egenskapen HelpContensID = 1
3. Placera två TexBox, sätt egenskapen HelpContensID = 2, respektive 3
4. Välj Project/Project1 Properties... och fylla i Help File Name:
5. Kör programmet genom att trycka F5 i VB och därefter trycker du på F1 för att anropa helpfil.
Oftast, vid första körningen hitar inte VB din helpfil så du måste göra det själv (såna dumheter finns inte i Borland Builder C++).
Använd kod
1.Se till att din Form är i design läge.
2.Tryck Ctrl + E och skapa hjälpmeny (Name: mnuHelp, Caption:Hjälp )
3.Skapa två undermenyer Name: mnuInnehåll, Caption: Innehåll Name: mnuIndex, Caption: Index
4.Inkludera en modul i din projekt (Project/Add module) och skriv kod:
' Module help.bas
Option Explicit
Declare Function WinHelp Lib "user32" Alias "WinHelpA" (ByVal hwnd As Long, ByVal lpHelpFile As String, ByVal wCommand As Long, ByVal dwData As Long) As Long
Global Const HELP_CONTEXT = &H1' Visa aktuell topic som identifieras med ett nummer
Global Const HELP_QUIT = &H2' Avsluta hjälpen
Global Const HELP_INDEX = &H3' Visa index
Global Const HELP_HELPONHELP = &H4' Visa hjälpsidan för hur hjälpen fungerar
Global Const HELP_SETINDEX = &H5' Sätt alternativt index för hjälpfilen då flera index finns
Global Const HELP_KEY = &H101' Visa topic för dess keyword
Global Const HELP_MULTIKEY = &H201' Leta upp keyword i index och visa dess topic
Nu skall vi skriva lite kod för våra menyerna:
Option Explicit
Private Sub Form_Load()
App.HelpFile = App.Path & "\pellesoft.hlp"
End Sub
Private Sub mnuIndex_Click()
Dim help
help = WinHelp(Me.hWnd, "pellesoft.hlp", HELP_Index, CLng(0))
End Sub
Private Sub mnuInnehåll_Click()
Dim help
help = WinHelp(Me.hWnd, "pellesoft.hlp", HELP_CONTEXT, CLng(0))
End Sub
Kör programmet genom att trycka F5 i VB och därefter väljer du en av helpundermenierna.
Fil att tanka ner
Fil att tanka ner: helpfile.zip
Avslutningsvis
För att jag skall veta om kursen är bra eller om den måste skrivas om så rösta gärna här uppe till höger. Skicka gärna ett iMail om du vill kommentera något som är felaktigt eller du tycker borde förtydligas./Ibbe
0 Kommentarer