Проблемы с кодировкой в компоненте MEMO

[Kotofff]

а как реализовать копирование текста из Memo в буфер обмена?

Если по быстрому ответить то так :

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.SelectAll;// все выделяем для копирования - без выделения НЕ СКОПИРУЕТ с помощью CopyToClipboard
  Memo1.CopyToClipboard;// копируем в буфер обмена
  Memo1.SelStart := 0;// снимаем выделение
  Memo1.SelLength := 0;
end;

[SANIOK_AV]

сделал так:

Memo1.SelectAll;
  Memo1.CopyToClipboard;
  Memo1.SelStart := 0;
  Memo1.SelLength := 0;


  TRE.Lines.Add(Clipboard.AsText);
  TRE.SelectAll;
  TRE.Font.Name := 'Times New Roman';
  TRE.Font.Size := 12;
  TRE.SelAttributes.Charset := RUSSIAN_CHARSET;
  TRE.CopyToClipboard;

опять же с колдировкой всё ОК, но зато нарушена структура текста : некоторые строчки недоконца скопировались и т.п.

делаю при помощи:

Clipboard.AsText := Memo1.Text;

вставляю в Аутлук всё со структурой ОК с кодировкой лажа...((

может эт всё-таки с виндовыми настройками связано?

[Kotofff]

Я давал ссылки про кодировку в memo (пост #15) вот там хоть может и кратко, но дано понять, что при работе с несколькими кодировками теста в memo все равно придется перекодировать текст вручную выбрав вид перекодировки.

вставляю в Аутлук всё со структурой ОК с кодировкой лажа...((

Это скорее всего все та же проблема которая не ушла после после применения RichEdit.

[SANIOK_AV]

Сообщение от Kotofff

все равно придется перекодировать текст вручную выбрав вид перекодировки.

а как это сделать в моём случае?

[TEHb]

в font ставь ANSI кодировку.

если не поможет тогда меняй винду.

[SANIOK_AV]

Сообщение от TEHb

в font ставь ANSI кодировку.

как сделать это?

[SANIOK_AV]

сделал так:

Memo1.Lines.SaveToFile(FName);
TRE.Lines.LoadFromFile(FName);
TRE.SelectAll;
TRE.Font.Name := 'Courier';
TRE.Font.Size := 10;
TRE.SelAttributes.Charset := RUSSIAN_CHARSET;
TRE.CopyToClipboard;

всё работает нормально...но это когда из буфера вставляешь в Ворд (и кодировка та что надо и шрифт и пробелы и межстрочный интервал)...))
если вставляешь в Аутлук...то не тут то было... кроме кодировки ничего не нормально))

может в Аутлуке (MS Outlook) как-то можно настроить эти форматы (там по умолчанию и шрифт другой и размер шрифта)?

но опять же повторюсь:
если я в тот-же Аутлук вставляю текст вручную скопированый из моего текстового файла то всё нормально...

[SANIOK_AV]

Сообщение от SANIOK_AV

если вставляешь в Аутлук...то не тут то было... кроме кодировки ничего не нормально))

Извиняюсь...
прикол был в настройке Аутглюка...

Создать сообщение в формате:

теперь всё ОК

СПАСИБО ВСЕМ ОГРОМНОЕ!!!!

[SANIOK_AV]

ещё такой вопрос:
можно ли как-то автоматизировать и как это лучше сделать:
создание нового письма в MS Outlook
загнав в тему письма определённую информацию, в текст письма текст из файла (либо из RichEdit) и прикрепить к письму определённый файл
?
Заранее благодарен!

[Квэнди]

один вопрос- одна тема. закрыто.