Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Пишу текстовой редактор, нужна помощь [D7]


ppcumax ©   (2007-04-19 16:40:00) 

Пишу тут несложный текстовой редактор, но никак не могу понять, как сделать так чтоб при открытии какого-то текстового файла, текст загружался мне в Memo. Тоесть я нажимаю на текстовой файл > Открыть с помощью > Мой Текстовой редактор, а Memo в редакторе пустое...


ppcumax   (2007-04-19 17:14:00) [1]


> а Memo1.Lines.LoadFormFile(ParamStr(1)) умеешь ?


спасибо, помог


Сергей М.   (2007-04-19 17:12:00) [2]


> ppcumax ©   (19.04.07 16:53) [2]
>
> а как же тогда блокнтот, wordpad написаны?


да как угодно, но уж точно не на базе дельфийского компонента TMemo)


Игорь Шевченко   (2007-04-19 17:10:00) [3]

ppcumax ©   (19.04.07 17:07) [5]


> это я умею


а Memo1.Lines.LoadFormFile(ParamStr(1)) умеешь ?


Romm   (2007-04-19 17:09:00) [4]


> ppcumax ©   (19.04.07 17:07) [5]

чем тебя RichEdit не устраивает????


ppcumax   (2007-04-19 17:07:00) [5]


> varFname:string;beginif OpenDialog1.Execute  then begin
>   FName:=OpenDialog1.FileName;   Memo1.Lines.LoadFromFile(FName);
>    end;end;


это я умею


Neket   (2007-04-19 17:05:00) [6]

var
Fname:string;
begin
if OpenDialog1.Execute
 then begin
  FName:=OpenDialog1.FileName;
  Memo1.Lines.LoadFromFile(FName);
  end;
end;


clickmaker   (2007-04-19 16:57:00) [7]


> как же тогда блокнтот, wordpad написаны?

блокнот - это секретная разработка, исходники вордпада есть в примерах для MFC на С++
А для дельфей есть замечательная папочка \Delphi\Demos\RichEdit - там есть то, что надо


ppcumax   (2007-04-19 16:53:00) [8]

а как же тогда блокнтот, wordpad написаны?


Сергей М.   (2007-04-19 16:42:00) [9]

Никак.


Наверх

Титульная страница Поиск, карта сайта Написать письмо