[Module] DynamicGUI

Thorsten1867 · **Registriert:** 04.02.2005 15:40 **Wohnort:** Kaufbeuren

Ich habe das "DynamicDialogs"-Module von PureLust an meine Bedürfnisse angepasst und um eine Speicherfunktion für die letzte Fensterposition und -größe erweitert.

Download: DynamicGUI_Module.pbi

Code:

; added:   Speichern, laden & wiederherstellen von Fensterpositionen & -größen
; added:   GetWinID(DialogID.i) & GetGadgetID(DialogID.i, Name.s) 
; changed: Anpassung der Befehlsnamen für den Aufruf mittels "DynGUI::"
; changed: Makros durch Proceduren ersetzt, da diese den compilerten Code unnötig "aufblähen"
; changed: T2H() -> TXT2XML(), da eine Maskierung der Strings für XML (anstatt HTML) logischer erscheint
; changed: CreateUUID() für fehlende Image-Namen
; changed: Bugfix Macro 'Auswertung_Parameter_URL' (URL$ => XML$)
; changed: Struktur 'Struct_XMLout' anstatt einzelner Variablen
; changed: Lesbarkeit des Codes verbessert & Ersetzen der "unsäglichen" Tabulatoren durch Leerzeichen
; changed: diverse Bugfixes

Thorsten1867 · **Registriert:** 04.02.2005 15:40 **Wohnort:** Kaufbeuren

Dynamische GUI

- Automatische Größenanpassung von Gadget bei Änderung der Fenstergröße (basierend auf Dialog-Befehlsbibliothek)
- Speichern und wiederherstellen der letzten Fensterposition und/oder -größe

===== DynamicGUI - Befehle =====

DynGUI::ClearXML()

DynGUI::ShowNodeErrors()

DynGUI::ClearXML()

DynGUI::GetXML()

DynGUI::SetXML()

DynGUI::AddXML()

DynGUI::CloseNode()

DynGUI::CheckDialog()

DynGUI::Font()

DynGUI::FontByID()

DynGUI::GetWinID()

DynGUI::GetGadgetID()

DynGUI::SaveWindowsData()

DynGUI::LoadWindowsData()

DynGUI::RestoreWinPosition()

DynGUI::RestoreWinSize()

DynGUI::RestoreWindow()

DynGUI::OpenWindowXML() & CloseWindowXML()

DynGUI::DialogXML() & EndDialogXML()

DynGUI::WindowXML() & EndWindowXML()

DynGUI::vBoxXML() & EndVBoxXML()

DynGUI::hBoxXML() & EndHBoxXML()

DynGUI::GridBoxXML() & EndGridBoxXML()

DynGUI::MultiBoxXML() & EndMultiBoxXML()

DynGUI::SingleBoxXML() & EndSingleBoxXML()

DynGUI::EmptyXML()

DynGUI::ContainerXML() & EndContainerXML()

DynGUI::FrameXML() & EndFrameXML()

DynGUI::PanelXML() & EndPanelXML()

DynGUI::TabXML() & EndTabXML()

DynGUI::ScrollAreaXML() & EndScrollAreaXML()

DynGUI::SplitterXML() & EndSplitterXML()

DynGUI::ButtonXML()

DynGUI::ButtonImageXML()

DynGUI::CalendarXML()

DynGUI::CanvasXML()

DynGUI::CheckBoxXML()

DynGUI::ComboBoxXML()

DynGUI::DateTimeXML()

DynGUI::EditorXML()

DynGUI::ExplorerComboXML()

DynGUI::ExplorerListXML()

DynGUI::ExplorerTreeXML()

DynGUI::HyperLinkXML()

DynGUI::IPAddressXML()

DynGUI::ImageXML()

DynGUI::ListIconXML()

DynGUI::ListViewXML()

DynGUI::OptionXML()

DynGUI::ScrollBarXML()

DynGUI::SpinXML()

DynGUI::StringXML()

DynGUI::TextXML()

DynGUI::TrackBarXML()

DynGUI::TreeXML()

DynGUI::WebXML()

DynGUI::ScintillaXML()

oO0XX0Oo · **Registriert:** 21.07.2017 22:36

Hi,

danke sehr für dieses tolle Modul!

Es gibt einen kleinen bug bezüglich der Funktion ButtonXML().
Sie funktioniert nicht korrekt, zumindest nicht, wenn man die
ID als Referenz benutzen will.

Ab Zeile 1703 beginnt die Prozedur und ihr fehlt der Eintrag für die ID.

Momentan:

Code:

  Procedure.s ButtonXML(ID=#PB_Ignore, Name$="", Text$="", Flags=0, Width=#PB_Default, Height=#PB_Default, Align=#PB_Default, Margin$="", ColSpan=#PB_Ignore, RowSpan=#PB_Ignore, XmlParam$="")
    Protected XML$ = "<button"
    
    SetParameterCurrentFont(ID, Name$)     ; Parameter: ID
    
    XML$ + GetParameterName(Name$)         ; Parameter: Name$

Ändert man es auf:

Code:

  Procedure.s ButtonXML(ID=#PB_Ignore, Name$="", Text$="", Flags=0, Width=#PB_Default, Height=#PB_Default, Align=#PB_Default, Margin$="", ColSpan=#PB_Ignore, RowSpan=#PB_Ignore, XmlParam$="")
    Protected XML$ = "<button"
    
    SetParameterCurrentFont(ID, Name$)     ; Setze Gadget-Font, wenn ActFontID <> #PB_Default
    
    XML$ + GetParameterID(ID)              ; Parameter: ID
    XML$ + GetParameterName(Name$)         ; Parameter: Name$

Funktioniert es auch mit der ID einwandfrei...

Siehst du evtl. eine Möglichkeit, Menüs / Toolbars innerhalb DynamicGUI mit unterstützen zu können?
Ich weiß, DynamicDialogs unterstützt das im Original nicht, aber der Programmierer scheint
MIA (missing in action) zu sein, so dass es nicht sonderlich viel Sinn macht, in dessen
thread noch danach zu fragen...

Thorsten1867 · **Registriert:** 04.02.2005 15:40 **Wohnort:** Kaufbeuren

Die Dialog-Befehlsbibliothek unterstützt leider weder Menü- noch Toolbar.

oO0XX0Oo · **Registriert:** 21.07.2017 22:36

viewtopic.php?p=343882&sid=2673d2c331400363948e9d49a4f1f3db#p343882

Unterstützung für die Verwendung von Menüs und einer Statusbar wurde hinzugefügt...

Könntest du die Änderungen in deiner Version evtl. auch mit einbauen?

Danke sehr!

PureBoard

[Module] DynamicGUI

Wer ist online?