Registriert seit: 3. Mai 2003
Ort: München
157 Beiträge
Delphi 7 Professional
|
Re: Einem Erzeugtem MenuItem ein Onclick zuweißen.
19. Feb 2004, 18:11
versuche es doch einmal so:
Delphi-Quellcode:
procedure TForm1.DateiLaden(Sender: TObject);
begin
Application.CreateForm(TForm2, Form2);
TForm2(ActiveMDIChild).Richedit1.Lines.LoadFromFile(Item1.Caption);
end;
[..] //bekannt
Item1.OnClick := DateiLaden(Sender); //<-
List.Free;
end;
Mike Schröder Fleiß kann man vortäuschen, faul muss man schon selber sein!
|