Rigel, do you mean?
var
ch : char;
begin
ch := 'Q';
case ch of
'Q': writeln('Q');
'Z': writeln('Z');
'Я': writelh('Я'); // cyrillic character gives the error
end;
end.
If your unit is new one (created by Lazarus, rather than Delphi), then
cyrillic characters are encoded as UTF8 character, that's 2 character
strings.
You can achieve the same effect as Delphi, by changing file's encoding
to the proper Ansi encoding:
Right Click on the editor -> File Settings -> Encoding -> select the
required encoding (current Windows Ansi encoding)
(for example cp1251 for Russian charset)
Changing the encoding should fix the problem, but you might have a
side effect on other (non Windows) systems.
thanks,
dmitry
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
