P
Peter Kraberger
Guest
Hallo! Ich möchte für ein gewisses Kundensegment für jeden dieser Kunden einen Button (mit Bild) erzeugen. Wird einer dieser Buttons angeklickt, so sollte eine bestimmte Funktion ausgelöst werden. Die Buttons werden zwar erzeugt und können auch angeklickt werden, aber kein einziger Trigger wird durchgeführt. Vielen Dank! DEFINE VARIABLE but-e1 AS HANDLE extent 100 NO-UNDO. x1=0. for each kunde: x1 = x1 + 1. CREATE BUTTON but-e1[x1] ASSIGN FRAME = FRAME fmain:HANDLE y = rrow x = rcol LABEL = k-fob /* 20,21,..*/ width-pixel = e1-breite height-pixel = e1-hoehe tooltip = k-fam + " " + k-vn SENSITIVE = TRUe VISIBLE = TRUE TRIGGERS: on go do: xxtext = but-e1[x1]:label. /*self:label.*/ message "test-e1" xxtext view-as alert-box. run u-e2. end. on help do: xxtext = but-e1[x1]:label. /*self:label.*/ message "test-e1" xxtext view-as alert-box. run u-e2. end. on leave do: xxtext = but-e1[x1]:label. /*self:label.*/ message "test-e1" xxtext view-as alert-box. run u-e2. end. on entry do: xxtext = but-e1[x1]:label. /*self:label.*/ message "test-e1" xxtext view-as alert-box. run u-e2. end. ON choose DO: xxtext = but-e1[x1]:label. /*self:label.*/ message "test-e1" xxtext view-as alert-box. run u-e2. END. END TRIGGERS. but-e1[x1]:load-image(pfadein + k-bild).
Continue reading...
Continue reading...