Thema: Delphi Browser programmieren

Einzelnen Beitrag anzeigen

quendolineDD

Registriert seit: 19. Apr 2007
Ort: Dresden
781 Beiträge
 
Turbo Delphi für Win32
 
#21

Re: Browser programmieren

  Alt 20. Okt 2007, 17:24
Hallo

Das was bei mir steht, ist der Caption des MenuItems gewesen, welcher eigentlich http://www.google.de lautete

self ist in diesem Fall die Form.

Da du ja allgemein für jedes angelegte MenuItem die Procedur ClickMe zugewiesen hast, müsstest du dort auch über den Sender herausfinden, von welchem MenuItem aus diese aufgerufen wurde.

Delphi-Quellcode:
procedure TForm1.ClickMe(Sender: TObject);
var
MenuItem : TMenuItem;
begin
MenuItem := foobar;
if Sender is TMenuItem then
  begin
        ShowMessage(MenuItem.Items[MenuItem.MenuIndex].Caption);
  end;
end;
Edit: Ok er hats kürzer und schneller *g
Musste selber erstmal schauen, wie ich auf die Caption eigenschaft über Sender komme
Lars S.
Wer nicht mit der Zeit geht, geht mit der Zeit.
  Mit Zitat antworten Zitat