Hallo!
Im Dialogfenster meines SmartParts soll mit Buttons jeweils 1 Punkt hinzugefügt bzw. entfernt werden. Leider werden jedoch immer 2 Punkte hinzugefügt bzw. entfernt.
Ich habe mich mal auf Fehlersuche begeben und bin fündig geworden. Eine .csv-Datei wird vom SmartPart mit den Befehlen OPEN und IMPUT eingelesen - wenn ich diese Datei nicht einlese funktionieren auch die Buttons ganz normal.
Kann mir jemand sagen warum das so ist bzw. ob und was ich hier was falsch gemacht habe?
Ich bin Dankbar für jede Hilfe! Hier noch die Ausschnitte aus dem Script:
Buttons Skript:
Parameter-Script:
IF GLOB_UI_BUTTON_ID = 4000 THEN
PARAMETERS box_ptcnt = box_ptcnt + 1
PARAMETERS box_x [ box_ptcnt ] = box_x [ box_ptcnt - 1 ] + next_x
PARAMETERS box_y [ box_ptcnt ] = box_y [ box_ptcnt - 1 ] + next_y
ENDIF
IF GLOB_UI_BUTTON_ID = 4001 THEN
PARAMETERS box_ptcnt = box_ptcnt - 1
ENDIF
Dialog-Script:
I_SECTION "Punkte hinzufügen"
LOCK "box_ptcnt"
I_INFIELD "box_ptcnt" , 0 , 0 , 0 , 0
I_SEPARATOR 0 , 0 , 0 , 0
I_ROW "move" , 1
I_BUTTON I_FUNCTION , `hinzufügen` , 0 , 0 , 1 , 25 , 4000
I_BUTTON I_FUNCTION , `entfernen` , 0 , 0 , 1 , 25 , 4001
I_ROW_END
row = row + 1
----------
Datei Script:
filename = "Dateipfad_Dateiname.csv"
filter = "TEXT"
parameter_string = "SEPARATOR = ';', MODE = RO, fullpath"
DIM aa [ ], ...
con = 2
stream = OPEN ( filter , filename , parameter_string )
REPEAT
n = INPUT ( stream , con , 1 , variable1 , ... )
IF n > 0 THEN
aa [ con - 1 ] = variable1
.
.
.
con = con + 1
ENDIF
UNTIL n < 0
CLOSE stream