at tilføje eksisterende menu i misligholdelse auto former

, tilføjes eksisterende "menu i misligholdelse autoforms ikke var implimented og altid er handicappede.denne enkle form mærker de dristige kilde til, at denne mulighed, og bygge en ansøgning, er det nyttigt at anvende standard - former, men det er ærgerligt, at der tilføjes eksisterende "menu mulighed blev aldrig implimented.for at gøre det muligt for denne funktionalitet, følg anvisningerne nedenfor.,,, de to sager, der er indeholdt i dette arkiv (selectdlg. zip) i den modige kilde directory (ved misligholdelse, c) program filer. boldsoft. bfdr40d7arch. kilde) og sikre, at kilden adresseregister i delphi bibliotek vej (værktøj, miljø muligheder, bibliotek, bibliotek sti).,,,,,,, at den form, det er også nødvendigt at lappe den modige fil boldafpdefault.pas skal omfatte følgende:,,,,,,, tilføje "formgenericselect" til gennemførelsen anvender afsnit (line 238),,,,,,, tilføje denne metode erklæring til trolebutton klasse (om overensstemmelse 193):,,,,, trolebutton = klasse (tbutton), offentlige,, [...],,, procedure addexistingobject (afsender: tobject);,,,,,,,,,,,,,,,,,, i metode trolemenu. skabe, tilføje de anførte strækninger nedenfor (line 1288):,,,,, anitem: = tmenuitem. skabe (selvstændige), anitem. post: = tilføje eksisterende...,,, anitem. mulighed for: = falske, (start tilføjelser af david knaack},, anitem aktiveret: = sandt.,,, anitem.onclick: = frolebutton. addexistingobject;,, (stop tilføjelser},,,,,,,,,,,,,, tilføje denne metode til at gennemføre afsnit (line 1184):,,,,, {-----------------------------------------------------------------------------, procedure: trolebutton. addexistingobject, dato: 12-feb-2003, beskrivelse: tilføjet af david knaack,, -----------------------------------------------------------------------------}, procedure trolebutton. addexistingobject (afsender: tobprojekt);,, var, objectreference: tboldobjectreference;,, dlgselect: tfrmgenericselect;,, påbegyndes, hvis det er blevet tildelt (boldhandle), begynder, objectreference: = boldhandle. værdi som tboldobjectreference;,,, dlgselect: = tfrmgenericselect. skabe (self, objectreference.boldsystem, boldhandle.boldtype.expressionname);,,, hvis dlgselect.showmodal < > mrok så udgang;,,, objectreference.boldobject: = dlgselect. selectedboldobject og, endelig, dlgselect. fri,,,,,,,,,,,,,,,,,,,,,,, nu tilføjes eksisterende "menu, bør være til rådighed for medlemmerne, der er dristige objekter.



Previous:
Next Page: