QuickReport drucken von polnischen Zeichen

[handson]

Das war ein gutes Hinweis! Jetzt funktioniert es!

Delphi-Quellcode:

:
:

  QRLabel15.Font.Charset := BALTIC_CHARSET;
:
:

procedure TDruckLieferscheinNeu.QRLabel15Print(sender: TObject;
  var Value: string);
begin
  If Lk = 'PL' Then Value := 'Kwota '+Chr($F9)+Chr($E0)+'czna PLN';   // Kwota łączna PLN
end;

Vielen Dank!

Gruß,
Stephan