Думаю, что если вы читаете эту статью, значит вы новичок в программировании, и возможно Delphi видите в первый раз. Скажу сразу, что Delphi-это не язык программирования, как утверждают многие начинающие программёры, а среда разработки программ. Сам язык именуется Паскалем(paskal) , в честь небезызвестного французского философа Блеза Паскаля. Это так, лирическое отступление:))

Ну что ж, приступим. Откройте Delphi. Теперь нажмите File->New->Application. перед вам должно появиться два окна: Unit1.pas и Form1. Первое окно- это код( тут будут располагаться ваши алгоритмы и прочее.) А вот второе- это форма ,т.е так будет выглядеть ваше приложение. Если посмотреть немного выше, то вы увидите палитру компонентов, а на ней множество вкладок и самих компонентов.

Теперь перейдём непосредственно к программированию. Выберите из палитры компонентов (вкладка Standart) компонент TMemo, и щёлкните по нему два раза. Стоит заметить, что при помещении объекта на форому, ему присваивается уникальное имя(т.е TMemo будет называться memo1, а если положить на форму ещё один компонент TMemo, ему присвоится имя memo2, и т.д). Теперь он есть у вас на форме, и вы можете изменять его размеры, и т.д.Выберите его левой кнопкой мыши и перейдите в Инспектор Объектов (Object Inspector) тут вы видите параметры этого объекта, и их значения (параметры слева, а их значения справа). Найдите там параметр Align и поставьте его значение в alClient, как вы уже наверное успели заметить memo1 растянулось на всю форму(это нам и нужно).Теперь, перейдите на вкладку Win32 палитры компонентов и поставьте(кликнуть два раза) на форму компонент ToolBar. Далее(уже на форме) выделите ToolBar1 правой кнопкой мыши в нажмите New Button. У вас должна была появиться кнопка в ToolBar. Повторите эти действия ещё 2 раза. Затем перейдите на вкладку Dialogs палитры компонентов, и поставьте на форму компоненты OpenDialog и SaveDialog(это диалоги загрузки и сохранения файлов). Опять вернитесь к ToolBar1 и кликните по первой кнопке два раза. Вы должны были оказаться в окне Unit1.pas, и перед вами должен был появиться следующий код:

procedure TForm1.ToolButton1Click(Sender: TObject);
begin

end;


Объясню сразу, то, что вы сейчас видите, это обработчик события OnClick(Клик по кнопке) Кнопки ToolButton1 на ToolBar'e. Этот код выполняется по щелчку на кнопке ToolButton1. вставьте между словами Begin и end; следующий код:

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

У вас должно было получиться следующее:

procedure TForm1.ToolButton1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
end;

Нажав на F9 вы увидите своё приложение, и сможете загрузить текст из файла в Memo1.

Сейчас, когда вы уже немного наигрались, можно приступить к работе. Нам опять нужно вернуться к ToolBar, теперь же, кликните по второй кнопке два раза, и впишите в обработчик события OnClick, следующий код:

if SaveDialog1.Execute then
Memo1.Lines.SaveToFile(SaveDialog1.FileName);

Вот то, что должно было получиться:

procedure TForm1.ToolButton2Click(Sender: TObject);
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;

Сейчас, ваше приложение уже умеет сохранять текст. Осталась последняя кнопка, в её обработчик события OnClick следует вписать всего одно слово: Halt. Эта кнопка будет выходом.

Как вы уже наверное заметили, на этих кнопках нет картинок, и поэтому он не смотрятся. Поставьте на форму компонент ImageList со вкладки Win32, и кликните по нему два раза. Вы оказались в диалоге добавления картинок. Нажмите на кнопку Add... и добавьте три понравившиеся вам картинки для кнопок. Когда вы добавляете картинку, ей присваивается индекс, его вы можете увидеть под картинкой. Нажмите на ОК. Выберите ToolBar(один щелчок) и измените его свойство(в инспекторе объектов) Images на имя вашего ImageList(ImageList1).У вас теперь есть картинки на кнопках! Но если вдруг картинки встали не так, как полагается, вы можете сами назначить картинку для кнопки, это можно сделать, указав ImageIndex(в свойствах кнопки) на индекс нужной вам картинки.

Теперь нам нужны полосы прокрутки для memo1, поставьте свойство (memo1) ScrollBars в ssBoth.

Осталась последняя деталь. Если текстовый файл открывают с помощью вашего приложения(Открыть с помощью...) то он не открывается, а просто загружается ваше приложение. Выберите в инспекторе объектов объект form1 и перейдите на вкладку Events. Затем кликните два раза напротив надписи OnCreate. Вы должны были оказаться в обработчике события OnCreate(вызывается при построении формы) впишите туда следующий код: