![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Здравствуйте! Прошу помочь в загрузке текста из файла с расширением .doc в memo1 по нажатию кнопки. Вот текст процедуры:
Код:
if OpenDialog1.Execute then
begin
AssignFile(F, OpenDialog1.FileName);
FName:=OpenDialog1.FileName;
Reset (F);
Readln (F,S);
Memo1.Text :=S;
CloseFile (F);
end;
end
else ShowMessage (' ');В результате в Memo1 вместо текста, который находится в файле появляются какие то символы(( Заранее спасибо, тем кто ответил, с Уважением Евгений. Последний раз редактировалось Admin, 08.01.2011 в 14:45. |