Ribbons in PureBasic - WIP
Ribbons in PureBasic - WIP
Hallo liebe Gemeinde.
Ich will gar nicht viele Worte dazu verlieren. Ich arbeite gerade an einem Ribbon Clone für PureBasic.
Das sieht mittlerweile so aus:
Und fühlt sich so an:
Ribbon_Test.zip
Sollte bis Win98 abwärtskompatibel sein.
Es ist noch einiges in der Pipeline, was ich integrieren will. Darum WIP!!
Ahh ... ich sehe nur noch blau
Die blauen Fesnter demonstrieren nur die Position von möglichen Zusatzfenstern (wie man es auf Word und Co ja kennt).
Das bleibt aber im Endeffekt dem Benutzer dann selbst überlassen.
Gruß, Morty
Ich will gar nicht viele Worte dazu verlieren. Ich arbeite gerade an einem Ribbon Clone für PureBasic.
Das sieht mittlerweile so aus:
Und fühlt sich so an:
Ribbon_Test.zip
Sollte bis Win98 abwärtskompatibel sein.
Es ist noch einiges in der Pipeline, was ich integrieren will. Darum WIP!!
Ahh ... ich sehe nur noch blau
Die blauen Fesnter demonstrieren nur die Position von möglichen Zusatzfenstern (wie man es auf Word und Co ja kennt).
Das bleibt aber im Endeffekt dem Benutzer dann selbst überlassen.
Gruß, Morty
Re: Ribbons in PureBasic - WIP
Danke
Ich versuche es auch so einfach wie möglich zu halten.
Der Code für das Beispielprogramm sieht so aus (nur als Info)
Gruß, Morty
Ich versuche es auch so einfach wie möglich zu halten.
Der Code für das Beispielprogramm sieht so aus (nur als Info)
Code: Alles auswählen
Ribbon_Init()
OpenWindow(#main_win,#PB_Ignore,#PB_Ignore,800,600,"Ribbon Test",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
Ribbon_New(#main_win)
card1.i=Ribbon_AddRegister(#main_win,"Start")
;Container dazu
con_1.i=Ribbon_AddContainer(card1.i,"Zwischenablage")
;Buttons in den Container
Ribbon_AddFullSizeButton(con_1.i,Button1Image.i,"Einfügen",@Button1_Callback())
Ribbon_AddFullSizeButton(con_1.i,Button1Image.i,"Ausfügen",@Button1_Callback())
Ribbon_AddSeparator(con_1.i)
btn_disabled.i=Ribbon_AddFullSizeButton(con_1.i,Button1Image.i,"Abfügen",@Button1_Callback())
Ribbon_AddFullSizeButton(con_1.i,Button1Image.i,"Zufügen",@Button1_Callback())
con_2.i=Ribbon_AddContainer(card1.i,"Schriftart")
Ribbon_AddFullSizeButton(con_2.i,Button1Image.i,"Anzünden",@Button1_Callback())
con_3.i=Ribbon_AddContainer(card1.i,"Bearbeiten")
;Buttons vorbereiten
con_3_btn_1.i=Ribbon_AddButton4Stack(LoadImage(#PB_Any,"find.png"),"Suchen",@Button1_Callback(), @Button1_Callback())
con_3_btn_2.i=Ribbon_AddButton4Stack(LoadImage(#PB_Any,"text_replace.png"),"Ersetzen",@Button1_Callback())
con_3_btn_3.i=Ribbon_AddButton4Stack(LoadImage(#PB_Any,"cursor.png"),"Markieren",@Button1_Callback())
Ribbon_AddButtonStack(con_3,con_3_btn_1.i,con_3_btn_2.i,con_3_btn_3.i)
card2.i=Ribbon_AddRegister(#main_win,"Einfügen")
con_4.i=Ribbon_AddContainer(card2.i,"Seite 2")
Ribbon_AddFullSizeButton(con_4.i,Button1Image.i,"Einfügen",@Button1_Callback())
Ribbon_AddSeparator(con_4.i)
Ribbon_AddButtonStack(con_4,con_3_btn_1.i,con_3_btn_2.i,con_3_btn_3.i)
Ribbon_AddSeparator(con_4.i)
card3.i=Ribbon_AddRegister(#main_win,"Seitenlayout")
Ribbon_Register_SetActive(#main_win, card1.i)
Ribbon_Create(#main_win)
Re: Ribbons in PureBasic - WIP
Stark Kann mich nur anschliessen - bitte weitermachen!!!
"Papa, mein Wecker funktioniert nicht! Der weckert immer zu früh."
- NicTheQuick
- Ein Admin
- Beiträge: 8677
- Registriert: 29.08.2004 20:20
- Computerausstattung: Ryzen 7 5800X, 32 GB DDR4-3200
Ubuntu 22.04.3 LTS
GeForce RTX 3080 Ti - Wohnort: Saarbrücken
- Kontaktdaten:
Re: Ribbons in PureBasic - WIP
Hallo,
schaut schon toll aus. Aber bitte, Cross-Plattform machen (CompilerIf), sonst kann das wieder kaum jemand brauchen. In der Umfrage im englischen Forum kommt klar raus, dass immer mehr Leute gerne Cross-Plattform machen. Wäre super, wenn sich das auch ein bisschen auf diese Art von Projekten auswirkt. Ich finden dieses Ribbon-Include wirklich gut. Wäre schön, das auch unter Linux und MacOS zu nutzen.
Grüße,
Kukulkan
schaut schon toll aus. Aber bitte, Cross-Plattform machen (CompilerIf), sonst kann das wieder kaum jemand brauchen. In der Umfrage im englischen Forum kommt klar raus, dass immer mehr Leute gerne Cross-Plattform machen. Wäre super, wenn sich das auch ein bisschen auf diese Art von Projekten auswirkt. Ich finden dieses Ribbon-Include wirklich gut. Wäre schön, das auch unter Linux und MacOS zu nutzen.
Grüße,
Kukulkan
Re: Ribbons in PureBasic - WIP
kann ja sein, dass mehr und mehr Leute Crossplattform programmieren (oder esKukulkan hat geschrieben:sonst kann das wieder kaum jemand brauchen.
zumindest ab und zu probieren wollen), aber IMO ist die große Mehrheit der
Programmierer noch immer mit Windows unterwegs. Deswegen halte ich obige
Aussage für etwas übertrieben.
Grüße ... Kiffi
Hygge
Re: Ribbons in PureBasic - WIP
Mac User sind einfach emotionaler ^^
"Papa, mein Wecker funktioniert nicht! Der weckert immer zu früh."
Re: Ribbons in PureBasic - WIP
Ich schließe mich da Kiffi an. Die Aussage "sonst kann das wieder kaum jemand brauchen." ist wirklich etwas übertrieben.
Außerdem mache ich es hauptsächlich für mich ... und ich kann es brauchen
Und wo ich einmal hier bin, mache ich auch gleich ein Statement dazu:
Crossplattform - wohl vorerst nicht aus folgendem Grund:
Ich nutze ein paar Dinge aus der Windows API und habe mich NOCH NIE mit Linux oder MacOS beschäftigt. Daher kenne ich weder
die entprechende Funktion auf dem System, noch kann ich es testen.
Aber wer weiß ... man lernt ja nie aus
Gruß, Morty
Außerdem mache ich es hauptsächlich für mich ... und ich kann es brauchen
Und wo ich einmal hier bin, mache ich auch gleich ein Statement dazu:
Crossplattform - wohl vorerst nicht aus folgendem Grund:
Ich nutze ein paar Dinge aus der Windows API und habe mich NOCH NIE mit Linux oder MacOS beschäftigt. Daher kenne ich weder
die entprechende Funktion auf dem System, noch kann ich es testen.
Aber wer weiß ... man lernt ja nie aus
Gruß, Morty
Re: Ribbons in PureBasic - WIP
Sieht fein aus!
Wird eigentlich das System-Design bzw. die -Farben berücksichtigt? Wenn nicht, werden sich die Win98-Anhänger (keine Klicki-Bunti-Grafik™), die es durchaus noch zu geben scheint, bestimmt freuen:Morty hat geschrieben:Sollte bis Win98 abwärtskompatibel sein.
"Menschenskinder, das Niveau dieses Forums singt schon wieder!" — GronkhLP ||| "ich hogffe ihr könnt den fehle endecken" — Marvin133 ||| "Ideoten gibts ..." — computerfreak ||| "Jup, danke. Gruss" — funkheld