Schrift in WINCC Flexible 2008 senkrecht

[Bensen83]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo, habe gerade kein Rechner mit Flex 2008 da, aber mir ist gerade ne idee gekommen. Kann man in flexible 2008 felder (z.B.) ne stringausgabe auch senkrecht (bspw. von unten nach oben) darstellen?

 

[PN/DP]

E/A-Feld: Nein
statischer Text: Ja, nach links oder rechts gedreht

Harald

 

[Bensen83]

Zuviel Werbung?
-> Hier kostenlos registrieren

danke

Schade, wollte barcodes darstellen, das geht dann wohl nicht

 

[PN/DP]

dynamischer gedrehter Text

Als Ersatz für die nicht drehbaren E/A-Felder kann man dynamischen Text per Script in Textfeldern ausgeben:

Dim Objekt, Text

Text = "Variablenwert: " & SmartTags("Variable_1")
Set Objekt = HmiRuntime.Screens("Bild_1").ScreenItems("Textfeld_1")
Objekt.Text = Text

Beim Scriptaufruf muß "Bild_1" angezeigt sein. Die Zuweisung muß man bei jedem Bildaufbau von "Bild_1" erneut machen.

Harald

 

[Bensen83]

ok

Kann ich auch wen sich der Text ändert das script ausführen, wenn das bild nicht aktiv ist?

 

[rostiger Nagel]

Zuviel Werbung?
-> Hier kostenlos registrieren

Du wirst das Script ausführen können, aber beim Bildaufschlag, wird die
Darstellung sein wie du es Projektiert hast. Dh der Aufruf deines scriptes
hat keine Auswirkung auf die Eigenschaften des Textfeldes, wenn es ausgeführt
wird, wenn das Bild nicht aufgerufen ist.

 

[PN/DP]

Selbstverständlich kannst Du das Script ausführen, wann es Dir beliebt ...
Doch wenn das Bild mit dem Textfeld gerade nicht angezeigt wird, dann hat es nicht nur keine Auswirkungen auf das Textfeld, sondern Du bekommst auch einen Runtime-Error, weil das Objekt nicht existiert. Ich meine, das Script wird dann auch an der Stelle unsanft abgebrochen ...

Mache doch einfach in ein anderes Bild eine Schaltfläche, die das Script aufruft, dann siehst Du was passiert. (Du hast ein Meldefenster und/oder eine Meldeanzeige, die Meldungen der Meldeklasse "System" anzeigen?)

Um den Runtime-Error zu vermeiden, könnte das Script vor dem Zugriff auf das Textfeld abfragen, ob das Bild gerade angezeigt wird:

Dim Objekt, Text

If HmiRuntime.BaseScreenName = "Bild_1" Then
  Text = "Variablenwert: " & SmartTags("Variable_1")
  Set Objekt = HmiRuntime.Screens("Bild_1").ScreenItems("Textfeld_1")
  Objekt.Text = Text
End If

Noch was: Damit man die Bildobjekte im Script über ihren Name ansprechen kann, muß in den Geräteeinstellungen "Namensinformationen transferieren" aktiviert sein.

Harald