[Страдалецъ]

Для начала попробуйте выполнить вот такой код:

Код:

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils,Windows;

begin
 SetConsoleOutputCP(1251);
 WriteLn('Привет');
 ReadLn;
end.

Если в консольке вывод будет по русски, то вам и этого хватит.