Re: Help! Delphi7

papa71

Народ, помогите разобраться, а то не успею написать прогу к диплому.
В общем в программе на DElphi при загрузке некоторого файла xml функцией LoadFromFile возникает ошибка access to violation... С чего бы это могло быть?
Прогу писал не я, и на другом компе месяца 3 назад она точно компилировалась.

psm-home

Вижу у тебя ошибку в 13 колонке на 123 строке... Без обид. Если ты не приведешь соответствующий кусок кода, вряд ли кто-то сможет тебе помочь.

shepita-1974

C удовольствием
Только сразу скажу, что я в этом мало чего понимаю.
Просто у меня в этой проге написан модуль, который считает всякие вещи, а как она сама устроена - я плохо представляю.
...

with fmMain.xmlBriefcases do
try
// Вот здесь она выдает ошибку
LoadFromFile(ExtractFilePath(ParamStr(0 + BriefcasesFName);
except
// потом здесь тоже
LoadFromXML(sBrfcsBlankXML);
SaveToFile(ExtractFilePath(ParamStr(0 + BriefcasesFName);
end;

psm-home

Кому как, а мне этого мало. Например, какого типа переменная xmlBriefcases, а LoadFromFile и LoadFromXML это те, что в help на Delphi или уже какие-то твои собственные? Из приведенного фрагмента этого не понять. Если код не военная тайна, то расшарь его, я посмотрю. Может так получится?

shepita-1974

type
TfmMain = class(TForm)
...
xmlBriefcases: TXMLDocument;
Функции вроде стандартные.
прогу я пошарил, но вряд ли будет что-то понятно (\\Computer\RiskTerminal)
Слушай, а может ты зайдешь ко мне, или я к тебе, если не сложно.
С меня пиво

psm-home

Ты бы зарегился или асю свою дал, а то в форуме писать не прикольно. И насчет зайти есть проблема - я в V живу.

psm-home

Всё обламывается, потому, что xmlBriefcases при попадании в этот блок равно nil

with fmMain.xmlBriefcases do
try
LoadFromFile(ExtractFilePath(ParamStr(0 + BriefcasesFName);


А nil оно равно может быть, если при сборке проекта вылезает такое сообщение
Field xmlBriefcases does not have a corresponding component. Remove the declaration?

А оно вылезает, по крайней мере у меня.(я пользуюсь Delphi 7) Возможно, дело в версии Delphi.

bogdarik

Кстати, да. У меня тоже вылезает. Спасибо.

psm-home

Вдогонку. Такие фокусы случаются, если на машине, где разрабатывали прогу, помимо стандартных компонент для Delphi стояли компоненты сторонних производителей. Я вот сейчас заставил твой проект собратся, так он при старте падает, говорит что мол поймал исключение что property 'Callout' does not exist. А в dfm файле, который описыват форму, это свойство-то есть. Это объект типа TChart. Так Гугол даёт сцылку на сайт производителя TeeChart Pro, где сказано, что это св-во появилось только в версии 7. А в Delphi 7 вроде входит более старый, версия 4, что-ли. То есть видимо у разработчика этой проги стоял TeeChart Pro v.7.

sergey_m

Стараемся делать сабжект по-информативнее. Например Delphi: LoadFromFile
Оставить комментарий
Имя или ник:
Комментарий: