mit dieser Bibliothek kann man ein GridGadget erstellen, wie man es in .NET Forms kennt.
Screenshot:
Funktionen:
- GridGadget()
- Syntax:
Code: Alles auswählen
Result = GridGadget(ID, X, Y, Width, Height, Flags, ParentWindowID, @ErrorOutput$)
- Beschreibung: Erstellt ein neues GridGadget.
- Parameter:
- ID: Eine eindeutige Nummer. #PB_Any kann verwendet werden, um die Nummer automatisch zu generieren.
- X: Die Position des Gadgets auf dem Fenster.
- Y: Die Position des Gadgets auf dem Fenster.
- Width: Die Breite des Gdgets auf dem Fenster.
- Height: Die Höhe des Gdgets auf dem Fenster.
- Flags: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_Flag_AllowAddRows
- #PBEx_GridGadget_Flag_AllowDeleteRows
- #PBEx_GridGadget_Flag_AllowOrderColumns
- #PBEx_GridGadget_Flag_AllowResizeColumns
- #PBEx_GridGadget_Flag_AllowResizeRows
- #PBEx_GridGadget_Flag_AllowResizeColumnHeight
- #PBEx_GridGadget_Flag_AllowResizeRowWidth
- #PBEx_GridGadget_Flag_HideColumnHeader
- #PBEx_GridGadget_Flag_HideRowHeader
- #PBEx_GridGadget_Flag_MultiSelect
- #PBEx_GridGadget_Flag_ReadOnly
- #PBEx_GridGadget_Flag_AutoColumnWidth
- ParentWindowID: Die ID des Fensters, auf dem das Gadget erstellt werden soll. Die ID des Fensters kann mit WindowID() ermittelt werden.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich. Falls #PB_Any verwendet wird, dann wird die ID zurückgegeben.
- Beispielcode:
Code: Alles auswählen
;1.0.2.0 EnableExplicit Global PBEx_GridGadget #PBEx_GridGadget_Version$ = "1.0.2.0" #PBEx_GridGadget_Flag_AllowAddRows = 1 #PBEx_GridGadget_Flag_AllowDeleteRows = 2 #PBEx_GridGadget_Flag_AllowOrderColumns = 4 #PBEx_GridGadget_Flag_AllowResizeColumns = 8 #PBEx_GridGadget_Flag_AllowResizeRows = 16 #PBEx_GridGadget_Flag_AllowResizeColumnHeight = 32 #PBEx_GridGadget_Flag_AllowResizeRowWidth = 64 #PBEx_GridGadget_Flag_HideColumnHeader = 128 #PBEx_GridGadget_Flag_HideRowHeader = 256 #PBEx_GridGadget_Flag_MultiSelect = 512 #PBEx_GridGadget_Flag_ReadOnly = 1024 #PBEx_GridGadget_Flag_AutoColumnWidth = 2048 #PBEx_GridGadget_Type_Text = 0 #PBEx_GridGadget_Type_Date = 7 #PBEx_GridGadget_Type_Lowercase = 12 #PBEx_GridGadget_Type_Uppercase = 13 #PBEx_GridGadget_Type_Percent = 15 #PBEx_GridGadget_Direction_Ascending = 0 #PBEx_GridGadget_Direction_Descending = 1 #PBEx_GridGadget_ColumnWidth_AutoColumnWidth = -1 #PBEx_GridGadget_Attribute_SelectType = 1 #PBEx_GridGadget_Attribute_SelectType_CellSelect = 1 #PBEx_GridGadget_Attribute_SelectType_FullRowSelect = 2 #PBEx_GridGadget_Attribute_SelectType_RowHeaderSelect = 4 #PBEx_GridGadget_ColorType_FrontColor = 1 #PBEx_GridGadget_ColorType_BackColor = 2 CompilerIf #PB_Compiler_Processor = #PB_Processor_x86 PBEx_GridGadget = OpenLibrary(#PB_Any, "PB.Ex_GridGadget_x86.dll") CompilerElseIf #PB_Compiler_Processor = #PB_Processor_x64 PBEx_GridGadget = OpenLibrary(#PB_Any, "PB.Ex_GridGadget_x64.dll") CompilerEndIf If PBEx_GridGadget Prototype GridGadget(ID, X, Y, Width, Height, Flags, ParentWindowID, ErrorOutput) Global GridGadget.GridGadget = GetFunction(PBEx_GridGadget, "GridGadget") Prototype AddGridGadgetColumn(ID, Position, Type, Text.p-Unicode, Width, ErrorOutput) Global AddGridGadgetColumn.AddGridGadgetColumn = GetFunction(PBEx_GridGadget, "AddGridGadgetColumn") Prototype RemoveGridGadgetColumn(ID, Position, ErrorOutput) Global RemoveGridGadgetColumn.RemoveGridGadgetColumn = GetFunction(PBEx_GridGadget, "RemoveGridGadgetColumn") Prototype AddGridGadgetItem(ID, Position, Text.p-Unicode, ErrorOutput) Global AddGridGadgetItem.AddGridGadgetItem = GetFunction(PBEx_GridGadget, "AddGridGadgetItem") Prototype RemoveGridGadgetItem(ID, Position, ErrorOutput) Global RemoveGridGadgetItem.RemoveGridGadgetItem = GetFunction(PBEx_GridGadget, "RemoveGridGadgetItem") Prototype CountGridGadgetColumns(ID, ErrorOutput) Global CountGridGadgetColumns.CountGridGadgetColumns = GetFunction(PBEx_GridGadget, "CountGridGadgetColumns") Prototype CountGridGadgetItems(ID, ErrorOutput) Global CountGridGadgetItems.CountGridGadgetItems = GetFunction(PBEx_GridGadget, "CountGridGadgetItems") Prototype ClearGridGadgetColumns(ID, ErrorOutput) Global ClearGridGadgetColumns.ClearGridGadgetColumns = GetFunction(PBEx_GridGadget, "ClearGridGadgetColumns") Prototype ClearGridGadgetItems(ID, ErrorOutput) Global ClearGridGadgetItems.ClearGridGadgetItems = GetFunction(PBEx_GridGadget, "ClearGridGadgetItems") Prototype GetGridGadgetColumnText(ID, Position, Output, ErrorOutput) Global GetGridGadgetColumnText.GetGridGadgetColumnText = GetFunction(PBEx_GridGadget, "GetGridGadgetColumnText") Prototype SetGridGadgetColumnText(ID, Position, Text.p-Unicode, ErrorOutput) Global SetGridGadgetColumnText.SetGridGadgetColumnText = GetFunction(PBEx_GridGadget, "SetGridGadgetColumnText") Prototype GetGridGadgetItemText(ID, Position, Column, Output, ErrorOutput) Global GetGridGadgetItemText.GetGridGadgetItemText = GetFunction(PBEx_GridGadget, "GetGridGadgetItemText") Prototype SetGridGadgetItemText(ID, Position, Column, Text.p-Unicode, ErrorOutput) Global SetGridGadgetItemText.SetGridGadgetItemText = GetFunction(PBEx_GridGadget, "SetGridGadgetItemText") Prototype FreeGridGadget(ID, ErrorOutput) Global FreeGridGadget.FreeGridGadget = GetFunction(PBEx_GridGadget, "FreeGridGadget") Prototype GridGadgetWidth(ID, ErrorOutput) Global GridGadgetWidth.GridGadgetWidth = GetFunction(PBEx_GridGadget, "GridGadgetWidth") Prototype GridGadgetHeight(ID, ErrorOutput) Global GridGadgetHeight.GridGadgetHeight = GetFunction(PBEx_GridGadget, "GridGadgetHeight") Prototype GridGadgetX(ID, ErrorOutput) Global GridGadgetX.GridGadgetX = GetFunction(PBEx_GridGadget, "GridGadgetX") Prototype GridGadgetY(ID, ErrorOutput) Global GridGadgetY.GridGadgetY = GetFunction(PBEx_GridGadget, "GridGadgetY") Prototype GridGadgetID(ID, ErrorOutput) Global GridGadgetID.GridGadgetID = GetFunction(PBEx_GridGadget, "GridGadgetID") Prototype HideGridGadget(ID, State, ErrorOutput) Global HideGridGadget.HideGridGadget = GetFunction(PBEx_GridGadget, "HideGridGadget") Prototype IsGridGadget(ID, ErrorOutput) Global IsGridGadget.IsGridGadget = GetFunction(PBEx_GridGadget, "IsGridGadget") Prototype ResizeGridGadget(ID, X, Y, Width, Height, ErrorOutput) Global ResizeGridGadget.ResizeGridGadget = GetFunction(PBEx_GridGadget, "ResizeGridGadget") Prototype SortGridGadgetColumn(ID, Column, Direction, ErrorOutput) Global SortGridGadgetColumn.SortGridGadgetColumn = GetFunction(PBEx_GridGadget, "SortGridGadgetColumn") Prototype DisableGridGadget(ID, State, ErrorOutput) Global DisableGridGadget.DisableGridGadget = GetFunction(PBEx_GridGadget, "DisableGridGadget") Prototype SetGridGadgetAttribute(ID, Attribute, Value, ErrorOutput) Global SetGridGadgetAttribute.SetGridGadgetAttribute = GetFunction(PBEx_GridGadget, "SetGridGadgetAttribute") Prototype GetGridGadgetAttribute(ID, Attribute, ErrorOutput) Global GetGridGadgetAttribute.GetGridGadgetAttribute = GetFunction(PBEx_GridGadget, "GetGridGadgetAttribute") Prototype GetGridGadgetState(ID, ErrorOutput) Global GetGridGadgetState.GetGridGadgetState = GetFunction(PBEx_GridGadget, "GetGridGadgetState") Prototype GetGridGadgetItemState(ID, Position, Column, ErrorOutput) Global GetGridGadgetItemState.GetGridGadgetItemState = GetFunction(PBEx_GridGadget, "GetGridGadgetItemState") Prototype SetGridGadgetState(ID, Position, State, ErrorOutput) Global SetGridGadgetState.SetGridGadgetState = GetFunction(PBEx_GridGadget, "SetGridGadgetState") Prototype SetGridGadgetItemState(ID, Position, Column, State, ErrorOutput) Global SetGridGadgetItemState.SetGridGadgetItemState = GetFunction(PBEx_GridGadget, "SetGridGadgetItemState") Prototype SetGridGadgetColor(ID, ColorType, Color, ErrorOutput) Global SetGridGadgetColor.SetGridGadgetColor = GetFunction(PBEx_GridGadget, "SetGridGadgetColor") Prototype GetGridGadgetColor(ID, ColorType, ErrorOutput) Global GetGridGadgetColor.GetGridGadgetColor = GetFunction(PBEx_GridGadget, "GetGridGadgetColor") Prototype SetGridGadgetItemColor(ID, Position, Column, ColorType, Color, ErrorOutput) Global SetGridGadgetItemColor.SetGridGadgetItemColor = GetFunction(PBEx_GridGadget, "SetGridGadgetItemColor") Prototype GetGridGadgetItemColor(ID, Position, Column, ColorType, ErrorOutput) Global GetGridGadgetItemColor.GetGridGadgetItemColor = GetFunction(PBEx_GridGadget, "GetGridGadgetItemColor") EndIf Global Output$ = Space(1024) Global ErrorOutput$ = Space(128) Global a If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) GridGadget(1, 0, 0, 500, 400, #PBEx_GridGadget_Flag_AllowAddRows | #PBEx_GridGadget_Flag_AllowDeleteRows | #PBEx_GridGadget_Flag_AutoColumnWidth | #PBEx_GridGadget_Flag_MultiSelect, WindowID(0), @ErrorOutput$) AddGridGadgetColumn(1, -1, 0, "Column 1", 100, @ErrorOutput$) AddGridGadgetColumn(1, -1, 0, "Column 2", 100, @ErrorOutput$) AddGridGadgetColumn(1, -1, 0, "Column 3", 100, @ErrorOutput$) For a=1 To 9 AddGridGadgetItem(1, -1, "Hello " + Str(a) + Chr(10) + "PureBasic " + Str(a) + Chr(10) + "Friends " + Str(a), @ErrorOutput$) Next Repeat Select WaitWindowEvent() Case #PB_Event_CloseWindow CloseLibrary(PBEx_GridGadget) End EndSelect ForEver EndIf
- Syntax:
Code: Alles auswählen
Result = AddGridGadgetColumn(ID, Position, Type, Text$, Width, @ErrorOutput$)
- Beschreibung: Fügt eine neue Spalte hinzu.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Legt die Position fest, die aufsteigend ist. Der Wert "-1" kann verwendet werden, um die Spalte immer am Ende hinzuzufügen.
- Type: Legt den Typ der Spalte fest. Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_Type_Text
- #PBEx_GridGadget_Type_Date
- #PBEx_GridGadget_Type_Lowercase
- #PBEx_GridGadget_Type_Uppercase
- #PBEx_GridGadget_Type_Percent
- Text$: Die Überschrift der Spalte.
- Width: Die Breite der Spalte. Wenn #PBEx_GridGadget_Flag_AutoColumnWidth verwendet wird, dann wird dieser Parameter ignoriert. #PBEx_GridGadget_ColumnWidth_AutoColumnWidth kann verwendet werden, um die Spaltenbreite an die verfügbare Breite automatisch anzupassen.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = RemoveGridGadgetColumn(ID, Position, @ErrorOutput$)
- Beschreibung: Entfernt eine vorhandene Spalte. Nach dem Löschen werden alle Zellenwerte dieser Spalte ebenfalls entfernt.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Spalte.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = AddGridGadgetItem(ID, Position, Text$, @ErrorOutput$)
- Beschreibung: Fügt eine neue Zeile hinzu.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Legt die Position fest, die aufsteigend ist. Der Wert "-1" kann verwendet werden, um die Zeile immer am Ende hinzuzufügen.
- Text$: Der Text für die erste Zelle. Chr(10) kann verwendet werden, um Texte für weitere Zellen einzufügen.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = RemoveGridGadgetItem(ID, Position, @ErrorOutput$)
- Beschreibung: Entfernt eine vorhandene Zeile. Alle Zellenwerte dieser Zeile werden ebenfalls gelöscht.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = CountGridGadgetColumns(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Anzahl der Spalten.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Anzahl der Spalten.
- Syntax:
Code: Alles auswählen
Result = CountGridGadgetItems(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Anzahl der Zeilen.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Anzahl der Zeilen.
- Syntax:
Code: Alles auswählen
Result = ClearGridGadgetColumns(ID, @ErrorOutput$)
- Beschreibung: Entfernt alle Spalten. Alle Zeilen werden ebenfalls gelöscht.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = ClearGridGadgetItems(ID, @ErrorOutput$)
- Beschreibung: Entfernt alle Zeilen.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetColumnText(ID, Position, @Output$, @ErrorOutput$)
- Beschreibung: Ermittelt die Überschrift einer Spalte.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Spalte.
- @Output$: Die Überschrift der Spalte wird in diese Variable gespeichert. Wenn 0 übergeben wurde, dann wird die Länge als Rückgabewert zurückgegeben.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetColumnText(ID, Position, Text$, @ErrorOutput$)
- Beschreibung: Ändert die Überschrift einer Spalte.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Spalte.
- Text$: Die neue Überschrift der Spalte.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetItemText(ID, Position, Column, @Output$, @ErrorOutput$)
- Beschreibung: Ermittelt den Inhalt einer Zelle.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- Column: Die Position der Spalte.
- @Output$: Der Inhalt der Zelle wird in diese Variable gespeichert. Wenn 0 übergeben wurde, dann wird die Länge als Rückgabewert zurückgegeben.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetItemText(ID, Position, Column, Text$, @ErrorOutput$)
- Beschreibung: Ändert den Inhalt einer Zelle.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- Column: Die Position der Spalte.
- Text$: Der neue Inhalt der Zelle.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = FreeGridGadget(ID, @ErrorOutput$)
- Beschreibung: Gibt das Gadget frei.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = GridGadgetWidth(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Breite des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Die Breite des Gadgets.
- Syntax:
Code: Alles auswählen
Result = GridGadgetWidth(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Höhe des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Die Höhe des Gadgets.
- Syntax:
Code: Alles auswählen
Result = GridGadgetX(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Position des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Die Position des Gadgets.
- Syntax:
Code: Alles auswählen
Result = GridGadgetY(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Position des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Die Position des Gadgets.
- Syntax:
Code: Alles auswählen
Result = GridGadgetID(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Handle-Nummer des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Die Handle-Nummer des Gadgets.
- Syntax:
Code: Alles auswählen
Result = HideGridGadget(ID, State, @ErrorOutput$)
- Beschreibung: Versteckt oder zeigt das Gadget an.
- Parameter:
- ID: Die Nummer des Gadgets.
- State:
- 0: Zeigt das Gadget an.
- 1: Versteckt das Gadget.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = IsGridGadget(ID, @ErrorOutput$)
- Beschreibung: Überprüft, ob das Gadget gültig ist.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Das Gadget ist gültig.
- Syntax:
Code: Alles auswählen
Result = ResizeGridGadget(ID, X, Y, Width, Height, @ErrorOutput$)
- Beschreibung: Ändert die Position und Größe des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- X: Die neue Position des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
- Y: Die neue Position des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
- Width: Die neue Höhe des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
- Height: Die neue Breite des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = SortGridGadgetColumn(ID, Column, Direction, @ErrorOutput$)
- Beschreibung: Sortiert eine Spalte.
- Parameter:
- ID: Die Nummer des Gadgets.
- Column: Die Position der Spalte.
- Direction: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_Direction_Ascending
- #PBEx_GridGadget_Direction_Descending
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = DisableGridGadget(ID, State, @ErrorOutput$)
- Beschreibung: Aktiviert oder deaktiviert das Gadget.
- Parameter:
- ID: Die Nummer des Gadgets.
- State:
- 0: Gadget wird aktiviert.
- 1: Gadget wird deaktiviert.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetAttribute(ID, Attribute, Value, @ErrorOutput$)
- Beschreibung: Ändert mit Hilfe des Attributes eine Einstellung.
- Parameter:
- ID: Die Nummer des Gadgets.
- Attribute: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_Attribute_SelectType
- Value: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_Attribute_SelectType:
- #PBEx_GridGadget_Attribute_SelectType_CellSelect: Nur einzelne Zellen sind markierbar, keine ganzen Zeilen.
- #PBEx_GridGadget_Attribute_SelectType_FullRowSelect: Nur ganze Zeilen sind markierbar.
- #PBEx_GridGadget_Attribute_SelectType_RowHeaderSelect: Einzelne Zellen und ganze Zeilen sind markierbar.
- #PBEx_GridGadget_Attribute_SelectType:
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetAttribute(ID, Attribute, @ErrorOutput$)
- Beschreibung: Ermittelt mit Hilfe des Attributes den Wert der Einstellung.
- Parameter:
- ID: Die Nummer des Gadgets.
- Attribute: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_Attribute_SelectType
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- #PBEx_GridGadget_Attribute_SelectType:
- #PBEx_GridGadget_Attribute_SelectType_CellSelect: Nur einzelne Zellen sind markierbar, keine ganzen Zeilen.
- #PBEx_GridGadget_Attribute_SelectType_FullRowSelect: Nur ganze Zeilen sind markierbar.
- #PBEx_GridGadget_Attribute_SelectType_RowHeaderSelect: Einzelne Zellen und ganze Zeilen sind markierbar.
- #PBEx_GridGadget_Attribute_SelectType:
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetState(ID, @ErrorOutput$)
- Beschreibung: Ermittelt die Position der ersten ausgewählten Zeile.
- Parameter:
- ID: Die Nummer des Gadgets.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: Die Position der ersten ausgewählten Zeile.
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetItemState(ID, Position, Column, @ErrorOutput$)
- Beschreibung: Überprüft, ob die angegebene Zelle ausgewählt ist.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- Column: Die Position der Spalte.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Die Zelle ist ausgewählt.
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetState(ID, Position, State, @ErrorOutput$)
- Beschreibung: Wählt die angegebene Zeile aus.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- State:
- 0: Hebt die Auswahl auf.
- 1: Auswählen
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetItemState(ID, Position, Column, State, @ErrorOutput$)
- Beschreibung: Wählt die angegebene Zelle aus.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- Column: Die Position der Spalte.
- State:
- 0: Hebt die Auswahl auf.
- 1: Auswählen
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Die Zelle ist ausgewählt.
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetColor(ID, ColorType, Color, @ErrorOutput$)
- Beschreibung: Ändert die Farbe des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- ColorType: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_ColorType_FrontColor
- #PBEx_GridGadget_ColorType_BackColor
- Color: Die Farbe, die mit RGB() festgelegt werden kann.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetColor(ID, ColorType, @ErrorOutput$)
- Beschreibung: Ermittelt die Farbe des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- ColorType: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_ColorType_FrontColor
- #PBEx_GridGadget_ColorType_BackColor
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: RGB-Farbe
- Syntax:
Code: Alles auswählen
Result = SetGridGadgetItemColor(ID, Position, Column, ColorType, Color, @ErrorOutput$)
- Beschreibung: Ändert die Farbe des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- Column: Die Position der Spalte.
- ColorType: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_ColorType_FrontColor
- #PBEx_GridGadget_ColorType_BackColor
- Color: Die Farbe, die mit RGB() festgelegt werden kann.
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert:
- 1: Der Vorgang war erfolgreich.
- Syntax:
Code: Alles auswählen
Result = GetGridGadgetItemColor(ID, Position, Column, ColorType, @ErrorOutput$)
- Beschreibung: Ermittelt die Farbe des Gadgets.
- Parameter:
- ID: Die Nummer des Gadgets.
- Position: Die Position der Zeile.
- Column: Die Position der Spalte.
- ColorType: Folgende Konstanten können verwendet werden:
- #PBEx_GridGadget_ColorType_FrontColor
- #PBEx_GridGadget_ColorType_BackColor
- @ErrorOutput$: Falls ein Fehler auftrat, dann wird die Fehlermeldung in die Variable gespeichert. Diese Variable muss vor dem Übergeben mit 128 Zeichen reserviert werden. Maximale Länge der Rückgabe beträgt 128 Zeichen einschließlich des NULL-Zeichens. Wenn bei einem Fehler keine Fehlerbeschreibung zurückgegeben werden soll, dann kann stattdessen 0 übergeben werden.
- Rückgabewert: RGB-Farbe
- Syntax:
- Windows Vista oder höher
- .NET Framework 4.5 oder höher
- Unicode-Aktivierung (standardmäßig ab PB 5.50)
Download: https://www.rsbasic.de/downloads/downlo ... Gadget.zip
Ich würde mich über Feedbacks, Verbesserungsvorschläge, Fehlermeldungen oder Wünsche sehr freuen. Wer mich unterstützen möchte, kann mir auch was kleines spenden. Danke