Открытие rtf файлов

[pascalzzz]

какой прописать код для открытия rtf файлов
использую richedit и button

[Dozent]

Ну из того что я заню в делфи запуск файлов возможет только функцией ShellExecute

[pascalzzz]

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

Ну из того что я заню в делфи запуск файлов возможет только функцией ShellExecute

а как это написать?

[Dozent]

http://programmersforum.ru/showthread.php?t=197764

[evg_m]

какой прописать код для открытия rtf файлов
использую richedit и button

0. добавляем с вкладки dialogs Openfile
1. задаем для кнопки (button) Onclick
3. в коде пишем

 if Opendialog.execute then
   richedit.Lines.loadFronfile(opendialog.filename);

[pascalzzz]

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

0. добавляем с вкладки dialogs Openfile
1. задаем для кнопки (button) Onclick
3. в коде пишем

 if Opendialog.execute then
   richedit.Lines.loadFronfile(opendialog.filename);

не запускаеться проект
ошибка
Undeclared identifier: Opendialog

[evg_m]

а кто будет делать это?

0. добавляем с вкладки dialogs Openfile

сделано?
тогда смотрим какое имя (name) он получил. И в коде пишем правильное имя
Opendiialog<XXX>.

[pascalzzz]

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    OpenDialog1: TOpenDialog;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if Opendialog.execute then
   richedit.Lines.loadFronfile(opendialog.OpenDialog1);
end;

end.

все равно не получилось

пробелы на месте

[artemavd]

pascalzzz, ну ты вообще думать-то будешь сам или нет???!!!
1. Тебе evg_m в своем посте четко дал ответ как надо сделать
2. Научись внимательно смотреть на то, что тебе пишут
3. Никаких пробелов не надо. Пробелы есть тут только в одном месте - в твоей голове и причина тому: отсутствие знаний элементарных вещей
4. Еще раз увижу подобную тему с глупыми вопросами - закрою.
5. Вот, писать надо так:

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

Найди 10 отличий. Тема закрыта.