Compiler error in V5.11.00

hi
Ich habe das 1.mal die aktuelle Version 5.11.00 geladen.
Bekomme gleich die Fehler errror:string expected (siehe ganz unten)
Habe bei allen alten Versionen nie Probleme mit dem StringHandling gehabt.

Allgemein
An wen sollen Compiler Errors... gemeldet werden ?
Wer ist neu zuständig ?
- über das Forum ?
- oder direkt an Merlin ?

N.B bei mir scheint die Formatierung nicht zu funktionieren.
wähle ich Bold sehe ich Bold
möchte ich ein Bild einfügen kommt: [img][/img]
mache ich da was falsch?

Heinz


type TDispStr= string[16]; // Display max. 1 Zeile für 8/16 Zeichen Display
type TWaehrungName= string[5];

type TMuenzerConfig = record
Enabled : boolean; // T=Enabled kann Münzen annehmen F=nimmt keine Münzen an
UseCHF : boolean; // T=CHF used F=not used
UseEUR : boolean; // T=EUR used F=not used
DescCHF : TWaehrungName; // Währungs Desc: sFr, Euro, $,
DescEUR : TWaehrungName; // Währungs Desc: sFr, Euro, $,
PriceCHF : INT16; // Price in CHF, Cents
PriceEUR : INT16; // Price in EUR, Cents
CoinsCHF : TCoinsCHFSet; // Freigegebene Münzen für CHF: CHF_none, CHF_5, CHF_10,
CoinsEUR : TCoinsEURSet; // Freigegebene Münzen für EUR: EUR_none, EUR_5, EUR_10,
Jeton : TJetonSet; // Freigegebene Jeton: JETON_none, JETON_1, JETON_2
JetonIV : TJeton; // Jeton für IV MakeIt, falls Jeton angenommen wird
PayingTime_sec:CARD8; // max. Bezahlzeit nach 1. Einwurf einer Münze. Anschliessend
MStauError: boolean; // T=set Anlage on SS_Error beim 1. MünzenStau F=ignore it
end;

var HWPar : THWPar; // Hardware Parameters
CfgRTC : TRTCConfig; // Realtime Clock Config
CfgMuenzer : TMuenzerConfig; // Muenzer Configuration



procedure DispText1( pPos:byte; pText: TDispStr ); // Display Text on Line1 on Pos pPos
var i: byte;
begin
SetCursorPos(1,pPos);
for i := 1 to length(pText) do
DispChar( pText[i] );
endfor;
end;


{--- DispEntryPrice --- Display then Entry Price -------------------------------
¦
¦ 1 Währung 2 Währungen
¦ 12345678 12345678
¦ [ sFr ] [sFr 1.20]
¦ [ 1.50 ] [Eur 1.70]
¦
}
procedure DispEntryPrice; // Display the Entry Price(s)
begin
SetBacklightNormal;
if CfgMuenzer.UseCHF and CfgMuenzer.UseEUR then
// Anzeige CHF + EUR
DispText1(1,CfgMuenzer.DescCHF); DispText1(4,IntToStr(CfgMuenzer.PriceCHF:5:2)); // error: string expected
DispText2(1,CfgMuenzer.DescEUR); DispText2(4,IntToStr(CfgMuenzer.PriceEUR:5:2)); // error: string expected
elsif CfgMuenzer.UseCHF then
// Anzeige CHF
DispText1(3,CfgMuenzer.DescCHF); DispText2(2,IntToStr(CfgMuenzer.PriceCHF:5:2)); // error: string expected
elsif CfgMuenzer.UseEUR then
// Anzeige EUR
DispText1(3,CfgMuenzer.DescEUR); DispText2(2,IntToStr(CfgMuenzer.PriceEUR:5:2)); // error: string expected
else
DispText1(2,' ????');
DispText2(2,' -.--');
endif;
end;