Astăzi vom afla cum să modificăm MainMenu, și anume, ultimul element de meniu va fi plasat în partea dreaptă a formularului, ca de exemplu în Total Commander. Pentru a face acest lucru, folosim funcția ModifyMenu, care este definită în Delphi după cum urmează
Interpretarea parametrului lpNewItem depinde de faptul dacă uFlags include parametrul MF_BITMAP, MF_OWNERDRAW sau MF_STRING.
Să începem. Vom plasa pe formularul MainMenu, vom face 4 puncte, să le numim 1, 2, 3, 4, fiecare dintre care constă din mai multe sub-elemente (în exemplul meu, există 4 subiteme în totalitate). Numele articolelor vor rămâne neschimbate (N11, N21, N31 și, respectiv, N41). În modulul de formare onCreate, scrieți următorul cod
Acum, să analizăm ceea ce am scris. Primul parametru este omis, sper că este clar pentru toți. Al doilea parametru este numărul elementului pe care dorim să îl modificăm. Deoarece vrem să mutăm ultimul (al patrulea) element de meniu în dreapta, notăm numărul acestuia aici (deoarece numerotarea începe cu 0, apoi scriem 3). Apoi sunt steagurile care determină exact ce vrem să facem (o descriere a tuturor steagurilor poate fi văzută în ajutor). Al patrulea parametru este un indicator pentru elementul care trebuie modificat. Ultimul parametru este noul antet pentru elementul variabil, putem scrie ceva aici sau, ca în exemplu, luăm titlul acestui element.
Și asta este! După cum puteți vedea, totul este elementar pur și simplu. Ca întotdeauna, acest exemplu poate fi descărcat la sfârșitul articolului. Mult noroc cu programarea.
Articole similare
Trimiteți-le prietenilor: