---

Nedenstående eksempel er fra Delphi hjælp. Er der en nem måde at skifte
font på (når jeg vil bruge nedenstående metode).

Carsten


This code prints a line of text on the printer when the user clicks the
button on the form:

procedure TForm1.Button1Click(Sender: TObject);

var
MyFile: TextFile;
begin
AssignPrn(MyFile);
Rewrite(MyFile);
Writeln(MyFile, 'Print this text');
System.CloseFile(MyFile);
end;

---

Hvis du søger på "assignprn font" dukker f.eks. følgende op:

http://www.daniweb.com/code/snippet114.html

"Carsten" <carsten_no-mail_@beas.dk> wrote in message
news:47ea2bfd$0$2085$edfadb0f@dtext02.news.tele.dk...
> Nedenstående eksempel er fra Delphi hjælp. Er der en nem måde at skifte
> font på (når jeg vil bruge nedenstående metode).
>
> Carsten
>
>
> This code prints a line of text on the printer when the user clicks the
> button on the form:
>
> procedure TForm1.Button1Click(Sender: TObject);
>
> var
> MyFile: TextFile;
> begin
> AssignPrn(MyFile);
> Rewrite(MyFile);
> Writeln(MyFile, 'Print this text');
> System.CloseFile(MyFile);
> end;

---

Uffe Kousgaard wrote:
> Hvis du søger på "assignprn font" dukker f.eks. følgende op:
Tak for det.

Carsten