Здравствуйте уважаемые.
Подскажите пожалуйста в чем может быть проблема.
По какой то причине компилятор стал возражать против использования приведения к типу PChar.
Например ругается на строку, IntToStr(CountZeroBits( PChar(Edit1.Text[i]) )), вот такими словами
" UMain.pas(55,47) Error: Illegal type conversion: "Char" to "^Char" "
function TForm1.CountZeroBits(ch: PAnsiChar) : integer;
var i : integer;
begin
result := 0;
for i := 0 to 7 do
if ( byte(ch) and (1 shl i) ) = 0 then inc(result);
end;
Точно такой же код прекрасно работает в Delphi 7.
У меня сейчас стоит Lazarus 0.9.31 fpc 2.4.3
Но наверняка не в этом суть, потому что на 0.9.29 такая же беда.
