Egrid - IMA bei egrid_CreateGrid

[marco2007]

Hi,

sorry, daß ich zwei Fragen auf einmal stelle, aber so geht´s vielleicht in einem:

1. Ich bekomme einen IMA und finde den Fehler nicht für:

Code: Alles auswählen

Enumeration
#window
#col
EndEnumeration

Procedure.l MyCellCallBack(egrid, uMsg, *cellinfo.egridCellInfo)
  Protected result
  Select uMsg
    Case #egrid_NotifyCellType
      Select *cellinfo\column
        Case 0
          *cellinfo\celltype=#egrid_CheckBox
          *cellinfo\text="TRUE/FALSE"
          
        Case 2
          *cellinfo\celltype=#egrid_ComboBox
          *cellinfo\text="Text 1" + Chr(10) + "Text 2" + Chr(10) + "Text 3" + Chr(10) + "Text 4"
      EndSelect


    Default 
      result = #True                      
    EndSelect
  ProcedureReturn result
EndProcedure

Procedure ow()
      If OpenWindow(#window, 10, 10, 395,240, "Egrid",#PB_Window_SystemMenu|#PB_Window_SizeGadget)
        If CreateGadgetList(WindowID(#Window))
          egrid_CreateGrid(#col, 10, 10, 355, 200, 18,0, #egrid_GridLines|#egrid_ResizeColumnsTrue|#egrid_MultiLineText)
          egrid_CreateCellCallback(#col, @MyCellCallBack())
          egrid_SetHeaderHeight(#col, 18)
          egrid_SetOption(#col, #egrid_SelectionBorderWidth, 2)
          egrid_AddColumn(#col,0," " ,20)
          egrid_AddColumn(#col,1,"Anzahl" ,50)
          egrid_AddColumn(#col,2,"Bezeichnung" ,120)
          egrid_AddColumn(#col,3,"Zeit" ,100)
          egrid_AddColumn(#col,4,"leer" ,100)
          egrid_AddRows(#col,-1, 10 )
      EndIf
      EndIf
      
EndProcedure

ow()

Repeat:Until WaitWindowEvent()=#PB_Event_CloseWindow

2. Wie kann ich den Status der Combobox/Checkbox bei Egrid abfragen/setzen?

....mein Englisch ist sauschlecht seit ich von der Schule weg bin (letztes Jahrhundert) und ich konnte mich leider beim englischen Forum nicht anmelden, da das "Confirmation Code"-Bild nicht erscheint, sonst hätte ich die Frage natürlich Srod gestellt, aber ich glaube Kiffi und TS-Soft verwenden auch Egrid (hoffe ich)...

Danke auf jeden Fall

[ts-soft]

Zu 1:
funktioniet Fehlerfrei! Haste evtl Unicode an und das SubSystem nicht angegeben?

Zu 2:
Mit egrid_GetCellText und egrid_SetCellText, wobei "TRUE" oder "FALSE"
auszuwerten oder zu setzen ist.

Code: Alles auswählen

    Case #egrid_ComboBoxSelChanged
      Debug *cellinfo\text

Damit bekommste den gerade gewählten Eintrag der ComboBox

[marco2007]

...Danke!

1....auf das habe ich gar nicht geachtet...dachte Egrid5 funkt auch im Unicode-Modus...

2. Naja, ich bin eben noch immer Anfänger....

Marco

[ts-soft]

...Danke!

1....auf das habe ich gar nicht geachtet...dachte Egrid5 funkt auch im Unicode-Modus...

Funktioniert ja auch in Unicode, jedoch das SubSystem ist einzustellen:

[marco2007]

...wieder `mal was gelernt!

Danke