Jeśli napisze coś takiego to nie chce się kompilować zatrzymuje się na
lini gdzie ma przypisaną czionkę zaraz po printer
if PrintDialog1.Execute then
begin
AssignPrn(PrintText);
Rewrite(PrintText);
Printer.Canvas.Font:=ini.ReadString('Drukowanie','czcionka',form7.Combobox3.text)
Printer.Canvas.Font.Color:=ini.ReadInteger('Drukowanie','kolor',colorbox3.itemindex)
Printer.Canvas.Font.Size:=ini.readinteger('Drukowanie','rozmiar',combobox4.Text);