home *** CD-ROM | disk | FTP | other *** search
- Tento text je nynφ ji₧ pon∞kud zastaral².
- T²kß se mΘho boje s komponentou TRichEdit, kter²
- dopadl podle p°φslovφ "moud°ejÜφ ustoupφ": ustoupil
- jsem od RichEditu proto₧e nenφ pro mn∞.
- Nenφ pro mn∞, proto₧e je idiotsk². ProΦ je
- idiotsk²? ╚t∞te dßl.
- Musel jsem text zm∞nit, aby bylo jasnΘ, ₧e problΘmy
- jsou nynφ vy°eÜeny - a to odhozenφm RichEditu
- a p°echodem k lepÜφ programßtorskΘ knihovn∞.
-
-
- O PROGRAMOV┴N═ DANIELSOFT EDITORU
- ░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░
- Nedß mi to a musφm vßm pov∞d∞t P°φb∞h O StraÜlivΘ
- V∞ci JmΘnem RichEdit:
- Pokud nevφte, co RichEdit je, pak v∞zte, ₧e je to onen
- bφl² box, do kterΘho se v editorech pod Windows
- zapisuje a ze kterΘho se Φte text. RichEdit jsem
- neprogramoval jß, je zabudovan² ve Windows a m∙j editor
- se p°i nφzko·rov≥ov²ch operacφch musel spolΘhat na
- jeho slu₧by. Nynφ ji₧ ne, ale p°esto vßm popφÜu
- problΘmy, se kter²mi jsem se p°ed nedßvnem pot²kal.
-
- Dlouhou dobu jsem byl mφsto RichEditu nucen pou₧φvat
- jeho "mladÜφho brßÜku" Memo, kterΘ se vyznaΦovalo hlavn∞
- nφzkou kapacitou. Maximßlnφ velikost souboru, kter²
- bylo Memo schopnΘ naΦφst bylo n∞co kolem 63k (skuteΦn∞
- 63k a ne on∞ch v DOSu notoricky znßm²ch 64k)
- a to jsem jeÜt∞ m∞l dojem, ₧e soubory blφ₧φcφ se tΘto
- magickΘ hranici se nenaΦtou celΘ. Samoz°ejm∞ celou dobu
- mluvφm (a taky mluvit budu) o 32bitov²ch Windows.
- V 16bitov²ch to bylo jeÜt∞ horÜφ (32k).
- RichEdit _takΘ_ v∞tÜφ soubory odmφtal, avÜak tvrdil o
- sob∞, ₧e je v po°ßdku naΦφtß. Soubory od 100k v²Üe
- byly naΦteny v jakΘmsi podivnΘm "read only" m≤du, kdy
- do nich Ülo zapisovat pouze kdy₧ jsem n∞co smazal
- p°es schrßnku (???). Znovu opakuji, ₧e celou dobu jde
- o v∞ci do Windows vestav∞nΘ, kterΘ jsem nemohl
- sßm nijak p°eprogramovat, jen se spolehnout na jejich
- "skv∞lΘ" slu₧by.
- Nakonec jsem z hlubin Internetu vytßhl,
- ₧e kdy₧ snφ₧φm (??) maximßlnφ velikost akceptovatelnΘho
- souboru RichEditem tak, aby byl nejvyÜÜφ byte nulov²,
- divnΘ chovßnφ p°estane. P°itom tv∙rce tΘto rady napsal,
- ₧e sßm nevφ proΦ to tak je. Prost∞ Φernß magie
- nejmenovanΘ monopolnφ softwarovΘ firmy.
- Kdy₧ jsem tedy mohl RichEdit koneΦn∞ mφsto Mema pou₧φt,
- radostn∞ jsem je zam∞nil a zdßlo se, ₧e kapacita se
- zv²Üφ a vÜechno bude "chodit" jako d°φve. To byla
- verze 4.1 editoru. Bohu₧el n∞kterΘ v∞ci, kterΘ
- se u Mema programovaly jednφm zp∙sobem se u RichEditu
- (ve stejnΘm OS od stejnΘ firmy) programovaly nynφ
- ·pln∞ jinak. A to jeÜt∞ nemluvφm o tom, ₧e pomocnß
- skrytß Mema, kterß pomßhala tomu hlavnφmu zpracovat
- text, jsem musel zm∞nit na pomocnΘ RichEdity, proto₧e
- milostpßn RichEdit se se sv²mi chud²mi p°φbuzn²mi
- nehodlal bavit. Dφky t∞mto problΘm∙m byla verze 4.1
- chybovß a musel jsem jφ urychlen∞ opravit na 4.2 a
- upgradovat to na webu.
- N∞kte°φ programßto°i, kte°φ Φtou tento text by mohli
- namφtnout "a proΦ jste musel n∞co u RichEditu Φi
- Mema *programovat*, kdy₧ on poskytuje nφzko·rov≥ovΘ
- slu₧by, jak jste °φkal. ProΦ jste tyto slu₧by pouze
- *nevolal* ?". Hmmm ... tito programßto°i z°ejm∞ mßlo
- programovali ve Windows (to jim nevyt²kßm, pouze to
- konstatuji).
- N∞kterΘ -podle m∞ bazßlnφ- slu₧by se musely po
- Memu/RichEditu ₧ßdat vskutku krkolom∞. Posu∩te sami
- - pro zjiÜt∞nφ, na kterΘm °ßdku je kurzor, se
- musφ provΘst n∞co takto neintuitivnφho a
- p°ekombinovanΘho:
-
- function GetTextPosLine(var rich:TRichEdit):longint;
- var c:TCharRange;{co je to proboha za datov² typ???}
- begin
- rich.Perform(EM_GETSEL,0,integer(addr(c)));
- Result:=rich.Perform(EM_EXLINEFROMCHAR, 0 , c.CpMin);
- end;
-
- u Mema se to d∞lalo ·pln∞ jinak, taktΘ₧ krkolom∞.
- Bohu₧el si to u₧ nepamatuju. Pokud jsem ten "memov²"
- postup pou₧il na RichEdit, VRACELO TO VÄDY NULU, tak₧e
- poka₧dΘ kdy₧ jsem se zeptal na kterΘm jsem °ßdku
- odpov∞d∞lo to ₧e na nultΘm - tj. prvnφm! Tφm vznikaly
- (zpoΦßtku t∞₧ko odhalitelnΘ) chyby.
-
- A nastavenφ °ßdku jsem si taky musel napsat sßm:
-
- procedure SetTextPosLine(rich:TRichEdit;pozice:longint);
- var pocet,i:integer;
- begin
- pocet:=0;
- for i:=0 to pozice-1 do
- inc(pocet,length(rich.lines[i])+2);
- {to +2 jsou z°ejm∞ znaky CR LF, ale kdo vφ...}
- rich.selStart:=pocet;
- rich.selLength:=0;
- end;
-
- VÜimn∞te si, ₧e ani pro zm∞nu pozice poΦφtanΘ ve znacφch
- neexistuje funkce a musφ se celkem hloup∞ "vybrat"
- nulovΘ mno₧stvφ znaku do Selection (pomocφ SelStart
- a SelEnd).
- TakΘ jsou tu nep°φjemnosti, jako ₧e nap°φklad RichEdit
- p°epnul poka₧dΘ p°i svΘm spuÜt∞nφ klßvesnici na "Cz" a
- p°epnul ji tak takΘ poka₧dΘ, co u₧ jednou "vejdu" do
- ji₧ napsanΘho textu. Jako programßtor vÜak Φasto
- pot°ebuju hranatΘ zßvorky, m°φ₧ku, zavinßΦ, ampersand
- apod., tak₧e bych nutn∞ pot°eboval mφt nastavenφ
- *anglickΘ*, jakΘ mßm jinak v cel²ch Window$, ale
- RichEdit to prost∞ nebral. ╪eÜenφm bylo oznaΦit cel²
- dokument a p°epnout na "En".
-
- Nynφ se mi ji₧ KONE╚N╠ povedlo toto p°ekonat, avÜak
- jeÜt∞ jsem se musel pot²kat s tφm, ₧e pokud jsem
- klßvesnici p°epnul na En, najednou p°estaly "chodit"
- ΦeskΘ znaky, co₧ se mi nakonec naÜt∞stφ poda°ilo
- obejφt. Znovu je vÜak p°ed p°epnutφm nutno oznaΦit
- cel² text, dφky Φemu₧ nem∙₧e u₧ivatel p°epnout normßln∞
- alt+shift, ale musφ pou₧φt polo₧ku z menu ╚eÜtina, kterß
- oznaΦφ text, p°epne a zase ho odznaΦφ. Jinak by toti₧
- neoznaΦenΘ Φßsti textu, pokud by k nim Φlov∞k doÜel
- kurzorem, znovu "samy p°epnuly" do p∙vodnφ klßvesnice,
- b∙h vφ proΦ. Uff.
-
- A to jeÜt∞ nemluvφm o tom, ₧e n∞kolikrßt text p°i
- naΦtenφ prost∞
- zmizel a musely se zm∞nit rozm∞ry RichEditu aby se
- zase objevil... Stane se to t°eba p°i posouvßnφ textu
- pomocφ Ctrl+Alt+ -> hodn∞ doleva, nevφm proΦ.
-
- Nynφ, kdy₧ mφsto RichEditu pou₧φvßm SynEdit
- (kter² nenφ od M$), programuje se vÜe daleko
- lΘpe. Dokonce mßm pocit, ₧e je editor i rychlejÜφ,
- ale to m∙₧e b²t jen m∙j subjektivnφ dojem.
- Posu∩te sami skok mezi verzφ 6.9 a 8.0 .
-
-