PB.Ex GridGadget (Windows)

[RSBasic]

Hallo,

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:
    1. ID: Eine eindeutige Nummer. #PB_Any kann verwendet werden, um die Nummer automatisch zu generieren.
    2. X: Die Position des Gadgets auf dem Fenster.
    3. Y: Die Position des Gadgets auf dem Fenster.
    4. Width: Die Breite des Gdgets auf dem Fenster.
    5. Height: Die Höhe des Gdgets auf dem Fenster.
    6. 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
    7. ParentWindowID: Die ID des Fensters, auf dem das Gadget erstellt werden soll. Die ID des Fensters kann mit WindowID() ermittelt werden.
    8. @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

  AddGridGadgetColumn()
  • Syntax:

    Code: Alles auswählen

    Result = AddGridGadgetColumn(ID, Position, Type, Text$, Width, @ErrorOutput$)

  • Beschreibung: Fügt eine neue Spalte hinzu.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Legt die Position fest, die aufsteigend ist. Der Wert "-1" kann verwendet werden, um die Spalte immer am Ende hinzuzufügen.
    3. 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
    4. Text$: Die Überschrift der Spalte.
    5. 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.
    6. @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.
  RemoveGridGadgetColumn()
  • 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:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Spalte.
    3. @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.
  AddGridGadgetItem()
  • Syntax:

    Code: Alles auswählen

    Result = AddGridGadgetItem(ID, Position, Text$, @ErrorOutput$)

  • Beschreibung: Fügt eine neue Zeile hinzu.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Legt die Position fest, die aufsteigend ist. Der Wert "-1" kann verwendet werden, um die Zeile immer am Ende hinzuzufügen.
    3. Text$: Der Text für die erste Zelle. Chr(10) kann verwendet werden, um Texte für weitere Zellen einzufügen.
    4. @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.
  RemoveGridGadgetItem()
  • Syntax:

    Code: Alles auswählen

    Result = RemoveGridGadgetItem(ID, Position, @ErrorOutput$)

  • Beschreibung: Entfernt eine vorhandene Zeile. Alle Zellenwerte dieser Zeile werden ebenfalls gelöscht.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. @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.
  CountGridGadgetColumns()
  • Syntax:

    Code: Alles auswählen

    Result = CountGridGadgetColumns(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Anzahl der Spalten.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  CountGridGadgetItems()
  • Syntax:

    Code: Alles auswählen

    Result = CountGridGadgetItems(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Anzahl der Zeilen.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  ClearGridGadgetColumns()
  • Syntax:

    Code: Alles auswählen

    Result = ClearGridGadgetColumns(ID, @ErrorOutput$)

  • Beschreibung: Entfernt alle Spalten. Alle Zeilen werden ebenfalls gelöscht.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  ClearGridGadgetItems()
  • Syntax:

    Code: Alles auswählen

    Result = ClearGridGadgetItems(ID, @ErrorOutput$)

  • Beschreibung: Entfernt alle Zeilen.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GetGridGadgetColumnText()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetColumnText(ID, Position, @Output$, @ErrorOutput$)

  • Beschreibung: Ermittelt die Überschrift einer Spalte.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Spalte.
    3. @Output$: Die Überschrift der Spalte wird in diese Variable gespeichert. Wenn 0 übergeben wurde, dann wird die Länge als Rückgabewert zurückgegeben.
    4. @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.
  SetGridGadgetColumnText()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetColumnText(ID, Position, Text$, @ErrorOutput$)

  • Beschreibung: Ändert die Überschrift einer Spalte.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Spalte.
    3. Text$: Die neue Überschrift der Spalte.
    4. @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.
  GetGridGadgetItemText()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetItemText(ID, Position, Column, @Output$, @ErrorOutput$)

  • Beschreibung: Ermittelt den Inhalt einer Zelle.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. Column: Die Position der Spalte.
    4. @Output$: Der Inhalt der Zelle wird in diese Variable gespeichert. Wenn 0 übergeben wurde, dann wird die Länge als Rückgabewert zurückgegeben.
    5. @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.
  SetGridGadgetItemText()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetItemText(ID, Position, Column, Text$, @ErrorOutput$)

  • Beschreibung: Ändert den Inhalt einer Zelle.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. Column: Die Position der Spalte.
    4. Text$: Der neue Inhalt der Zelle.
    5. @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.
  FreeGridGadget()
  • Syntax:

    Code: Alles auswählen

    Result = FreeGridGadget(ID, @ErrorOutput$)

  • Beschreibung: Gibt das Gadget frei.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GridGadgetWidth()
  • Syntax:

    Code: Alles auswählen

    Result = GridGadgetWidth(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Breite des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GridGadgetHeight()
  • Syntax:

    Code: Alles auswählen

    Result = GridGadgetWidth(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Höhe des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GridGadgetX()
  • Syntax:

    Code: Alles auswählen

    Result = GridGadgetX(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Position des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GridGadgetY()
  • Syntax:

    Code: Alles auswählen

    Result = GridGadgetY(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Position des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GridGadgetID()
  • Syntax:

    Code: Alles auswählen

    Result = GridGadgetID(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Handle-Nummer des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  HideGridGadget()
  • Syntax:

    Code: Alles auswählen

    Result = HideGridGadget(ID, State, @ErrorOutput$)

  • Beschreibung: Versteckt oder zeigt das Gadget an.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. State:
       • 0: Zeigt das Gadget an.
       • 1: Versteckt das Gadget.
    3. @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.
  IsGridGadget()
  • Syntax:

    Code: Alles auswählen

    Result = IsGridGadget(ID, @ErrorOutput$)

  • Beschreibung: Überprüft, ob das Gadget gültig ist.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  ResizeGridGadget()
  • Syntax:

    Code: Alles auswählen

    Result = ResizeGridGadget(ID, X, Y, Width, Height, @ErrorOutput$)

  • Beschreibung: Ändert die Position und Größe des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. X: Die neue Position des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
    3. Y: Die neue Position des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
    4. Width: Die neue Höhe des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
    5. Height: Die neue Breite des Gadgets. #PB_Ignore kann verwendet werden, um diesen Wert nicht zu verändern.
    6. @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.
  SortGridGadgetColumn()
  • Syntax:

    Code: Alles auswählen

    Result = SortGridGadgetColumn(ID, Column, Direction, @ErrorOutput$)

  • Beschreibung: Sortiert eine Spalte.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Column: Die Position der Spalte.
    3. Direction: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_Direction_Ascending
       • #PBEx_GridGadget_Direction_Descending
    4. @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.
  DisableGridGadget()
  • Syntax:

    Code: Alles auswählen

    Result = DisableGridGadget(ID, State, @ErrorOutput$)

  • Beschreibung: Aktiviert oder deaktiviert das Gadget.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. State:
       • 0: Gadget wird aktiviert.
       • 1: Gadget wird deaktiviert.
    3. @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.
  SetGridGadgetAttribute()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetAttribute(ID, Attribute, Value, @ErrorOutput$)

  • Beschreibung: Ändert mit Hilfe des Attributes eine Einstellung.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Attribute: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_Attribute_SelectType
    3. 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.
    4. @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.
  GetGridGadgetAttribute()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetAttribute(ID, Attribute, @ErrorOutput$)

  • Beschreibung: Ermittelt mit Hilfe des Attributes den Wert der Einstellung.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Attribute: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_Attribute_SelectType
    3. @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.
  GetGridGadgetState()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetState(ID, @ErrorOutput$)

  • Beschreibung: Ermittelt die Position der ersten ausgewählten Zeile.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. @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.
  GetGridGadgetItemState()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetItemState(ID, Position, Column, @ErrorOutput$)

  • Beschreibung: Überprüft, ob die angegebene Zelle ausgewählt ist.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. Column: Die Position der Spalte.
    4. @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.
  SetGridGadgetState()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetState(ID, Position, State, @ErrorOutput$)

  • Beschreibung: Wählt die angegebene Zeile aus.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. State:
       • 0: Hebt die Auswahl auf.
       • 1: Auswählen
    4. @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.
  SetGridGadgetItemState()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetItemState(ID, Position, Column, State, @ErrorOutput$)

  • Beschreibung: Wählt die angegebene Zelle aus.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. Column: Die Position der Spalte.
    4. State:
       • 0: Hebt die Auswahl auf.
       • 1: Auswählen
    5. @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.
  SetGridGadgetColor()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetColor(ID, ColorType, Color, @ErrorOutput$)

  • Beschreibung: Ändert die Farbe des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. ColorType: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_ColorType_FrontColor
       • #PBEx_GridGadget_ColorType_BackColor
    3. Color: Die Farbe, die mit RGB() festgelegt werden kann.
    4. @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.
  GetGridGadgetColor()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetColor(ID, ColorType, @ErrorOutput$)

  • Beschreibung: Ermittelt die Farbe des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. ColorType: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_ColorType_FrontColor
       • #PBEx_GridGadget_ColorType_BackColor
    3. @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
  SetGridGadgetItemColor()
  • Syntax:

    Code: Alles auswählen

    Result = SetGridGadgetItemColor(ID, Position, Column, ColorType, Color, @ErrorOutput$)

  • Beschreibung: Ändert die Farbe des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. Column: Die Position der Spalte.
    4. ColorType: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_ColorType_FrontColor
       • #PBEx_GridGadget_ColorType_BackColor
    5. Color: Die Farbe, die mit RGB() festgelegt werden kann.
    6. @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.
  GetGridGadgetItemColor()
  • Syntax:

    Code: Alles auswählen

    Result = GetGridGadgetItemColor(ID, Position, Column, ColorType, @ErrorOutput$)

  • Beschreibung: Ermittelt die Farbe des Gadgets.
  • Parameter:
    1. ID: Die Nummer des Gadgets.
    2. Position: Die Position der Zeile.
    3. Column: Die Position der Spalte.
    4. ColorType: Folgende Konstanten können verwendet werden:
       • #PBEx_GridGadget_ColorType_FrontColor
       • #PBEx_GridGadget_ColorType_BackColor
    5. @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

Systemvoraussetzungen:

• Windows Vista oder höher
• .NET Framework 4.5 oder höher
• Unicode-Aktivierung (standardmäßig ab PB 5.50)

Lizenz: Diese DLL-Datei ist kostenlos und darf sowohl privat als auch kommerziell verwendet werden.

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

[RSBasic]

PS:
@Kiffi:
Es ist noch nicht fertig. Ein paar CellFormatting-Regeln habe ich schon hinzugefügt. (z.B. Datum)
DataTable habe ich noch nicht gemacht.

[Kiffi]

@Ray:

Erst einmal vielen Dank, dass Du uns das Grid zur Verfügung stellst!

Mir ist bisher folgendes aufgefallen:

* Entfernt man das Flag #PBEx_GridGadget_Flag_AllowAddRows, so funktioniert AddGridGadgetColumn() nicht mehr ("Der angegebene Zeilenindex liegt außerhalb des definierten Bereichs.").
Ich denke, dass das nicht im Sinne des Erfinders ist. AllowAddRows sollte steuern, ob der Anwender Zeilen hinzufügen darf.

* Es wäre klasse, wenn man den Selection-Mode angeben könnte:



Richtig coole Sache, das Grid! Werde weiter testen.

Danke im Voraus & Grüße ... Peter

[STARGÅTE]

Nett ,
habe aber ein paar Fragen:

• AddGridGadgetColumn() hat noch n Width-Parameter, den du auf 100 setzt, aber keine Wirkung hat und auch nicht dokumentiert ist.
• Wenn der Benutzer eine Zelle Editiert hat, ist die Länge des Inhalts (Strings) nicht bekannt, wie soll ich dann GetGridGadgetItemText() benutzen, wenn ich nicht weiß wie lang "Output$" sein muss?
  Hier könntest du ja die Länge des nötigen Buffers zurückgeben, wenn Output$ mit Null übergeben wurde, dann kann man danach den Text einladen.

[RSBasic]

Danke ihr zwei fürs Testen.

* Entfernt man das Flag #PBEx_GridGadget_Flag_AllowAddRows, so funktioniert AddGridGadgetColumn() nicht mehr ("Der angegebene Zeilenindex liegt außerhalb des definierten Bereichs.").
Ich denke, dass das nicht im Sinne des Erfinders ist. AllowAddRows sollte steuern, ob der Anwender Zeilen hinzufügen darf.

Ich werde das prüfen.

* Es wäre klasse, wenn man den Selection-Mode angeben könnte:

Gute Idee, werde ich umsetzen.

AddGridGadgetColumn() hat noch n Width-Parameter, den du auf 100 setzt, aber keine Wirkung hat und auch nicht dokumentiert ist.

Es liegt am folgenden Parameter: #PBEx_GridGadget_Flag_AutoColumnWidth
Wenn du den Flag-Parameter entfernst, dann ist die manuelle Breitenangabe der einzelnen Spalten auch wirksam.

Wenn der Benutzer eine Zelle Editiert hat, ist die Länge des Inhalts (Strings) nicht bekannt, wie soll ich dann GetGridGadgetItemText() benutzen, wenn ich nicht weiß wie lang "Output$" sein muss?
Hier könntest du ja die Länge des nötigen Buffers zurückgeben, wenn Output$ mit Null übergeben wurde, dann kann man danach den Text einladen.

Gute Idee, ich werde das prüfen.

[RSBasic]

PB.Ex GridGadget 1.0.1.0 wurde veröffentlicht.

Changelog:

• Hinzugefügt: #PBEx_GridGadget_ColumnWidth_AutoColumnWidth für AddGridGadgetColumn()
• Hinzugefügt: SetGridGadgetAttribute()
• Hinzugefügt: GetGridGadgetAttribute()
• Hinzugefügt: DisableGridGadget()
• Bugfix: AddGridGadgetItem() funktioniert jetzt auch ohne #PBEx_GridGadget_Flag_AllowAddRows.
• Geändert: @Output$: Wenn 0 übergeben wird, dann wird als Rückgabewert der jeweiligen Funktion die benötigte Länge für die Allokierung des Speichers zurückgegeben.

* Entfernt man das Flag #PBEx_GridGadget_Flag_AllowAddRows, so funktioniert AddGridGadgetColumn() nicht mehr ("Der angegebene Zeilenindex liegt außerhalb des definierten Bereichs.").

Erledigt

* Es wäre klasse, wenn man den Selection-Mode angeben könnte:

Erledigt

AddGridGadgetColumn() hat noch n Width-Parameter, den du auf 100 setzt, aber keine Wirkung hat und auch nicht dokumentiert ist.

Ich habe es jetzt dokumentiert, dass dieser Parameter automatisch ignoriert wird, wenn man #PBEx_GridGadget_Flag_AutoColumnWidth verwendet.

Wenn der Benutzer eine Zelle Editiert hat, ist die Länge des Inhalts (Strings) nicht bekannt, wie soll ich dann GetGridGadgetItemText() benutzen, wenn ich nicht weiß wie lang "Output$" sein muss?
Hier könntest du ja die Länge des nötigen Buffers zurückgeben, wenn Output$ mit Null übergeben wurde, dann kann man danach den Text einladen.

Erledigt

[Kiffi]

Erledigt

Primstens!

Wollte gerade einen Test machen. Da fällt mir auf: Wie kann ich denn ermitteln, welche Rows oder Cells selektiert sind? Fehlt da vielleicht ein GetGridGadget[Item]State() bzw. dann auch ein SetGridGadget[Item]State()?

Danke & Grüße ... Peter

[RSBasic]

Ja das fehlt noch sowie das Ändern und Ermitteln der Farben jeder Zelle. Ist geplant.

[RSBasic]

PB.Ex GridGadget 1.0.2.0 wurde veröffentlicht.

Changelog:

• Hinzugefügt: GetGridGadgetState()
• Hinzugefügt: GetGridGadgetItemState()
• Hinzugefügt: SetGridGadgetState()
• Hinzugefügt: SetGridGadgetItemState()
• Hinzugefügt: SetGridGadgetColor()
• Hinzugefügt: GetGridGadgetColor()
• Hinzugefügt: SetGridGadgetItemColor()
• Hinzugefügt: GetGridGadgetItemColor()