Diskuze: Diakritika
Tvůrce
Zobrazeno 15 zpráv z 15.
Stáhni si chytřejší textový editor (např. Noteapad++) a nastav si tam kódování. Nevím, jestli Delphi už konečně umí UTFko, co jsem v nich dělal já, tak bylo třeba ANSI.
Lazarus UTF umi.
Bez kodu ktery mas a zdrojoveho souboru lze tezko rict kde mas problem.
Na okraj:
Delphi plne podporuje Unicode od verze 2009 (srpen 2008) a v posledních
verzích umoznuje take primy vyvoj pro mobilni platformy (Android, IOS), 64bit
aplikace,...
(http://delphi.cz/…-Delphi.aspx)
cast kde citam zo suboru vyzera takto
var
pismena: array of string;
f: TextFile;
i,n : integer;
...
...
...
if radiobutton1.Checked then
n:=8
else if radiobutton2.checked then
n:=10
else
n:=13;
AssignFile(f,'databaza/'+inttostr(uroven)+'.txt');
reset(f);
for i:=1 to n do begin
SetLength(pismena,i);
readln(f,pismena[i-1]);
end;a ak hned obratom dam vykreslit to pole pismena tak jednoducho vynecha znaky s diakritiou
Skusal som ten notepad++, nastavil to na utf8 a ziadne zmena
no ono problem je v tom ze ja to pomocu TextOut vykreslujem do image
... subor : http://uloz.to/xC7av64M/1-txt; heslo: devbook
môžeš mi prosím ťa poslať kód toho? nastaveniami som nič nedocielil, verziu lazarusa mám rovnakú akurát na win7
Priklad si muzes stahnout: http://uloz.to/…load/ea7yzqP
heslo: textout
Jinak problem ti zrejme dela to ze pracujes s UTF8 a ten ma na znak
2byte.
Pristup ke znaku pres jeho index (pozici) v retezci ti vrati ale jen jeden byte.
Znak proto z retezce dostanes korektne pomoci prikazu UTF8Copy z unity
LazUTF8.
Zobrazeno 15 zpráv z 15.