Условие при изменении свойства Caption кнопки

[demiancz]

Здравствуйте. Есть 10 кнопок. Две основные кнопки "Еда" и "Техника". При нажатии на эти кнопки 8 других кнопок меняют свойство Caption. Например:
Нажали "Еда" и другие кнопки стали называться "Картофель", "Сливы" и т.д.
Нажали "Техника" и другие кнопки стали называться "Телевизоры", "Фотоапараты" и т.д.
Пробую такой код:
if sBitBtn1.Caption = 'Еда' then
BitBtn3.Caption := 'Картофель';
BitBtn4.Caption := 'Сливы';
BitBtn5.Caption := 'Абрикосы';

if sBitBtn1.Caption = 'Техника' then
BitBtn3.Caption := 'Телевизоры';
BitBtn4.Caption := 'Фотоапараты';
BitBtn5.Caption := 'Мониторы';

Но при компиляции меняется только одна кнопка.

Как я думаю нужно сделать что то типа такого:
if sBitBtn1.Caption = 'Еда' then
(BitBtn3.Caption := 'Картофель') and
(BitBtn4.Caption := 'Сливы') and
(BitBtn5.Caption := 'Абрикосы');

if sBitBtn1.Caption = 'Техника' then
(BitBtn3.Caption := 'Телевизоры') and
(BitBtn4.Caption := 'Фотоапараты') and
(BitBtn5.Caption := 'Мониторы');

Но при таком коде проект не компилируется. Помогите пожалуйста.

[Shouldercannon]

if sBitBtn1.Caption = 'Еда' then
begin
  BitBtn3.Caption := 'Картофель';
  BitBtn4.Caption := 'Сливы';
  BitBtn5.Caption := 'Абрикосы';
end;

if sBitBtn1.Caption = 'Техника' then
begin
  BitBtn3.Caption := 'Телевизоры';
  BitBtn4.Caption := 'Фотоапараты';
  BitBtn5.Caption := 'Мониторы';
end;

надо ставить ключевые слова, которые начинают и заканчивают операторные блоки

begin
...
end;

[bizkitlimp]

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

Две основные кнопки "Еда" и "Техника"

тут противоречие:

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

if sBitBtn1.Caption = 'Еда'
if sBitBtn1.Caption = 'Техника'

Одна кнопка, которая видимо может менять название) Или же две?
А вместо and бесконечных, можно просто заключить в begin end

if BitBtn1.Caption  = 'Еда' then
 begin
 BitBtn2.Caption := 'Картофель';
 BitBtn3.Caption := 'Сливы';
 BitBtn4.Caption := 'Абрикосы';
 end;

[demiancz]

Спасибо. Помогло. Понял