Scott Duensing
c3ae983a73
TKPAnsi is a TCustomControl descendant providing a visual ANSI terminal with 16-color palette, scrollback buffer, blinking cursor, and ANSI music. Supports CSI sequences (cursor movement, erase, SGR colors/attributes, insert/delete lines/chars, scroll), DEC private modes (wrap, cursor visibility), and keyboard translation (arrows, function keys, etc.). Test app (TESTMAIN.PAS) updated to wire TKPAnsi to TKPComm as a full terminal: received data feeds the terminal display, keystrokes are sent out the serial port. Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
12 lines
191 B
ObjectPascal
12 lines
191 B
ObjectPascal
program KPTest;
|
|
|
|
uses
|
|
Forms,
|
|
TestMain in 'TESTMAIN.PAS',
|
|
KPComm in 'KPCOMM.PAS',
|
|
KPAnsi in 'KPANSI.PAS';
|
|
|
|
begin
|
|
Application.CreateForm(TMainForm, MainForm);
|
|
Application.Run;
|
|
end.
|