So, da wieder aktuell nochmal nach oben!
Hat jemand da mal ne anständige Lösung für? Vlt. mach ich irgenwas in der Parametrierung vom KFD Falsch oder so...
Die menuekeyuser.ini
[SOFTKEYS]
;Mein Daten:
mpMein = Mein, , , , POPUP,mMein
miMein_Start_UP = Start_UP, 2011, INLINEFORM, KUKATPUSER;Mein;Start_UP
miMein_Mess = Mess, 2011, INLINEFORM, KUKATPUSER;Mein;Mess
miMein_Init = Init, 2011, INLINEFORM, KUKATPUSER;Mein;INI_Mein
miMein_Bt_Ende = Bt_Ende, 2011, INLINEFORM, KUKATPUSER;Mein;Bt_Ende
[#MENU]
; --- Liste der Eintraege unter UserTech ---
mUserTech = mpMein, mpBolzen, mpKLEBEN, mpClinchen, miKOLLISION, miTorqmonAut, mpStapeln, mpToolCoor, miFeldbus, miKappenwechsel
; --- Liste der Eintraege unter Mein_TP ---
mMein = miMein_Mess,miMein_Start_UP,miMein_Bt_Ende,miMein_Init
Alles anzeigen
Dadd KFD File:
DEFTP Mein={SOC FALSE, SOT FALSE}
DECL PARAM spot={VALUE {NUMBER: AUTOLIMIT FALSE, min 0,max 65535,default 1},shortname[] "Spotnumber[", UNIT[] "]", Shortcut[] "Spot", USERMODE 0}
DECL PARAM mp={VALUE {NUMBER: AUTOLIMIT FALSE, min 0,max 100,default 1},shortname[] "Messprogramm[", UNIT[] "]", Shortcut[] "Programm", USERMODE 0}
DECL PARAM Pname={VALUE {name: default[] "programm1"},shortname[] "Programm Name: ", shortcut[] "Prg"}
DECL PARAM stat1={VALUE {static: default[] ".src"}}
;Mein (CMD :IN, TYPE :IN )
;ENUM Mein_COMMAND INIT,Mess,TeilNr,TeilEnde
;***FOLD's***
DECL FOLD Mein_Mess[2]
MeinMess[1]="Mein_ACT.SpotNr=%spot"
MeinMess[2]="Mein(#Mess ,Mein_ACT )"
DECL FOLD Start-UP[5]
S_UP[1] = "Mein_ACT.MessProg=%mp"
S_UP[2] = "Mein(#TeilNr ,Mein_ACT )"
S_UP[3] = "IF $IN[3253]==TRUE THEN"
S_UP[4] = "%Pname ( )"
S_UP[5] = "ENDIF"
DECL FOLD Mein_BT_Ende[1]
BTEnd[1]="Mein(#TeilEnde )"
DECL FOLD Mein_INIT[1]
INIT_Mein[1]="Mein(#INIT )"
;***Inline Formulare***
DECL InlineForm Mess={PARAM[1] spot, FOLD[1] Mein_Mess, }
DECL InlineForm Start_UP={PARAM[1] mp, PARAM[2] Pname, PARAM[3] stat1, FOLD[1] Start-UP }
DECL InlineForm Bt_Ende={FOLD[1] Mein_BT_Ende }
DECL InlineForm INI_Mein={FOLD[1] Mein_INIT }
ENDTP
Alles anzeigen