Class

[[xEsk]]

El format:

Código Delphi [-]
Format('Numeros Menores al Promedio (Promedio: %.1f)', [Promedio]);

Lo de las líneas de '-', una forma rápida y poco pensada seria esa:

Código Delphi [-]
var
  n: Integer;
  sLine: String;

begin
  sLine:='';
  for n:=0 to 10 do // en lugar de 10 pon los q quieras!
    sLine:=sLine + '-';
  ListBox.Items.Add(sLine);

Lo demás, ya no lo veo tan "rápido" y directo de explicar, es ya cosa de la imaginación de cada uno...

Saludos.