Skript: Spotlight Beschriftung zuweisen

[michaellanzl]

Hi,

 

ich würde gerne über ein Skript die Beschriftung der Scheinwerfer zuweisen, um mir das dann über Shortcuts auf ein Streamdeck zu legen.

Ich schaffe es, normale DB-Felder über ein Skript zu ändern, aber nicht das Feld "Use Legend".

 

Evtl. liegt es daran das der Typ des Feldes ein anderer ist...

 

Hat vielleicht jemand eine Idee und kann mir auf die Sprünge helfen?

 

Danke

Michi

 

PROCEDURE ChangeLegend;
VAR Legend    :STRING;
PROCEDURE ChangeSelLegend(objectHandle    :HANDLE);

BEGIN
    Legend := 'Fixture@Top_BIG';
	SetRField(objectHandle,'Lighting Device', 'Use Legend', Legend);
	ResetObject(objectHandle);    
END;

BEGIN
    ForEachObject(ChangeSelLegend,Sel = TRUE);

END;

RUN(ChangeLegend);