Скачать: CL | DM;

Иерархические структуры   Найти похожие ветки 

← →
Сергей М. ©   (2007-04-11 08:33) [40]

> но тогда ссылка должна мочь быть null (для самого верхнего
> уровня, над которым уже ничего нет)


Кто сказал, что "должна" ?
Что мешает сделать эту ссылку, например, равной первичному ключу этой же записи ?

---

← →
Jan1   (2007-04-11 10:07) [41]

> Мои мысли такие: собрать все необходимые для удаления ID
> и одним запросом их удалить.

лишнее. да и на MS SQL не сработает :)

>  Q.Close;
>  Q.SQL.Clear;
>  Q.SQL.Add("SELECT * FROM Dep WHERE ParentID = " + IntToStr(ID));
>
>  Q.Open;
>  Result := Q.RecordCount > 0;

1. Close, Clear убрать.
2. Используй параметры.
3. Проверку на пустой датасет лучше делать через IsEmpty.

>    while not Q.Eof do begin
>      Make_Del_List(Q.FieldByName("ID").AsInteger);


1. Что такое Q?
2. Где next?

---

← →
Jan1   (2007-04-11 10:08) [42]

> 1. Close

нет это не убирай.

---

← →
azamatufa ©   (2007-04-11 11:56) [43]

Q - это ADOQuery. При помощи него делаю запросы (в частности, определяю есть ли дети)

---

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

Скачать: CL | DM;



Память: 0.52 MB
Время: 0.014 c