Mit Brush Color eine Zeile einfärben,danach wieder normal

[egon.kaschuba]

Hallo,

Problem mit Brush.Ich habe es einfach Vergessen.
Ich möchte eine Zeile mit Brush.Color einfärben.
Danach sollte alle wieder normal weiter gehen.

Wer weiss weiter ?

Gruß
- Egon

Delphi-Quellcode:

 
     Canvas.Font.Name:='arial';    // Schriftgröße für Kundeninformation ein
     Canvas.Font.Size:=10;
     Canvas.Font.Color:=clNavy;
     Canvas.Brush.Color:=clRed;
     Canvas. font.Style:=[fsBold,fsItalic];

     Printer.Canvas.TextOut(3050,950,'Kundeninformation!');

     Canvas.Font.Name:='arial';         // Schriftgröße für Kundeninformation aus
     Canvas.Font.Size:=10;
     Canvas. font.Style:=[];
     Canvas.Font.Color:=clBlack;

// Hier Brush.Color Neutralisieren.

.
.
.