помогите примером кода

← →
syte_ser78 © (2005-08-11 09:23) [0]

Есть попап меню.
Как определить текст меню попапа по которому щелкнули?

← →
Digitman © (2005-08-11 09:33) [1]

procedure TForm1.PopupMenuItemsClick(Sender: TObject);
begin
ShowMessage((Sender as TMenuItem).Caption);
end;

← →
Leonid Troyanovsky © (2005-08-11 09:39) [2]

> syte_ser78 © (11.08.05 09:23)
> Есть попап меню.
> Как определить текст меню попапа по которому щелкнули?

Например, в TMenuItem.Onclick

with Sender as TMenuItem do
ShowMessage(Caption);

--
Regards, LVT.

← →
syte_ser78 © (2005-08-11 10:18) [3]

Спасиба обоим!

← →
syte_ser78 © (2005-08-11 11:32) [4]

Блин. Всеравно не могу алгоритм придумать.
Попап меню. В один из пунктов попапа добавляю динамически создающийся список значений.
Условие должно выполниться имено для этих значений. Тоесть в онклик налепить кучу if-ов или как?

← →
Digitman © (2005-08-11 11:40) [5]

> Условие должно выполниться имено для этих значений

КАКОЕ условие ?

> Тоесть в онклик налепить кучу if-ов или как?

можно и "кучу if-ов", можно "или как" .. тебе выбирать ..

но у каждого TMenuItem есть св-во Tag, по нему можно сделать и case

← →
begin...end © (2005-08-11 11:42) [6]

> syte_ser78 © (11.08.05 11:32) [4]

> В один из пунктов попапа добавляю динамически создающийся
> список значений.

В смысле, список подпунктов? Тогда можно назначить всем им один обработчик, и в нём определять по Sendery.

Digitman © (11.08.05 11:40) [5]
есть база данных.
В попапе дбгрида есть следующие пункты

Удалить
Редактировать
Дублировать
...
Переместить в ...
ххххх
ууууу
zzzzz
.....

Список "переместить в" заполняется динамически.
для Редактировать, дублировать, удалить по онкликам прописанны необходимые операции, а вот для пунктов "переместить в" нужно в поле Name записать то значение по которому щелкнули.

Если имена в пунктах меню отлючаются от имен того, куда надо переносить, то, на мой взгляд это тот случай, когда оправдано использование поля Tag.

Я бы создал список (TStringList) или массив из имен "куда надо переносить", индекс в этом списке/массиве с прибавленной величиной присвоил бы MenuItem"у и по клику, определяя tag у Sender"а и отнимая ту самую прибавленную величину, получал бы индекс в списке нужных имен.

Удачи!

помогите примером кода Найти похожие ветки