Anonymous | Login | Signup for a new account | 21-11-24 13:14 UTC |
All Projects | SAS.Планета | Домен, сайт, форум, багтрекер | Доработка карты (ZMP) | Переводы и локализации | Прочее |
My View | View Issues | Change Log | Roadmap | Search |
View Issue Details [ Jump to Notes ] | [ Issue History ] [ Print ] | ||||||||
ID | Project | Category | View Status | Date Submitted | Last Update | ||||
0002055 | SAS.Планета | [All Projects] Баг | public | 31-07-2013 22:38 | 01-08-2013 17:12 | ||||
Reporter | vasketsov | ||||||||
Assigned To | vdemidov | ||||||||
Priority | high | Severity | major | Reproducibility | always | ||||
Status | resolved | Resolution | fixed | ||||||
Platform | Windows | OS | Vista | OS Version | Ultimate | ||||
Product Version | .Nightly | ||||||||
Target Version | 131111 | Fixed in Version | 131111 | ||||||
Summary | 0002055: Ошибка в ALfcnString для D2007 (F2084 Internal Error: URW5517) | ||||||||
Description | D2007 крайне плохо переносит локальные переменные, объявленные процедурными типами с параметрами, имеющими значения по умолчанию. В сабжевом файле трижды есть: PosExFunct: Function(const SubStr, S: AnsiString; Offset: Integer = 1): Integer; Вообще можно поискать по ': procedure' и ': function' и убедиться, что больше нет таких мест. Если убрать отовсюду ' = 1' - ошибка пропадает. Если вернуть - возникает снова. Воспроизводимость - 100%. | ||||||||
Steps To Reproduce | Для воспроизведения ошибки или соответственно чтобы убедиться в лечении, необходимо (как налетел я, наверное можно и по-другому): а) открыть проект; б) открыть procedure TfrmMarksExplorer.FormShow; в) собрать (build) проект; г) добавить в конец TfrmMarksExplorer.FormShow новую пустую строку, встать на неё, набрать ts и нажать Ctrl+Space. Внизу вылезет: [Pascal Fatal Error] frm_MarksExplorer.pas(59): F2084 Internal Error: URW5517 После этого убираем ts, вычищаем ' = 1' у всех трёх PosExFunct, пересобираем (build) проект (при этом ошибки из-за отсутствия значения не будет), повторяем шаг г) и убеждаемся что всё отлично работает, включая Ctrl+Space. | ||||||||
Additional Information | http://www.delphifeeds.com/go/s/58726 | ||||||||
Tags | No tags attached. | ||||||||
Attached Files | |||||||||
Notes | |
(0012266) vasketsov (manager) 31-07-2013 22:48 |
Набор изменений: 147 (34f870c317f5) Minor update to avoid Range Check error |
(0012267) vdemidov (manager) 01-08-2013 10:34 |
Поправим. Долго ли умеючи :) |
Issue History | |||
Date Modified | Username | Field | Change |
31-07-2013 22:38 | vasketsov | New Issue | |
31-07-2013 22:39 | vasketsov | Assigned To | => vdemidov |
31-07-2013 22:39 | vasketsov | Status | new => assigned |
31-07-2013 22:48 | vasketsov | Note Added: 0012266 | |
01-08-2013 10:33 | vdemidov | Product Version | => .Nightly |
01-08-2013 10:33 | vdemidov | Target Version | => 131111 |
01-08-2013 10:34 | vdemidov | Note Added: 0012267 | |
01-08-2013 17:12 | vdemidov | Status | assigned => resolved |
01-08-2013 17:12 | vdemidov | Fixed in Version | => 131111 |
01-08-2013 17:12 | vdemidov | Resolution | open => fixed |
My View | View Issues | Change Log | Roadmap | Search |
Copyright © 2007 - 2024 SAS.Planet Team |