Псевдографика, в .txt Опции

[sheka]

при выводе в тхт получаются иероглифы. как зделать по-нормальному?

[volvo]

сделал горячую клавишу ctrl+c, а сделать еще горячие клавиши ctrl+x,ctrl+a не получается.

Еще бы... Ты не то сделал, второй параметр RegisterHotKey - это не сама кнопка, а индекс операции. Смотри:
1) описываешь собственно идентификаторы горячих клавиш, и сами кнопки:

const
  HK_COPY = 1;
  HK_SELECTALL = 2;
  HK_CUT = 3;

  MyHotKeyCopy = ord('C');
  MyHotKeySelectAll = ord('A');
  MyHotKeyCut = ord('X');

, а потом регистрируешь их (а в процедуре WMHotKey - проверяешь, какой хоткей пришел, и указываешь, что надо сделать):

procedure TForm1.WMHotKey(var Msg: TWMHotKey);
begin
  case Msg.HotKey of
  HK_COPY:
    PutStringIntoClipBoard(form1.MemoTo.Text);
  HK_SELECTALL:
    Form1.MemoTo.SelectAll;
  HK_CUT:
    ; // тут добавишь, чего тебе надо. Копирование в буфер и очистка Memo
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterHotKey(Form1.Handle, HK_COPY, MOD_CONTROL, MyHotKeyCopy);
RegisterHotKey(Form1.Handle, HK_SELECTALL, MOD_CONTROL, MyHotKeySelectAll);
RegisterHotKey(Form1.Handle, HK_CUT, MOD_CONTROL, MyHotKeyCut);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(Form1.Handle, HK_COPY);
UnRegisterHotKey(Form1.Handle, HK_SELECTALL);
UnRegisterHotKey(Form1.Handle, HK_CUT);
end;

Если надо и контекстное меню, то те же операции повесишь на PopupMenu, тогда проще будет не выполнять действия сразу в обработчике WMHotKey, а вызывать процедуры меню...

Сразу предупреждаю твой вопрос: "почему по нажатию Ctrl+A текст в Мемо не выделяется?" Он выделяется, только ты этого не видишь, потому что MemoTo у тебя неактивный, а по умолчанию на неактивном Мемо выделение не отображается. Перекинь HideSelection в False, тогда выделение будет отображаться в любом случае.