Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - dynamisches main-menu -> file öffnen
Micha_Bln - Di 07.12.04 15:12
Titel: dynamisches main-menu -> file öffnen
hi,
ich hoffe mal, dass ich hier richtig bin, und man mir meine beantworten kann und will:
ich habe folgendes problem:
für die schule sollen wir eine minimalsprache mit entsprechenden beispielen programmieren
die sprache steht, die beispiele soweit auch schon fast, nur möchte ich jetzt den aufruf der beispiel-scripts etwas "netter" gestalten
der normale weg wäre ja: datei -> öffnen, raussuchen, datei ins richedit laden
nun war meine idee:
ich lese ein verzeichnis "beispiele" aus, und immer wenn dort eine datei ist, die zu meinem programm gehört, erstellt er in einem untermenü des mainmenu's einen eintrag, der mit nur einem klick die datei öffnet
zu den fragen:
wie packe ich dynamisch so ein mainmenu-item (?) ins menu in einen unterordner bzw unter-unterordner
wie mach ich das mit dem öffnen? sollte ich nicht über sender:Tobject irgendwie den namen/die beschriftung für den eintrag rausfinden, die ja dann dem filename entsprechen würde?
danke für eure hilfe,
grüße aus berlin
Ja-Pa - Do 09.12.04 17:48
Titel: Re: dynamisches main-menu -> file öffnen
Micha_Bln hat folgendes geschrieben: |
wie packe ich dynamisch so ein mainmenu-item (?) ins menu in einen unterordner bzw unter-unterordner
|
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9:
| procedure TForm1.Button1Click(Sender: TObject); var NewItem: TMenuItem; begin NewItem := TMenuItem.Create(Self); NewItem.Caption := 'Neuer Eintrag'; Dateien.Add(NewItem); end; |
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!