Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

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

Игорь Шевченко (2005-08-11 12:35:00) [1]
Если имена в пунктах меню отлючаются от имен того, куда надо переносить, то, на мой взгляд это тот случай, когда оправдано использование поля Tag.

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

Удачи!

Digitman (2005-08-11 12:05:00) [2]

> syte_ser78 © (11.08.05 11:48) [7]

и ?

какие проблемы ?

ответ на вопрос ты уже получил вроде бы ...

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

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

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

begin...end (2005-08-11 11:42:00) [4]
> syte_ser78 © (11.08.05 11:32) [4]

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

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

Digitman (2005-08-11 11:40:00) [5]

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

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

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

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

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

syte_ser78 (2005-08-11 11:32:00) [6]
Блин. Всеравно не могу алгоритм придумать.
Попап меню. В один из пунктов попапа добавляю динамически создающийся список значений.
Условие должно выполниться имено для этих значений. Тоесть в онклик налепить кучу if-ов или как?

syte_ser78 (2005-08-11 10:18:00) [7]
Спасиба обоим!

Leonid Troyanovsky (2005-08-11 09:39:00) [8]

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

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

with Sender as TMenuItem do
ShowMessage(Caption);

--
Regards, LVT.

Digitman (2005-08-11 09:33:00) [9]
procedure TForm1.PopupMenuItemsClick(Sender: TObject);
begin
ShowMessage((Sender as TMenuItem).Caption);
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »