====== lyxvision.textdevice ======

''TTextDevice'' — scrollbarer Textpuffer für Log-Ausgaben und Statusmeldungen. Im Gegensatz zu ''TTerminal'' interpretiert TTextDevice keine ANSI-Escape-Sequenzen, sondern zeigt Plain-Text zeilenweise mit automatischem Scrolling an. Neue Zeilen werden am Ende angehängt; der Puffer wird nach oben gescrollt.

→ [[lyx_-_programmiersprache:units:lyxvision|lyxvision]] · [[lyx_-_programmiersprache:units:lyxvision:terminal|lyxvision.terminal]] · [[lyx_-_programmiersprache:units:lyxvision:view|lyxvision.view]]

----

===== Verwendung =====

<code lyx>
import lyxvision.textdevice;

// Textgerät in Fenster einbetten
var td: TTextDevice := TTextDeviceNew(win, 1, 1, 78, 20);
TGroupInsert(win, td);

// Zeilen anhängen (scrollen automatisch)
TTextDeviceAppend(td, "Server gestartet auf Port 8080");
TTextDeviceAppend(td, "Verbindung von 192.168.1.1");
TTextDeviceAppend(td, "Anfrage: GET /index.html");

// Farbe für neue Zeilen setzen
TTextDeviceSetColor(td, clLightRed, clBlack);
TTextDeviceAppend(td, "FEHLER: Timeout nach 30s");
TTextDeviceSetColor(td, clLightGray, clBlack);

// Puffer leeren
TTextDeviceClear(td);
</code>

----

===== Funktionen =====

^ Signatur ^ Sichtbarkeit ^ Beschreibung ^
| ''TTextDeviceNew(parent: TGroup, x: int64, y: int64, w: int64, h: int64): TTextDevice'' | pub | Erzeugt Textpuffer-Widget |
| ''TTextDeviceAppend(td: TTextDevice, line: pchar): void'' | pub | Hängt Zeile an und scrollt bei Bedarf |
| ''TTextDeviceClear(td: TTextDevice): void'' | pub | Leert den Textpuffer |
| ''TTextDeviceSetColor(td: TTextDevice, fg: int64, bg: int64): void'' | pub | Setzt Farbe für nachfolgende Zeilen |
| ''TTextDeviceSetMaxLines(td: TTextDevice, n: int64): void'' | pub | Setzt maximale Puffer-Zeilenzahl (älteste werden entfernt) |
| ''TTextDeviceGetLineCount(td: TTextDevice): int64'' | pub | Gibt Anzahl der gespeicherten Zeilen zurück |

Letzte Aktualisierung: 2026-05-22