, hoe je het menu, in de toepassing van een simpel "recente documenten" lijst van het menu /.,, een tijdje geleden, heb ik nog een laatste dossier "menu" in een project waar ik aan werk.Dus schreef ik een eenvoudig onderdeel moet flexibel zijn.B) voor andere projecten kunnen worden gebruikt.De geschiedenis is geboren:),,, je kan hier het downloaden van de geschiedenis.Doe wat je wilt, maar ik zal apprechiate als je kunt, laat het me weten als je in je programma te gebruiken:,,), het doel van dit verslag is om een eenvoudige "open" menu 's (zie hieronder).Dan zal ik de eerste een code. Dokter uitleggen?.,,,,,, ///////update de "Reopen" list..,,,., TfrmMain.History1Change (Sender: TObject), var;,.,,,.,,, ", met de Reopen1, doen, beginnen,,,,,, duidelijk. Voor de i:= 0, te History1.Count-1 doen,,,,,,,",, toevoegen (TMenuItem.Create (zelf);,,, met, Items[Count-1], do,,,, ", het onderschrift: = &" IntToStr (i) + + + History1.Items[i];,,, TAG: = I; en onclick: = GenericReopenClick;,,,,,,,,,,,, in staat gesteld: = graaf > 0;,,, ///////toevoegen linebreak,,, toevoegen (TMenuItem.Create (zelf);,, Items[Count-1].Caption: = ";,,, ///////History'toevoegen'Clear toevoegen (TMenuItem.Create (,,, -,,);,, met, Items[Count-1], doen, beginnen,,, Legende: ='Clear History'; - = - 1:,,,,, onclick: = GenericReopenClick;,,,,,,,,,,,,,,,,, ///////Reopen item clicked...,,,., TfrmMain.GenericReopenClick (Sender: TObject);,,, ", als TMenuitem (afzender).Tag > = 0,...,,, OpenFile (History1.Items[TMenuitem (afzender).Tag]), anders History1.Clear,,,,,,,,,,,,,,,,,,. ///////..., TfrmMain.OpenFile (touw, en FileName:);",,,, ///////je code hier...,,, History1.AddItem (bestandsnaam);,,,,,,,,, dat deze opmerking is niet de code voor het onderdeel, je hebt te downloaden en het is voor Dit te installeren.Ik history1change is voorwerp van de geschiedenis van de OnChange gebeurtenissen, geschiedenis.Elke keer als een project wordt toegevoegd aan de historische component, dit proces zal worden genoemd, dus we weten dat deze lijst is veranderd.Dus we alleen het creëren van menu 'reopen1 "en het huidige project +" uit de geschiedenis project.,,, genericreopenclick, we hebben alle menu' s evenement is waar je kunt je code om het geval, er is iemand op een post op ons menu.Ik denk dat dit het meest te redden van een historisch project per indicatoren in de overeenkomstige menu etiket eigenschappen zie je boven.Een geschiedenis van de index van de niet - 1, dus gebruikte ik het uit de geschiedenis.,,, het behoud van de historische alleen laden /lijst van /naar ini - dossier.Maar als je geen fouten of enige verbetering, laat me weten, dus ik kan de actualisering van het verhogen van de andere vorm van steun,.,