Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.27;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Основная";
Текущий архив: 2003.01.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
14-87130
Lamak
2003-01-10 01:50
2003.01.27
Сжатие exe


14-87140
VictorT
2003-01-10 12:34
2003.01.27
Как выразить формулой?


14-87108
kronprince
2003-01-09 17:21
2003.01.27
Извините за offtopic :)О разнице Microsoft VC vs Borland CB


1-86803
harismatik
2003-01-18 15:11
2003.01.27
Мемо только для просмотра


4-87188
Youri
2002-12-11 11:16
2003.01.27
Неужели никто не знает?!!!Telephony API header translation!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский