Verfasst: 04.06.2006 00:26
Vielen Dank für die Hilfe!!!!
->>Jetzt klappt's!
->>Jetzt klappt's!
Hi,i.j.radtke hat geschrieben:wie kann ich den zellinhalt der aktuellen zelle (z.b. nach beforeedit oder nach afteredit) abfragen ?
Code: Alles auswählen
XIncludeFile "RaGrid.pbi"
Macro MAKEColRow(nCol,nRow)
(nCol | (nRow<<16))
EndMacro
Structure PersonData
Name.s
Plz.s
EndStructure
*hW.Long = OpenWindow(#PB_Any,#PB_Ignore,#PB_Ignore,610,550,"Test")
CreateGadgetList(*hW\l)
GridGadget(0,5,5,600,490,#STYLE_GRIDFRAME|#STYLE_NOFOCUS)
AddGridColumn(0,"Name" ,50,#TYPE_EDITTEXT)
AddGridColumn(0,"Plz" ,50,#TYPE_EDITTEXT)
Person.PersonData
Person\Name = "Susi"
Person\Plz = "51580"
AddGadgetGridItem(0,@Person)
Person\Name = "Herbert"
AddGadgetGridItem(0,@Person)
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Gadget
If EventGadget() = 0
If EventType() = #PB_EventType_Grid_BeforeEdit
nCol = SendMessage_(GadgetID(0),#GM_GETCURCOL,0,0)
nRow = SendMessage_(GadgetID(0),#GM_GETCURROW,0,0)
nColRow = MAKEPARAM(nCol,nRow)
Buffer = AllocateMemory(100)
SendMessage_(GadgetID(0),#GM_GETCELLDATA,nColRow,Buffer)
Debug PeekS(Buffer)
FreeMemory(Buffer)
EndIf
EndIf
EndIf
Until Event = #WM_CLOSE