freepascal - Fetching cyrillic characters from TMemo -


i developing application using lazarus , have characters of text user has entered in tmemo component. using following code fetch characters 1 one (here mmtext name of tmemo component):

var   i, j: integer;   line: string;   symbol: char; begin   := 0 mmtext.lines.count-1   begin     line := mmtext.lines[i];      j := 1 length(line)     begin       symbol := line[j];       showmessage(symbol); //this line debugging purposes        ... 

when latin characters entered in tmemo component, popup messages each letter appear when cycle reaches cyrillic character there nothing in popup message box.

could give me advice should achieve desired result?

for interested, answer here:

http://forum.lazarus.freepascal.org/index.php?topic=29146.msg183536#msg183536


Comments

Popular posts from this blog

Fail to load namespace Spring Security http://www.springframework.org/security/tags -

sql - MySQL query optimization using coalesce -

unity3d - Unity local avoidance in user created world -