Виснет RxVersionInfo
Добавлено: 27.10.2017 15:56:41
Начиная с какого-то транка лазаря при запуске программы вылетает ошибка Stream read error
Ссылается на процедуру
Если внутренность процедуры закомментарить, то программа нормально стартует, но версию свою есссссссно не кажет.
Такая же бяка и с примером из папки demos.
Ссылается на процедуру
- Код: Выделить всё
procedure TRxVersionInfo.DoVersionInfo(V: TVersionResource);
var
i,j:integer;
begin
for i:=0 to V.StringFileInfo.Count-1 do
begin
for j:=0 to V.StringFileInfo[i].Count-1 do
FValues.Values[V.StringFileInfo[i].Keys[j]]:=SysToUTF8(V.StringFileInfo[i].ValuesByIndex[j]);
end;
end;
Если внутренность процедуры закомментарить, то программа нормально стартует, но версию свою есссссссно не кажет.
Такая же бяка и с примером из папки demos.