Italia
Foro

Unbewegliche Statuszeile

 

efisch
Ich benutze eine mehrteilige Statuszeile, die ich mit
KompilierenMarkierenSeparieren
DEF @CREATESTATUSBAR(6) @control("msctls_statusbar32",@$(2),$50800040,
@%(3),@%(4),@%(5),@%(6),@%(1),101,%HInstance)e>
erzeuge. Das geht auch gut, solange die Fenstergröße nicht geändert wird.
Dann bleibt die Statuszeile einfach stehen oder verschwindet aus dem Fenster (beim verkleinern).
Nach SetWindowPos Handle& = 0,0-0,0 ist alles wieder im Lot.
Da meine eigene Cerca (Englisch-Kenntnisse wären vielleicht hilfreich gewesen ) keine verwertbaren
Ergebnisse geliefert hat, die Frage an euch:
Gibt es einen Stil, der die Anpassung automatisch erledigt?

Herzliche Grüße
ebi
 
20.10.2005  
 



Nein.

Die Statusbar muß immer angeschubst werden.

Am Besten und am Saubersten ist das Anschubsen so:
KompilierenMarkierenSeparieren
external("user32","SetWindowPos",sb&,0,0,0,0,0,28)
external("user32","InvalidateRect",sb&,0,0)
external("user32","UpdateWindow",sb&)re>
Das Neuzeichnen wird normalerweise von einem Programm im Fenstercallback veranlasst.

Salve, iF.
 
20.10.2005  
 




efisch
[quote:c2c09e6ed6=iF]Das Neuzeichnen wird normalerweise von einem Programm im Fenstercallback veranlasst.[/quote:c2c09e6ed6]Dazu fehlt mir z.Z. noch das Detailwissen
Ich muss mich also wohl ein wenig kundig machen. Kann jemand was empfehlen?

Danke
ebi
 
20.10.2005  
 



Schau mal das dürfe genau das sein was Du gerne hättest:
KompilierenMarkierenSeparieren
Set("FastMode",1)
def cwp(5) !"user32","CallWindowProcA"
Declare ex%,_owp&,sb&
Cls
_owp&:=external("user32","SetWindowLongA",%hwnd,-4, Procaddr(_wproc,4))
sb&:=create("StatusWindow",%hwnd,"Bereit.")

Whilenot ex%

    Waitinput

Endwhile

end

Proc _wproc

    Parameters Wnd&, Msg&, Wparam&, Lparam&

    if (msg&==16)// close

        ex%:=1

    elseif (msg& == 3)// move

    elseif (msg& == 5)// size

        _redrw

    elseif (msg& == 15)// paint

    elseif (msg& == 256)// keydwn

    elseif (msg& == $108)// keylast

    elseif (msg& == 522)// wheel

        if (wparam&>0)

        else

        endif

    Endif

    Return cwp(_owp&,Wnd&, Msg&, Wparam&, Lparam&)

Endproc

proc _redrw

    External("user32","SetWindowPos",Sb&,0,0,0,0,0,28)
    External("user32","InvalidateRect",Sb&,0,0)
    External("user32","UpdateWindow",Sb&)

endproc

Salve, iF.
 
20.10.2005  
 




efisch
Hallo iF,
dein Hinweis auf die Fenster-Callback-Prozedur war der entscheidende Hinweis.
Daraufhin habe ich in der Profan-Aiuto ein Beispiel gefunden und mit ShowWindow angepasst.
Scheint zu funktionieren.
Werde mit nachher dein Beispiel mal genauer ansehen, vielleicht fördert es ja mein Verständnis noch ein wenig.

Danke
ebi
 
21.10.2005  
 



Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

2.959 Views

Untitledvor 0 min.
RudiB.26.12.2021
Peter Max Müller07.10.2017
Ernst19.03.2014
E.T.07.01.2012
Di più...

Themeninformationen

Dieses Thema hat 2 subscriber:

efisch (3x)
iF (2x)


Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie