[Lazarus] Cyrillic symbol check

Kamen Kamen kamenlist at abv.bg
Wed Nov 6 13:58:05 CET 2013


 
Hello. 
In Listviev I have Cyrillic characters. How can I use it to check whether it is this that I want or else? For example I do: 
var
    ListItem: TListItem;
C: TUTF8Char; 
begin
C := Trim(ListItem.SubItems[6]);    // -->

'М'

if C = 'М' 
 

      then rbMan.Checked:=true

     
 else if Trim(ListItem.SubItems[6]) = 'Ж'

       
 
 then rbWoman.Checked:=true

       
 
else rbDrugo.Checked:=true;
end;
 
Regards,
Kamen
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20131106/0fb4ff59/attachment-0002.html>


More information about the Lazarus mailing list