Текущий архив: 2003.04.28;
Скачать: CL | DM;

Вниз

Почему ошибка обращения к WebModule?   Найти похожие ветки 

← →
temp   (2003-04-15 14:19) [0]

Мастера, помогите. Создал стандартными средствами WebApplication
Положил туда TSqlConnection+TSqlQuery. Обрабатываю Actions.Все работаkj. но вот я захотел создать функцию, чтобы уменьшить код. Просто взял и перенес часть кода из обработки Action(форматирование таблицы) в функцию. При компиляции выскакивает ошибка Access Violation.
В чем может быть трабл?
функция такая:

function TWebm.GenerateHtmlLink(id_parent : integer): string;
var Links : string;
begin
Links := "";

with webm.qTree do //тут ошибка
begin
Close;
ParamByName("pParent").AsInteger := Id_parent;
Open;
First;
while not Eof do
begin
Links := Links + webm.html_table.Content;
Next;
end;//while
end;//with

Result := Links;
end;


---

← →
temp   (2003-04-15 14:31) [1]

Мастера, помогите, гибну...

---

← →
Skier ©   (2003-04-15 14:32) [2]

Не поможет : with Self.qTree do ?

---

← →
temp   (2003-04-15 14:39) [3]

> Skier © (15.04.03 14:32)

Сенкс!!! помогло, а че оно? что-то не догоню?

---

← →
Skier ©   (2003-04-15 14:42) [4]

А ты поставь breakpoint на
строке - with webm.qTree do //тут ошибка
и посмотри чему у тебя равен webm, мне думается, что
он либо равен nil, либо там сидит чей-то другой адрес (а вот чей ? я угадать не смогу, это нужно самому ВНИМАТЕЛЬНО смотреть...)

---

Страницы: 1 вся ветка

Текущий архив: 2003.04.28;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.015 c