[DELPHI] popoup

Jesli na formie mam kilka komponentów image to a tylko 1 popoup menu to jeśli kliknę prawym np. na image1 albo image2 tą skąd mam wiedzieć na którym image kliknołem. Chodzi mi o to w popoupmenu sa jakieś możliwości i żeby wiadomo było że on zrobi akurat z tym imagem a nie z innym.
--Pozrowienia {hello}
Waldi Koronowo
[email protected]

Sprawdz wlasciwosc PopupMenu1.PopupComonent : TComponent, np. w zdarzeniu OnPopup Twojego PopupMenu.

przyklad:

procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
MenuItem1.Caption:=PopupMenu1.PopupComponent.Name;
end;

--
Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

Tak prawie mi o to chodziło ale nie zupełnie.
Jesli ja wybiore z popoupmenu np. wyczyść klikając na image1(np.) to zeby wyczyścił image1 tzn jak napisać procedure if kliknieto prawym na tym komponencie then zrób to;
if kliknięto na tym then zrób to

Chyba ze tamto mozna jakoś przerobić ale do mnei trzeba jaśniej o wiele--Pozrowienia {hello}
Waldi Koronowo
[email protected]

To chyba niezbyt trudne.

Zakladam ze 'Wyczysc ' to MenuItem1.

procedure TForm1.Wyczysc(Rysunek: TImage);
begin
*kod czyszczacy
end;

procedure TForm1.MenuItem1Click(Sender: TObject); *klikniecie na wyczysc w popup
begin
Wyczysc(PopupMenu1.PopupComponent as TImage);
end;

A jak koniecznie chcesz if, to w obsludze klikniecia 'wyczysc'

if PopupMenu1.PopupComponent=Image1 then Wyczysc(Image1);
if PopupMenu1.PopupComponent=Image2 then Wyczysc(Image2);
if PopupMenu1.PopupComponent=Image3 then Wyczysc(Image3);

--
Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

Wielkie dzieki {browar} się należy

Jeszce jedna rzecz na dzisiaj

mam taka procedurę
if openpicturedialog1.execute then image11.picture.loadfromfile(openpicturedialog1.filename);

tablica[1]:=openpicturedialog1.filename;
czy do tablicy zapisuje samą nazwę bez lokalizacji przynajmniej tak to wskazuje a jeśli tak to co zrobić aby zapisał razem ze ścieżką.
I jak zapisać tą tablicę do pliku
{browar}
--Pozrowienia {hello}
Waldi Koronowo
[email protected]

&gttablica[1]:=openpicturedialog1.filename;
&gtczy do tablicy zapisuje samą nazwę bez lokalizacji przynajmniej tak to wskazuje

Nie wiem co Ci na to wskazuje.
cytat z helpu pod OpenDialog.Filename

The FileName property returns the name and complete directory pathof the most recently selected file. --Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1