A scuola di Delphi

Capitolo 3

Tavola gradi-radianti

Questo programma è particolarmente semplice e sfrutta elementi appresi nel precedente, quindi verrà lasciato come esercizio.

L'applicazione dovrà avere l'aspetto rappresentato a destra e le tre procedure associate alla pressione dei 3 SpeedButton dovranno avere le seguenti caratteristiche:

a) la pressione dello SpeedButton Nuovo dovrà cancellare il testo contenuto nel componente Memo;

b) la pressione dello SpeedButton Calcola dovrà elencare nel componente Memo la lista degli angoli da 0° a 360° in gradi e radianti a multipli di 15°; come si vede dalla figura il risultato in radianti dovrà essere visualizzato come frazione di p e non come numero reale;

  for i:=0 to 24 do
  begin
    gradi:=15*i;
    radianti:=gradi/180;
    Memo.Lines.Add(FloatToStr(gradi)+'°'+#9+FloatToStr(radianti)+' p');
  end;

c) la pressione dello SpeedButton Salva dovrà salvare, tramite una finestra di dialogo, la lista degli angoli da 0° a 360° in gradi e radianti in un file di testo.

N.B. In Delphi esiste già la variabile predefinita Pi, che contiene il valore di p seguente: 3,1415926535897932385. Nel nostro programma non viene però utilizzata; è importante, invece, attribuire al componente Memo il Font Symbol in modo che la p sia visualizzata come p.

 3.02 - Tavola gradi-radianti