Funktionen bei Buttons

[Flymoon]

Hallo und Mahlzeit ,

folgende Frage: ich habe wie hier im Beispiel ein Button der für das Beenden des Programms zuständig ist, habe diesem Button eigl. einen ivar Namen vergeben. Function Code generieren lassen aber dort zeigt er ja iwie kein ivar Namen an. Code:


oXbp := XbpPushButton():new( drawingArea, , {1117*kor_h,24*kor_v}, {96*kor_h,24*kor_v}, { { XBP_PP_BGCLR, XBPSYSCLR_BUTTONMIDDLE }, { XBP_PP_FGCLR, -58 } } )
oXbp:caption := "Beenden"
oXbp:tabStop := .T.
oXbp:create()
oXbp:activate := {|| Gather( aEditControls ), PostAppEvent( xbeP_Close ) }

Meine Frage: "Wie spreche ich diesen Button nun an wenn er kein Variablen Namen hat? Will ihm z.B. die Funktion erteilen das er eine MsgBox aufruft um Beenden zu bsetätigen. Kapier die Syntax iwie noch nicht des Code Designers. Unter VB und Java sprech ich doch einfach den Button über seinen Namen und schreib die Methode dafür. Wie geht das aber in Xbase? Wo kommt die Funktion hin? und ja ich weiß der Class Code wäre eigl besser nur ist es dafür zu spät

Danke für eure Hilfe

[UliTs]

Unter xBase++ gibt es keinen CodeDesigner, nur einen FormDesigner, welcher meines Erachtens seeeehr einfach gestrickt ist .
In Deinem Fall mußt Du den Code direkt einbinden, z.B.:

Code: Alles auswählen

oXbp:activate := {|| Gather( aEditControls ),IIF( MsgFrage( "Beenden?" ),PostAppEvent( xbeP_Close ),NIL ) }
...

FUNCTION MsgFrage( cText )
LOCAL lResult := .F.
  ...
RETURN( lResult)

Uli

[Flymoon]

sry meinte auch Form Designer, aber Danke schonmal für deine Hilfe