[DELPHI] MainMenu i funkcja warunkowa

0

Jak wykonać coś takiego w Delphi:

Mam MainMenu i rozwija się ona w dół i mam dajmy na to TForm1.a1 i a2. Jak napisać funkcję warunkową do tego, żeby po kliknięciu na pierwszą pozycję z listy coś się działo a po kliknięciu na drugą pozycję coś innego?

Jeśli wybrane z menu a1 to zmienna:=0;
jeśli wybrane z menu a2 to zmienna:=1;

Proszę o pomoc.

0

Jaśniej można ?

Chodzi Ci o to, aby po kliknięciu w wybraną opcję w MainMenu coś się zdarzyło ?

0

Mam takie mainmenu:
a
1
2
(po kliknięciu na a, rozwija się 1 i 2)

Chodzi mi o coś takiego:

if klikne 1 then
begin
.....
end

if klikne 2 then
begin
.....
end

0

http://img690.imageshack.us/img690/4974/mainmenup.jpg</img>

Jeżeli już masz stworzone menu, to kliknij dwukrotnie ten niebieski prostokąt i wpisz w edytorze do którego przeniesie Cię Delphi, co ma się wykonać po wybraniu w menu pozycji 1. Tak samo zrób dla pozycji 2

0

Tak wiem, ze da się zrobić, ale mi potrzebne za pomocą if.

0

Co Ty gościu kombinujesz???
Masz milion elementów i nie chcesz pisać miliona procedur?
SENDER!!!

0

Tak jak Juhas napisał. Sender i dodatkowo jeżeli potrzeba możesz wykorzystać oraz ustawić
wartość liczbową we wlasności Tag MenuItemów. A procedurę obsługi OnClick, dla większej
ilości MenuItemów najlepiej ustawić w pętli wspomagając się funkcją FindComponent także
tworzenie większej ilości MenuItemów również. Więcej informacji jest w gogole albo zobacz
też te źródło: http://www.speedyshare.com/files/25172928/dodawanie_menu.rar i myśl [!!!]

1 użytkowników online, w tym zalogowanych: 0, gości: 1