hentydninger til menu poster

, hvordan kan jeg skabe hentydninger til menu ting?, på din form, vi går ud fra, at du har en mainmenu og en statusbar,,,,,,,, tform1 = klasse (tform),,,,,,,,, procedure formcreate (afsender: tobject), private, procedure hinthandler (afsender: tobject);,,,,,,,,,, tform1 formcreate procedure. (afsender: tobject), begynder, //hver gang anvendelsen må udvise en hentydning, //det vil udløse de hinthandler procedure, application.onhint: = hinthandler,,,,,,, procedure tform1. hinthandler (afsender: tobject), begynder, //du kan bruge getlonghint (ansøgning. vink) funktion, //at udvinde den lange del af den antydning, hvis der er en, statusbar1.simpletext: = anvendelse. vink,,, hvis statusbar1.simpletext = "så,,, statusbar1. -; //at tvinge statusbar at male sine plader igen,,,,,



Previous:
Next Page: