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

В чем ошибка   Найти похожие ветки 

← →
cranium ©   (2003-01-20 02:07) [0]

D7 ругается на код работающий под D5

TreeNode:=TreeDat.Items.AddChildObject(nil,DatModOsn.IBQ_GRENUMER.FieldByName("GRUPENUM").AsString,
pointer(DatModOsn.IBQ_GRENUMER.FieldByName("ID_PARENT").AsInteger));

Пишет [Warning] UnitSys.pas(87): Unsafe type "Pointer"

И какой теперь это переписать?

---

← →
cranium ©   (2003-01-20 03:02) [1]

Ладно с этим разобрались,теперь это выглядит так:

TreeNode:=TreeDat.Items.AddChildObject(nil,DatModOsn.IBQ_GRENUMER.FieldByName("GRUPENUM").AsString,
PInteger (DatModOsn.IBQ_GRENUMER.FieldByName("ID_PARENT").AsInteger));

Но таже ругань на
IF Node.getFirstChild.Data = nil then
begin
.....
end;
Как это теперь пишется?

---

← →
Cranium ©   (2003-01-20 12:28) [2]

Что ни кто не знает?

---

← →
Skier ©   (2003-01-20 12:31) [3]

Отключи этот Warning в настройках.

---

← →
gsu ©   (2003-01-20 12:32) [4]

IF Node.getFirstChild = nil then
begin
.....
end;

---

← →
Cranium ©   (2003-01-20 12:40) [5]

Мне нужно не проверить наличие ветви, а проверить содержание .Data в ветви...

---

← →
gsu ©   (2003-01-20 12:44) [6]

У мя на D6 не пишет? а что слабо F1 на Unsafe type "Pointer" нажать, тем паче, что это warning ?

---

← →
Cranium ©   (2003-01-20 12:46) [7]

Спасибо понял, но HELP там дурацкий, особенно когда не знал английский, да еще забыл его:)))))

---

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

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



Память: 0.46 MB
Время: -0.985 c