MyCity » Visual Studio -> Visual Basic » Help za Help

Help za Help

Napisano na dan: 5.8.2005

Help za Help
Sledeća strana Pagination

Idi na vrh

Poslao: 05 Avg 2005 13:52
Idi na vrh
offline
  • Pridružio: 05 Avg 2005
  • Poruke: 4

Kako da ubacim .chm file u aplikaciju? Hvala!



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 06 Avg 2005 01:30
Idi na vrh
offline
  • Pridružio: 15 Jul 2005
  • Poruke: 36
  • Gde živiš: Cacak

.chm (HTML Help) file ne bi trebala da "ubacujes" u aplikaciju, taj fajl ide uz .exe (mada mozes da ubacis .chm u resource, ali to nije preporucljivo)
jednostavno samo stavi .chm u isti folder sa tvojom aplikacijom i onda ga pozoves preko shell-a:
Public Sub runHelp()  Dim chm As String  chm = App.Path  If Right$(chm, 1) <> "\" Then chm = chm & "\"  chm = chm & "Help.chm" 'ovde promeni ako ti se fajl zove drugacije  'prvo proveri da li fajl postoji:  If Dir(chm) = vbNUllString Then 'znaci da ne postoji     Call MsgBox("Help fajl nije pronadjen!") 'ili uradi ovde sta hoces  Else     Call Shell(chm, vbNormalFocus)  End If End Sub

i kad ti treba help samo pozoves runHelp

a ako hoces da prikazes odredjeni topic, onda moras da koristis API:
Const HH_DISPLAY_TOPIC = &H0 Const HH_SET_WIN_TYPE = &H4 Const HH_GET_WIN_TYPE = &H5 Const HH_GET_WIN_HANDLE = &H6 Const HH_DISPLAY_TEXT_POPUP = &HE   ' Display string resource ID or text in a pop-up window. Const HH_HELP_CONTEXT = &HF         ' Display mapped numeric value in  dwData. Const HH_TP_HELP_CONTEXTMENU = &H10 ' Text pop-up help, similar to WinHelp's HELP_CONTEXTMENU. Const HH_TP_HELP_WM_HELP = &H11     ' text pop-up help, similar to WinHelp's HELP_WM_HELP. Const HH_CLOSE_ALL = &H12 Private Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long) As Long Private Sub Form_Load()     'KPD-Team 2000     'URL: http://www.allapi.net/     'E-Mail: [Link mogu videti samo ulogovani korisnici]     Dim hwndHelp As Long     'The return value is the window handle of the created help window.     hwndHelp = HtmlHelp(hWnd, "myfile.chm", HH_DISPLAY_TOPIC, 0) End Sub Private Sub Form_Unload(Cancel As Integer)     HtmlHelp Me.hWnd, "", HH_CLOSE_ALL, 0 End Sub

Pozdrav



Poslao: 08 Avg 2005 10:47
Idi na vrh
offline
  • Pridružio: 05 Avg 2005
  • Poruke: 4

Jos nisam stigla da probam, ali u svakom slucaju, najlepse hvala zemljaku krckuorascicu!

Poslao: 09 Avg 2005 03:00
Idi na vrh
offline
  • Pridružio: 15 Jul 2005
  • Poruke: 36
  • Gde živiš: Cacak

samo krcko Wink

MyCity » Visual Studio -> Visual Basic » Help za Help

Ko je trenutno na forumu
 

Ukupno su 1785 korisnika na forumu :: 80 registrovanih, 6 sakrivenih i 1699 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 6018 - dana 19 Dec 2025 13:41

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 4. Ozrenska, AF-1, babaroga, Badja, Bane san, Bojke549, bokicacar, branko87, cojapop, Comyymoc, crazydkure, crnitrn, cuculo, dejno, DejvTroter, Dekanovic, Dioniss, djordjemiklusev, Dogma21, Dolinc, Dorcolac, Dr.Strangelove, dragan_mig31, draganl, dukajov, dusan.l, dushan, FileFinder, Filip1, gale48, Georgius, goxin, Jaxupa, Jonbonjovi, kaskadija, Kubovac, ladro, Lester Freamon, lima, loon123, Marko1238, Maschinekalibar, MDrasko, miki kv, milenko crazy north, miljannis, Milos ZA, milos97, mishkooo, Mitogna, mxzzz, nemkea71, Nikola Galovic, nuke92, Orc, peraklio, PMsnow, procesor, Prometeus, raptorsi, raso76, raster12, sasovsky, Shadows1, singa, smuk, Speer, strn, Szigetwar, tamno.nebo, tomo2, tritonus, Uros Cuore Sportivo, user24, v82, Vanderx, Vlad000, voja64, zexon, Đurđevdan