| Name: | TConsoleMemo |
| Version: | |
| Release-Datum: | 04.03.07 |
| Programmiersprache: | Delphi |
| Download: | ConsoleMemo.pas (3048 Downloads) |
TConsoleMemo ist eine von TMemo abgeleitete Komponente, die eine Art „DOS-Box“ simmuliert. Ein Command-Prompt kann angezeigt und Befehle über ein entsprechendes Event entgegengenommen werden.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | // die Eingenschaften sind natürlich auch per ObjektInspektor einstellbar ConsoleMemo.Prompt := '~~>'; ConsoleMemo.CommandMode := True; // ab jetzt können Befehle verarbeitet werden // Eventhandler: procedure TForm1.ConsoleOnCommand(Sender: TObject; Command: string); begin if Command = 'exit' then Close; end; // über die Funktionen ReadString und ReadInt können auch separat Werte abgefragt werden: Wert := ConsoleMemo.ReadInt; s := ConsoleMemo.ReadString; |