TmainMenu

[Nicola]

E' possibile variare il font del Menu'? nell'ispettore oggetti non vedo questa opzione.
Grazie

[supercim]

Se intendi come fare ad impostare il font da programma, questo è un esempio:
(dopo aver inserito un oggetto, in questo caso Label1, queste le istruzioni, dichiarare il font e successivamente impostare la grandezza)

Label1.Font.Name:='Agency FB';
Label1.Font.Size:=14;

[supercim]

Ora mi rendo conto, dal titolo, che ti riferisci all'oggetto TmainMenu. Quest'oggetto non l'ho ancora usato.

[Stilgar]

Ciao Nicola.
Prova a modificare  il font via codice. 😉

[Nicola]

Grazie ho provato a scrivere "TMainMenu.Font:='Courier New';" ma il comando non esiste.

[nomorelogic]

vado a memoria ma i menù dovrebbero usare i font di sistema...

[Nicola]

Credo che la tua memoria non ti tragga in inganno; pertanto non c'è modo di modificarli?

[nomorelogic]

penso da pannello di controllo...

in effetti ha senso: il SO garantisce che tutti i controlli di tipo menù appaiano allo stesso modo in tutte le applicazioni
forse dovresti cercare qualche controllo che simula i menù

per ora non so dirti di più purtroppo

[Nicola]

No va bene non importa, mi basta capire che non ero proprio cosi' imbranato, grazie.

[Stilgar]

Tramite un approccio indiretto?

http://stackoverflow.com/questions/2750102/how-can-i-change-the-fontsize-of-the-mainmenu-items-in-delphi

Mi ricordavo si potesse fare qualcosa via codice 😁
Mi si impallava tutto ed ero andato via api Windows a suo tempo 😉

[Stilgar]

Nicola.  Benché sposato resto imbranato con le donne. Con i computer basta trovare l'idea giusta o un punto di vista alternativo.
Ora coi computer puoi fare pure il caffè... Forse giusto con il macinino si potrebbe avere qualche fastidio  😉

[Nicola]

Nicola.  Benché sposato resto imbranato con le donne.

Che dire mal comune... mezzo gaudio 
Grazie del link però questa parte non trovo dove attivarla
"and make sure that the OwnerDraw property of your TMainMenu is set to true"
Se clicco sull'oggetto TmaniMenu non trovo la proprietà (ti allego uno screenshot)

[nomorelogic]

forse hai una versione di Lazarus non recente?
io uso la trunk e vedo la property OwnerDraw che manca nel tuo screenshot

[Nicola]

Dovrebbe essere la piu' recente la 1.6 a 32 bit per windows