چاپ اطلاعات یک lable

سلام
در واقع 2 تا سوال دارم:

1. چطور میشه متن یه lable رو چاپ کرد؟
2. چطور میشه متن یه lable رو توی یه فایل متنی نوشت و بعد با تنضیمات بیشتر اونو چاپ کرد؟

در ضمن مبتدی هستم ساده توضیح بدید.
لطفا هر چه سریعتر جوابمو بدید تا امشب باید این برنامه رو بنویسم. گیرم
دمتون گرم

برای گزارش گیری فوروم رو جستجو کنید ، کلمات کلیدی : QuickReport , FastReport , CrystalReport و غیره ...
در مورد ذخیره متن هم باید بگم که ساده ترین راهش استفاده از TextFile هست .

کد:

---

var
  tFile: TextFile;
begin
  AssignFile(tFile, 'test.txt');
  Rewrite(tFile);
  Write(tFile, Label1.Caption);
  CloseFile(tFile);
end;

---

یا حق ...

متن توی Label رو میتونی اینطوری چاپ کنی

کد:

---

with Printer do
Begin
BeginDoc
Canvas.TextOut(Label1.Text);
EndDoc
End;

---

با اندکی تغییر