TnEmulVT von F. Piette

[Seven]

Hallo Zusammen erstmal ein frohes neues Jahr nachträglich.

Ich hoffe es versteht einer meine nächsten Zeile.

Ich habe folgendes Problem. In meiner Firma setzten wir ein Terminal-Prg ein, das ST340 heisst. Vielleicht ein Begriff. Dieses Prg. funktioniert unter DOS ausgezeichnet. Es ist ein VT100 Terminal-Programm.

Ich wollte es mit Delphi neu machen und habe mich einfach den Komponenten von F. Piette bedient und zwar mit TnEmulVT. Das klappt nach ein paar Einstellungen auch alles wunderbar. Ich kann die Farbe der Schrift und des Hintergrundes ändern. Alles prima.

Nun mein Problem.

In unserem alten Programm wurde die Breite eines angewählten Feldes auch noch farblich angezeigt, so dass der Anwender die Breite des Feldes sehen konnte. Das klappt jetzt nicht mehr und der Anwender muss "raten" wann das Feld zuende ist. Kann mir dazu jemand helfen bzw. ich hoffe das mich jemand verstanden hat.

P.S. Mit dem Windows Terminal-Prg HyperTerm kann ich die Breite des Feldes anhand der Farbe sehen.

[Touchdown]

Mit den von dir genannten Komponenten usw. kann ich zwar nichts anfangen, aber dein Problem scheint auch eher einfacher Natur zu sein.

Wenn ich dich richtig verstanden habe, willst du ja nur, entsprechend einer Feldlänge eine bestimmt Farbe darstellen. Da dir die Feldlänge irgendwie bekannt sein muss, mach dir doch eine Funktion:

Delphi-Quellcode:

function GetColorcaseoflength (Feldlength : Integer): TColor;
begin
  case Feldlength of
    20..30 : Result := clRed;
    31..40 : Result := ...
  end
end;

[Seven]

erstmal Danke für Deine Antwort,

nur leider kenne ich die entsprechenden Feldlängen nicht.

Ich hänge mal 2 Bilder ran,

auf Bild 1(Original) ist die komplette Feldbreite weiss hinterlegt - richtig.
auf Bild 1(Delphi ) wird nur der aktuelle Cursor angzeigt aber nicht die Feldbreite - schade.

[Seven]

Nachtrag:

Falls jemand nähere Infos zu dem Komponenten zu F. Piette haben möchte, findet diese hier unter ICS.