[phpBB Debug] PHP Warning: in file [ROOT]/ext/tas2580/privacyprotection/cron/task/anonymize_ip.php on line 83: A non-numeric value encountered
Inoffizielles deutsches Xbase-Forum • XbpProgressbar und Text [ERLEDIGT]
Seite 1 von 1

XbpProgressbar und Text [ERLEDIGT]

Verfasst: Mi, 27. Mär 2019 16:11
von Manfred
wäre es möglich den XbpProgressbar aufzubohren und in dem Laufbalken % oder Text anzuzeigen um den Fortschritt besser darstellen zu können?

Re: XbpProgressbar und Text

Verfasst: Mi, 27. Mär 2019 16:58
von mini990
die DXE Progressbar von Jimmy kann das.
Setze ich schon lange zur vollsten Zufriedenheit ein...

Gruß Stefan

Re: XbpProgressbar und Text

Verfasst: Mi, 27. Mär 2019 17:11
von Manfred
die hatte ich gerade kurz zwischen. Aber so wie ich erkennen konnte benötigt die ot4xb. Ich wollte eigentlich nicht noch eine Zusatzbib einbinden.

Re: XbpProgressbar und Text

Verfasst: Mi, 27. Mär 2019 17:14
von Koverhage
ot4xb wird mittlerweile in vielen "Fremd" Dlls eingesetzt. Da wundert es mich, das Du die nicht im Einsatz hast-

Re: XbpProgressbar und Text

Verfasst: Mi, 27. Mär 2019 17:16
von Manfred
ist ja nicht meine letzte und endgültige Entscheidung, aber schön wäre es, wenn es ohne weitere LIBs gehen würde.

Re: XbpProgressbar und Text

Verfasst: Mi, 27. Mär 2019 17:17
von Koverhage
ot4xb wird mittlerweile in vielen "Fremd" Dlls eingesetzt. Da wundert es mich, das Du die nicht im Einsatz hast-

Re: XbpProgressbar und Text

Verfasst: Mi, 27. Mär 2019 17:18
von Manfred
ich habe es schon verstanden Klaus, brauchst Du mir nur einmal zu schreiben ;-)

Re: XbpProgressbar und Text [ERLEDIGT]

Verfasst: Mi, 27. Mär 2019 17:42
von Manfred
ich bin mal wieder schusselig. Ich habe total vergessen, das ich den Progressbar in die Statusleiste in ein Static packe.
Da müßte es doch möglich sein den Text drüber oder drunter zu blenden. Ob man den Progressbar transparent machen kann?

Re: XbpProgressbar und Text [ERLEDIGT]

Verfasst: Mi, 27. Mär 2019 20:00
von Wolfgang Ciriack
Warum nimmst du nicht DCPROGRESS, da kann man die Prozente anzeigen.

Code: Alles auswählen

@10, 20 DCPROGRESS oProgress SIZE 48,0.8 TYPE XBPSTATIC_TYPE_RECESSEDBOX COLOR GRA_CLR_DARKBLUE ;
         PERCENT PERCENTCOLOR GRA_CLR_WHITE DYNAMIC EVERY 1 MAXCOUNT GesChanges

Re: XbpProgressbar und Text [ERLEDIGT]

Verfasst: Mi, 27. Mär 2019 20:02
von Manfred
ich hatte das mal vor längerer Zeit probiert. Entweder habe ich damals was falsch gemacht, oder das Teil war echt langsam.

Re: XbpProgressbar und Text [ERLEDIGT]

Verfasst: Mi, 27. Mär 2019 20:04
von Wolfgang Ciriack
Ja, bei großer Gesamtzahl sollte man die Aktualisierung mit EVERY steuern, jede Aktualisierung kostet Zeit.

Re: XbpProgressbar und Text [ERLEDIGT]

Verfasst: Do, 28. Mär 2019 3:14
von AUGE_OHR
Manfred hat geschrieben: Mi, 27. Mär 2019 17:42 ich bin mal wieder schusselig. Ich habe total vergessen, das ich den Progressbar in die Statusleiste in ein Static packe. Da müßte es doch möglich sein den Text drüber oder drunter zu blenden. Ob man den Progressbar transparent machen kann?
wir reden doch über den "grünen" Progressbar, oder :?:
der "grüne" Progressbar ist ein visual Style den kann man nicht "transparent" machen [-X

---

bin mir nicht sicher ob/wie man das Alaska Demo XbpProgressbar() "aufbohren" kann.
Problem : es gibt keine "Windows *_wndProc" wo ich den WM_PAINT abfangen kann, oder ?

unter ot4xb sieht es so aus

Code: Alles auswählen

METHOD DXE_ProgressBar:Xbp_Wndproc(hWnd,nMsg,wp,lp,ctx)

   IF nMsg == (WM_USER + 1 )
      ...
      ::hwndPB := @user32:CreateWindowExA(;
                       ::dwProgbarStyleEx ,;
                       PROGRESS_CLASS     ,;    // "msctls_progress32"
      ...
      IF ::UsePercent = .T. .OR. ::Percent = .T. .OR. ::UseShowTime = .T.
         // hier SubClass
         ot4xb_subclasswindow(::hwndPB,Self,,"Bar_Wndproc") 
      ENDIF
      RETURN 0 

METHOD DXE_ProgressBar:Bar_Wndproc(hWnd,nMsg,wp,lp,ctx)

   IF nMsg == WM_PAINT
      ...
      IF ::UsePercent = .T. .OR. ::Percent = .T.
           ::UseShowTime := .F.
           ps := PAINTSTRUCT():New()
           ...
      ELSEIF ::UseShowTime  = .T. 
            ::UsePercent := .F.
            ::Percent    := .F.
            ps := PAINTSTRUCT():New()
            ...
      ENDIF
   ENDIF
RETURN NIL

Re: XbpProgressbar und Text [ERLEDIGT]

Verfasst: Do, 28. Mär 2019 7:02
von AUGE_OHR
Wolfgang Ciriack hat geschrieben: Mi, 27. Mär 2019 20:00 Warum nimmst du nicht DCPROGRESS, da kann man die Prozente anzeigen.

Code: Alles auswählen

@10, 20 DCPROGRESS oProgress SIZE 48,0.8 TYPE XBPSTATIC_TYPE_RECESSEDBOX COLOR GRA_CLR_DARKBLUE ;
         PERCENT PERCENTCOLOR GRA_CLR_WHITE DYNAMIC EVERY 1 MAXCOUNT GesChanges
man kann auch den DXE_Progressbar() als Subclass verwenden

Code: Alles auswählen

  @ 0,0 DCPROGRESS oProgress ;
        TYPE XBPSTATIC_TYPE_TEXT ;
        MAXCOUNT nMaxCount ;
        PERCENT ;
        PERCENTCOLOR GRA_CLR_RED ;
        FONT '12.Arial Bold' ;
        EVERY 1 ;
        COLOR GRA_CLR_CYAN, GRA_CLR_BACKGROUND ;
        SIZE 300,20 ;
        PIXEL ;
        RADIUS 20 ;
        OUTLINE ;
        DYNAMIC ;
        SUBCLASS 'MyProgressBar()'
xs6.zip
Subclass MyProgressBar Source for Express++
(1.92 KiB) 200-mal heruntergeladen