XbpBrowse() rbClick/rbDblClick ? [erledigt]

Grafische Primitive, XbaseParts und Darstellungsfragen allgemein.

Moderator: Moderatoren

Antworten
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

XbpBrowse() rbClick/rbDblClick ? [erledigt]

Beitrag von AUGE_OHR »

ich habe das in ...\SOURCE\samples\basics\GuiBrow\DBBROWSE.prg eingefügt

Code: Alles auswählen

   oBrowse:Show()
   // Test 
   oBrowse:rbClick := { || Msgbox("oBrowse:rbClick") }
   oBrowse:rbDblClick := { || Msgbox("oBrowse:rbDblClick") }
aber er reagiert nicht auf die rechte Maustaste :angry4:

kann das sein :evil: wenn ja any workaround :?:
gruss by OHR
Jimmy
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: XbpBrowse() rbClick/rbDblClick ? [erledigt]

Beitrag von AUGE_OHR »

ok ... jetzt klappte es doch :!:

hatte mal wieder übersehen dass das XbpBrowse() ja zusammengebaut ist aus verschiedenen Bereichen.
bei Header / Footer habe ich das für o:LbDown

Code: Alles auswählen

   oBrowse:getColumn(i):heading:lbClick := MakeBlock(aStruct,i,"Head",oBrowse)
   oBrowse:getColumn(i):footing:lbClick := MakeBlock(aStruct,i,"Foot",oBrowse)
ich klick ja auf eine Column bzw. ein Teil davon #-o
also muss es heissen

Code: Alles auswählen

   oBrowse:getColumn(i):DataArea:rbClick := { || Msgbox("oBrowse:rbClick") }
und dann klappt es auch mit dem "Browse" =D>
gruss by OHR
Jimmy
Antworten