Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Непонятник с RichEdit... 
:(
    Опции темы
Borland_Delphi_6
Дата 29.7.2004, 20:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20



Проблема заключается в следующем: когда я загружаю в RichEdit файл, открытый при помощи OpenDialog - все проходит нормально, rtf файл открывается, оформление этого файла применяется. Но если файл открывается с коммандой строки, например так: file.exe file.rtf, то оформление не применяется и файл октрывается как обычный текст sad.gif В чем может быть дело?

Код открытия через OpenDialog:

Код

if OpenDialog1.Execute
then RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName);


Код открытия через коммандную строку:

Код

if ParamCount>0
then RichEdit1.Lines.LoadFromFile(ParamStr(1));




--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
<Spawn>
Дата 29.7.2004, 20:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Око кары:)
****


Профиль
Группа: Экс. модератор
Сообщений: 2776
Регистрация: 29.1.2003
Где: Екатеринбург

Репутация: 44
Всего: 64



Только что проверил - у меня все работает. Ты во всяких OnCreate, OnActivate ни каких манипуляций с RichEdit больше не делаешь?

Это сообщение отредактировал(а) <Spawn> - 29.7.2004, 20:09


--------------------
"Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков.
PM MAIL ICQ   Вверх
Borland_Delphi_6
Дата 29.7.2004, 20:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20



<Spawn>
Неа sad.gif В OnCreate тока чтение коммандной строки как-то соотносится с RichEdit.


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
Pakshin A. S.
Дата 29.7.2004, 23:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61



Сравни OpenDialog1.FileName и ParamStr(1)... Может ответ сам выйдет наружу.
PM   Вверх
Guest
Дата 30.7.2004, 08:08 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Странно Delphi 7 все нормально работает
  Вверх
p0s0l
Дата 30.7.2004, 15:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



Попробуй так:
Код
RichEdit1.PlainText := false;
if ParamCount>0
then RichEdit1.Lines.LoadFromFile(ParamStr(1));



--------------------
С уважением, г-н Посол.
PM   Вверх
Borland_Delphi_6
Дата 31.7.2004, 00:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20



Pakshin A. S.
пробовал! одно и то же sad.gif
Добавлено @ 01:00
p0s0l
А смысл, если в свойствах и так стоит PlainText:=False? Тем не менее попробовал. Безрезультатно sad.gif


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
p0s0l
Дата 31.7.2004, 01:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



Это я на случай, мало ли где незаметно меняешь програмно это свойство...
Так что неплохо бы видеть более полный кусок кода...


--------------------
С уважением, г-н Посол.
PM   Вверх
Pakshin A. S.
Дата 31.7.2004, 10:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61



Мои рассуждения были таковы:
Правильная загрузка идёт через OpenDialog, где FileName - полный путь к файлу ('C:\MyDocs\SomeFile.rtf').
Через ParamStr идёт название самого файла ('SomeFile.rtf').
Следовательно надо в параметр запихнуть ещё ит путь к файлу.

Ещё проверка:
Просто пропиши RichEdit1.Lines.LoadFromFile('C:\MyDocs\SomeFile.rtf');
PM   Вверх
Borland_Delphi_6
Дата 31.7.2004, 11:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20



Pakshin A. S.
Да нет, я проверял! Винда передает полный путь до файла sad.gif Я по-началу тоже так подумал, но потом обломался butbut.gif


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.1415 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.