Italian community of Lazarus and Free Pascal
Programmazione => Generale => Topic aperto da: Giuani - Gennaio 24, 2021, 05:28:29 pm
-
Salve a tutti,
Sappiamo che ridimensionando una Form di lazarus, agganciandolo con il mouse, gli oggetti Button, Edit e ogni altro oggetto non cambiano di dimensione.
Domanda:
è possibile ottenere un resize proporzionale automatico degli oggetti quando si fa un resize della form ?
Grazie dell’attenzione
-
Lo fai con la proprietà "Anchors" nell'object inspector.
Se lo ancor sia a destra che a sinistra, e/o sia in alto che in basso, ottieni quello che vuoi tu
Ciao, Mario
-
Grazie, funzione.
C’è anche un metodo per modificare automaticamente la dimensione dei caratteri ?
-
Mi spiace, ma non mi è mai servito, quindi non lo so !!!
Ciao, Mario
-
per i font penso che, nell'OnResize, dovresti determinare la proprietà Size del font a seconda delle dimensioni width/height della form
-
Grazie Mario
Grazie Nommorelogic
-
Salve
Sulla base dei vostri suggerimento ho fatto questa piccola procedura
procedure TForm1.TrackBar1Change(Sender: TObject);
var L:word;
begin
L:=TrackBar1.Position;
Form1.Height:=L*50+100;
Form1.Width:=L*100+200;
Form1.Font.Size:=L+8;
end;
che cambia la dimensione della Form e del carattere con una TrackBar.
Ovviamente questa particolare procedura è solo una prova e va calibrata secondo le necessita del caso.
Inoltre, più comodamente la procedura, più che usare una TrackBar può essere attivata con un l’evento OnResize di Form1.
Ancora grazie a Voi.