Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Problem mit Progressbar!
Autor: Gamer20
Datum: 08.06.04 08:49
wenn ich auf einen button klicke, sollte die Anzegie voran schreiten. das geht nur zum teil. d.h. wenn ich einen testbutton habe, gehts. Da ich eine Funktion habe, bei der eine CD durchsucht wird und was im Label ausgegeben wird, geht das net. Die Leiste läuft erst, wenn im Label das Ergebnis angezeigt wird. Ich kann mir das nicht erklären. bin kein Anfänger, das ich irgendwo eine "if then" Abfrage drin hab, dann wärs ja logisch. Aber ich habe keine Abfrage dafür, welche mit dem Progressbar zusammen hängen würde. Also ich bin am Ende, weiß net mehr weiter. Hier der Teil vom Button und vom Timer. Private Sub Command1_Click() Timer1 = True xpProgress1.Max = 20 xpProgress1.Min = 0 With nSearch .sSearchpath = xpDrive1.Drive ' Suchpfad .sFileToFind = "*.exe" ' Suchnamen .sFileFlag = FILE_ATTRIBUTE_ALLTYPES ' Dateiattribute .sInclSubfolders = True ' Subdirs durchsuchen ' Suche starten Screen.MousePointer = 13 .sStartSearch Screen.MousePointer = 0 End With With nSearch .sSearchpath = xpDrive1.Drive ' Suchpfad .sFileToFind = "*.dll" ' Suchnamen .sFileFlag = FILE_ATTRIBUTE_ALLTYPES ' Dateiattribute .sInclSubfolders = True ' Subdirs durchsuchen ' Suche starten Screen.MousePointer = 13 .sStartSearch Screen.MousePointer = 0 End With end sub das ist dann der teil indem die cd durchsucht wird: Private Sub nSearch_MatchFound(ByVal sFilename As String, _ ByVal sFilePath As String, _ ByVal sFiledate As Date, _ ByVal sFilesize As Long, _ ByVal sLastAccess As Date, _ ByVal sLastWrite As Date, _ ByVal sShortName As String) ......... end sub Private Sub Timer1_Timer() If MTime > xpProgress1.Max Then MTime = xpProgress1.Min xpProgress1.Value = MTime Timer1 = False Else MTime = MTime + 1 xpProgress1.Value = MTime End If End Sub

Problem mit Progressbar!	508	Gamer20	08.06.04 08:49
Re: Problem mit Progressbar!	323	Dieter	08.06.04 09:44
Re: Problem mit Progressbar!	304	Gamer20	08.06.04 09:59
Re: Problem mit Progressbar!	285	Snoopy	08.06.04 12:06
Re: Problem mit Progressbar!	538	Gamer20	08.06.04 13:58

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen