SASGIS - SAS.Планета | |||||
| View Issue Details | |||||
| 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. | ||||
| Relationships | |||||
| Attached Files | |||||
| 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 | ||
| Notes | |||||
|
|
|||||
|
|
||||
|
|
|||||
|
|
||||