Dobrý den, právě jsem chtěl převést text bez diakritiky na text s diakritikou a vzpomněl jsem si na funkci, která mi dřív fungovala, leč v této verzi (už několik let poté) nějak ne. Respektive ona funguje jen tak, že správně převede jen slova, která se ve slovníku vyskytují jen s čárkou, ale jakmile existuje víc možností, že by slovo mohlo být s háčky nebo jen s čárkou, nepřevede se, to samé pokud by se vyskytlo jen s háčkem. Mám slovník poslední 3.2.5. Jak jsem zjistil, slovník je stále v kódování ANSI, tak jsem si řekl, co se stane, když ho převedu do UTF-8. No, převedl jsem, program se spustil, ale jakmile jsem funkci použil, po několika vteřinách program zhavaroval (výpis níže): Exception description:
Access violation at address 0040C92A in module 'PSPad.exe'. Read of address 000DC1C5. Exception class: EAccessViolation Exception address: 0040C92A -------------------------------------------------------------------------------- -------------------- Stack list, generated 01/10/2020 21:36:02 [0040C92A] System.@WStrFromUStr + $6 [00690068] Vcl.Forms.TFormStyleHook.WMShowWindow + $100 [0090C255] uParams.TPSPadParam.SpellOpenDictionary (Line 2504, "uParams.pas" + 40) + $22 [00A85158] uMain.TfPSPad.aAddDiacriticExecute (Line 7226, "uMain.pas" + 1) + $21 [00A92890] uMain.TfPSPad.ActionListExecute (Line 12093, "uMain.pas" + 11) + $7 [005694EC] System.Actions.TContainedActionList.ExecuteAction + $70 [00409CDE] System.@CallDynaInst + $6 [0056C4E5] Vcl.ActnList.TCustomAction.Execute + $69 [004ED08B] System.Classes.TBasicActionLink.Execute + $13 [0069B377] Vcl.Menus.TMenuItem.Click + $93 [0069CB47] Vcl.Menus.TMenu.DispatchCommand + $13 [0067BBD4] Vcl.Forms.TCustomForm.WMCommand + $38 [006B0172] Vcl.Controls.TControl.WndProc + $2BE [0054E5BF] Vcl.Graphics.FreeMemoryContexts + $9B [004EDF7C] System.Classes.StdWndProc + $14 [006B505A] Vcl.Controls.TWinControl.WndProc + $686 [0067859D] Vcl.Forms.TCustomForm.WndProc + $691 [006B45DC] Vcl.Controls.TWinControl.MainWndProc + $2C [004EDF7C] System.Classes.StdWndProc + $14 [006822E7] Vcl.Forms.TApplication.ProcessMessage + $F3 [0068232A] Vcl.Forms.TApplication.HandleMessage + $A [0068265D] Vcl.Forms.TApplication.Run + $C9 [00AC02F5] PSPad.PSPad (Line 119, "" + 55) + $7 -------------------------------------------------------------------------------- -------------------- Program : C:\Program Files (x86)\PSPad editor\PSPad.exe 5.0.4 (521) System : Windows 10 Professional x64, Version: 10.0, Build: 4A62, Processor: Intel, Intel(R) Core(TM) i7-4600U CPU @ 2.10GHz, 2690 MHz MMX Display : 1920x1080 pixels, 32 bpp PPI: 96 Skin : Windows -------------------------------------------------------------------------------- -------------------- Active Controls Hierarchy: TPSSynEdit "FEditor1" TfChildEdit "fEdit_G17609843" -------------------------------------------------------------------------------- -------------------- -- Peer <https://forum.pspad.com/read.php?1,74253,74253> PSPad freeware editor https://www.pspad.com
