[ Enan @ 05.06.2013. 11:36 ] @
Da li neko ima iskustava u redu sa menuDesigner-om, tacnije treba mi string od menija na koji je kliknuto,
ali string sastavljen od caption-a njegovog roditelja, roditelja roditelja itd, npr da string izgleda ovako:

GlavniMeni / SubMeni1 / SubsubMeni3 / SubSubSubMeni5

i to da npr bude, kada klinem na tu stavku menija, da mi u nekom Memo-u ispise putanju ili u
nekoj tekstualnoj datoteci, treba mi zbog pisanja helpa da mogu da copy/paste ovaj string,
da li postoji neka gotova funkcija ili neki properies od menuDesignera ili mora da se pravi,
nije bitno da li je u debug ili u edit modu aplikacija, ovo je bitno meni , nije za krajnjeg korisnika.

[ savkic @ 05.06.2013. 14:46 ] @
Ne postoji gotovo ali se to lako napravi sa jednom rekurzivnom funkcijom (pišem iz glave):

Code:


function GetFullPath(const AMenu: TMenuItem): string;
begin
  if Assigned(AMenu) then
    Result := GetFullPath(AMenu.Parent) + '.' + AMenu.Caption;
end;



[ Enan @ 05.06.2013. 17:14 ] @
Funkcija radi to sto mi treba, samo mi daje ampersende na svim captionima od svakog menija, pa
mi ispusuje nesto ovako

//&Sistemska Podešavanja/&Opšta Podešavanja/Adm&inistracija Sistema

u redu da ispisuje na pocetku svakog captiona, ali vidi poslednji caption, u sred stringa

[ reiser @ 05.06.2013. 17:53 ] @
Code:
StringReplace(result, '&', '', [rfReplaceAll]);


ili

Code:
while Pos('&', result) > 0 do
  Delete(result, Pos('&', result), 1)

[ Enan @ 05.06.2013. 21:09 ] @
Ok, to je to, hvala @savkic, @reiser