консольный текстовый редактор Опции

[kr3v3tkus]

Подскажите как реализовать функции редактирования текста в консоли?

Код

          AssignFile (F, s);
          Reset(F);

          while not EOF(F) do
          begin
            Readln (F, s);
            MyWriteln(s);
          end;

можно вообще их реализовать при таком вводе?
зы пробовал делать пару процедур по мануалам - не работают чиво они так?

Код

procedure GotoXY(X, Y: Word);
begin
  Coord.X := X;
  Coord.Y := Y;
  SetConsoleCursorPosition(ConHandle, Coord);
end;

procedure ClrScr;
begin
  Coord.X := 0;
  Coord.Y := 0;
  FillConsoleOutputCharacter(ConHandle, ' ', MaxX * MaxY, Coord, NOAW);
  GotoXY(0, 0);
end;

ззы или плз киньте линки на литературу >__>

Сообщение отредактировано: kr3v3tkus - 29.10.2007 11:44

[kr3v3tkus]

о большое пасиб, а то я не мог найти такого мануала подробного, позырю завтра, если что отпишусь ... а нащёт полноэкранного и не полноэкранного... если честно я довольно абстрактно представляю что это >__> полноэкранный - типа дос сессии без графики и всяких плюшек, а не полноэкранный - с поддержкой api итд? Ну в любом случае я склоняюсь к тому, что неполноэкранный, задача была поставлена просто как "консольный текстовый редактор", учитывая то, что кроме блокнотика и хелло ворлд мы ничего не делали и нам ничего не объясняли, я думаю всёже неполноэкранный >__>

Добавлено через 1 мин.
ааа понятна да, наверно это изза 7

Сообщение отредактировано: kr3v3tkus - 31.10.2007 2:19