Выбор действия кнопки

[Micha]

If я нажал button1(какой код здесь написать) then ShellExecute(Handle, nil, '/f1.txt', nil, nil, SW_SHOW) else if я нажал button2(какой код здесь написать) then ShellExecute(Handle, nil, '/f2.txt', nil, nil, SW_SHOW);

[pu4koff]

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

If я нажал button1(какой код здесь написать) then ShellExecute(Handle, nil, '/f1.txt', nil, nil, SW_SHOW) else if я нажал button2(какой код здесь написать) then ShellExecute(Handle, nil, '/f2.txt', nil, nil, SW_SHOW);

ну обычно для кнопок разные обработчики на клик пишут, но если уж один, то можно посмотреть на параметр Sender, в котором и содержица объект, вызвавший этот обработчик

[Micha]

Шо имеется ввиду. Например есть две формы form1, form2. На первой форме например есть две кнопки button1, button2. На второй memo1 и button3 (выход). И если я нажимаю на button1 то на второй форме в memo1 читается файл f1, а если я нажимаю button2 то читается файл f2. Вопрос: как мне взнать какая кнопка нажата чтоб знать какой файл читать в form2.memo1?

[Alex21]

В окне редактора далаете двойной клик на кнопке и описываете событие OnClick
или 2-й вариант: Выбираете кнопку. Переходите в Инспекторе объектов на закладку События и двойной клик на строчке OnClick.

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Memo1.Clear;
Form2.Memo1.Lines.LoadFromFile('c:\failo 1.txt');
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.Memo1.Clear;
Form2.Memo1.Lines.LoadFromFile('c:\ failo2.txt');
end;

Т.е. вы прописываете то, что выделено жирным, то что серым - создается по двойному клику на кнопке.

Form2.Memo1.Clear; - Очишаем Мемо.
Form2.Memo1.Lines.LoadFromFile('c:\failo2.txt'); - загрузка файла.
Обратите внимание на то что ссылка идет на form2, туда где расположен компонент Мемо.