Textobjekte können in der 16Bit Version von DIAdem nicht bearbeitet werden

Question

Hallo,
unter DIAdem11 gibt es einige Bugs beim Script. Da läuft ein Programm tadellos und ein anderes mit identischem Code gibt o.g. Fehler aus.
Code:
call PicLoad("d:\PROJEKTE\AKMGraph2.TDR")call GraphObjopen("textobject2")
call TxtBufOpen
TxtBufFont="Arial"
TxtBufFontSize=10
call TxtBufNextLine
x = 666
call TxtBufTabCellSet(cstr(x),4,1)    Hier erscheint die Fehlermeldung!?
call TxtBufClose
call GraphObjclose("textobject2")call Picupdate  
hier funktioniert es:
call PicLoad("D:\PROJEKTE\test\hill_add.TDR")call GraphObjopen("textobject1")
call TxtBufOpen
TxtBufFont="Arial"
TxtBufFontSize=12
For a = 1 to 16
max_t = 0
min_t = 2000
For x = ChnVal(a,17) to ChnVal(a,18)
'ptp des Momentes berechnen
If ChnVal(x,2) > max_t Then 'Maximum ermitteln
max_t = ChnVal(x,2)
End If
If ChnVal(x,2) < min_t Then 'Minimum ermitteln
min_t = ChnVal(x,2)
End If
Next
ptp_t = max_t - min_t
call TxtBufTabCellSet(cstr(round(ptp_t,0)),2,a+1)  KEINE Fehlermeldung!?
call TxtBufClose
call graphobjclose("textobject1")
Danke für Eure Hilfe!

Answer 1

Hallo,
an der Stelle erscheint eine falsche Fehlermeldung.
Die richtige Fehlermeldung sollte heißen: An dieser Position kann kein Text in die Tabelle eingefügt werden!
Üblicherweise erscheint diese Fehlermeldung, wenn sich an der aktuellen Einfüge-Position keine Tabelle befindet.
Also erst in die Tabelle positionieren, dann dort mit TxtBufTabCellSet einfügen.
--- Sven