czcionki w drukowaniu

0

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);

0

A JAKI KOMUNIKAT wywala?

0

A JAKI KOMUNIKAT wywala?

[Error] Unit1.pas(396): Incompatible types: 'TFont' and 'String'
[Error] Unit1.pas(397): Missing operator or semicolon
[Error] Unit1.pas(397): Incompatible types: 'Integer' and 'TCaption'
[Fatal Error] Spis.dpr(11): Could not compile used unit 'Unit1.pas'

0

Printer.Canvas.Font.Name := ...

1 użytkowników online, w tym zalogowanych: 0, gości: 1