<html>
  <head>

    <meta http-equiv="content-type" content="text/html; charset=ISO-8859-15">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    Hi,<br>
    <br>
    i cannot compile actual lazarus trunk version:<br>
    <br>
    Stops here:<br>
    <br>
    procedure TLazCanvas.AssignFontData(AFont: TFPCustomFont);<br>
    begin<br>
      if AFont = nil then Exit;<br>
      Font.FPColor := AFont.FPColor;<br>
      Font.Name := AFont.Name;<br>
      Font.Size := AFont.Size;<br>
      Font.Bold := AFont.Bold;<br>
      Font.Italic := AFont.Italic;<br>
      Font.Underline := AFont.Underline;<br>
    <font color="#ff0000">  {$IF (FPC_FULLVERSION=20601) or
      (FPC_FULLVERSION>=20701)} //changed in 2.6.1 and 2.7; remove
      when FPC 2.6.2+ only is supported<br>
        Font.StrikeThrough := AFont.StrikeThrough;<br>
    </font>  {$ELSE}<br>
      Font.StrikeTrough := AFont.StrikeTrough; //old version with typo<br>
      {$ENDIF}<br>
    end;<br>
    <br>
    error message is:<br>
    <br>
    C:\lazarus\lcl\lazcanvas.pas(765,8) Error: identifier idents no
    member "StrikeThrough"<br>
    <br>
    <br>
    Lazarus:<br>
    <br>
    Lazarus 1.1 r39792 FPC 2.6.1 i386-win32-win32/win64<br>
    <br>
  </body>
</html>