[ escape:: @ 14.05.2006. 22:10 ] @
| Caos!
Uspio sam napraviti lokalizaciju pomoću Translator Managera u Delphiju.
Sve radi ok kada u design modu mjenjam language.
Kada to isto pokušam u kodu:
const ENGLISH = (SUBLANG_ENGLISH_UK shl 10) or LANG_ENGLISH;
const CROATIAN = (LOCALE_SYSTEM_DEFAULT shl 10) or LANG_CROATIAN;
procedure TfrmMainForm.English1Click(Sender: TObject);
begin
try
if LoadNewResourceModule(ENGLISH) <> 0 then
ReinitializeForms;
except
end
end;
procedure TfrmMainForm.Croatian1Click(Sender: TObject);
begin
try
if LoadNewResourceModule(CROATIAN) <> 0 then
ReinitializeForms;
except
end;
end;
...promjeni korektno, ali uz promjenu veličine glavnog prozora i javi grešku "Stack Overflow!" Zašto to radi!?????Koje je rješenje?
|
[ morlic @ 16.05.2006. 06:55 ] @
Ja nikada nisam koristio ugradjenu podrsku za jezike u Delphi-u, vec sam pravio sopstveni mehanizam koji preko tnt unicode kontrola daje daleko bolji rezultat, uz mnogo bolju kontrolu i uz mogucnost da se prevod radi nad vec isporucenom aplikacijom. Ali sta je tu je...
Nesto se tu ili vrti u krug (rekurzija? kod koji si postovao nije kompletan?) ili si mozda dirao opciju "Min stack size" projekta?
Kada program "pukne" otvori u meniju View->Debug Windows->Call Stack pa vidi sta se tu desava u tom trenutku (Znaci na exception uradis break a ne continue). Naravno pre toga u Project->Options ukljucis debug dcu-s, iskljucis optimizaciju i uradis build.
Pa da vidimo.
[ escape:: @ 17.05.2006. 09:40 ] @
Problem je što error nije u exception bloku nego po izlasku iz programa.Debug kaže da ne program ne množe pronaći ili inicijalizirati neku Placment komponentu.ona je = nil.
Malo sam razočaran Delphijevim Translator Managerom iako sam bio na početku oduševljen.
Što misliš o PromjeniJezik() funkciji za manje programe u kojoj mijenjam Captione labela i naziva formi (svaka forma ima svoju)?
[ Nemanja Avramović @ 17.05.2006. 13:09 ] @
Citat:
escape:::Što misliš o PromjeniJezik() funkciji za manje programe u kojoj mijenjam Captione labela i naziva formi (svaka forma ima svoju)?
Vidi
ovo!

Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.