sprintf(TextBuffer, "%f kJ",Energiemenge(KesselInhalt, KesselTemperatur));
	Text(XKoord +30, YKoord+120, TextBuffer);

}

double Kessel::Energiemenge(double V, double T)
{
    double Q;
    Q=V*4.19*T;
    return Q;
}