Avatar billede Nybegynder
21. august 2003 - 20:26 Der er 8 kommentarer og
1 løsning

Få at program til at vente

Hvordan Får jeg mit program til at vente med at lukke ned når jeg ikke har nogle form.
Jeg har nogle events der gerne skal blive ved med at virke.

Hilsen

Lars
Avatar billede Slettet bruger
21. august 2003 - 20:41 #1
Kig på Timer kontrollen.
Avatar billede squashguy Nybegynder
21. august 2003 - 20:45 #2
Nu ved jeg ikke specifikt hvad du søger, men du kan halte din tråd ved at kalde WaitForSingleObject(), og i en anden tråd/program kalde SetEvent(), når programmet skal fortsætte.
Avatar billede vbcoder Nybegynder
22. august 2003 - 08:22 #3
Du kunne prøve at skjule formen

form1.hide

dette betyder ikke at programmet lukker - kun at du ikke kan se formen. Du skal så huske at der ikke er nogen måde at få kontakt til programmet igen.

men det kommer lidt an på hvad det er programmet skal gøre og hvorfor hvilke metoder du kan bruge.

//vbcoder
Avatar billede vbcoder Nybegynder
22. august 2003 - 08:24 #4
eller form1.visible=false

//vbcoder
Avatar billede Nybegynder
22. august 2003 - 09:55 #5
En Timer kontrolle dur ikke fordi den udfør noget når tiden er gået, men hvis du har et forslag med souce kode så er det velkommen.
Det samme gælder "WaitForSingleObject()". Kan det bruges om en Class i det samme program ?
Jeg har prøvet med en form og det virker heller ikk.
Avatar billede vbcoder Nybegynder
22. august 2003 - 11:36 #6
Hvad er det programmet venter på?

Er det noget der skal køre som en service?

Prøv at definere din venten lidt bedre ....

//vbcoder
Avatar billede Nybegynder
22. august 2003 - 17:55 #7
Ja det er en slagst service.
Avatar billede Slettet bruger
22. august 2003 - 20:19 #8
Jamen hvis programmet bare skal køre og så lukkes ned med PC'en så kan du bare skjule alt hvad du kan komme i nærheden af.
Avatar billede ferdinand.k Mester
25. august 2003 - 10:26 #9
Private Declare Sub sapiSleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

Sub sSleep(lngMilliSec As Long)

If lngMilliSec > 0 Then
Call sapiSleep(lngMilliSec)
End If
End Sub

Sub sTestSleep()
Const cTIME = 1000 'in MilliSeconds
Call sSleep(cTIME)
MsgBox "Before this Msgbox, I was asleep for " _
& cTIME & " Milliseconds."
End Sub
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester