Delphi使いにはチョー簡単
Caption := FloatToStr(Pi);