Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 02.11.2017, 11:11   #21
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 23,436
Репутация: 5187
По умолчанию

Цитата:
Сообщение от Dryid466 Посмотреть сообщение
{ Private declarations }
procedure TreeViewAddChild(rod, doch: String; db_node_id : integer);
здесь вы имеете в виду? прописал теперь.
недостаточно. Это декларация. Теперь нужно исправить ещё там, где у Вас написано реализация (в секции implementation ) - там, где
Цитата:
Код:

procedure TFormX.TreeViewAddChild(rod, doch: String);

там тоже нужно исправить.


Цитата:
Сообщение от Dryid466 Посмотреть сообщение
Далее
2) в теле процедуры TreeViewAddChild заменяем
TreeView1.Items.AddChild на
TreeView1.Items.AddChildObject(.... , Pointer(db_node_id) );
точно!


Цитата:
Сообщение от Dryid466 Посмотреть сообщение
Я так понимаю
Цитата:
TreeView1.Items.AddChildObject(nil, Q1.FieldByName('R_Name').AsString, Pointer(Q1.FieldByName('R_Num').AsI nteger));
это нужно заменить на
Цитата:
TreeView1.Items.AddChildObject(nil, Q1.FieldByName('R_Name').AsString, Pointer(Q1.FieldByName('R_Num').AsI nteger), Pointer(db_node_id));
Нет. неправильно. Зачем AddChildObject менять на AddChildObject (причём на неверный вариант - с ошибочным числом параметров)?!
Serge_Bliznykov на форуме   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
DbGrid + TreeView + CheckBox tarakan1983 БД в Delphi 13 03.12.2015 23:45
Отображение данных в DBGrid через TreeView nagi12-02 C++ Builder 0 17.01.2014 11:20
treeview с dbgrid Romium БД в Delphi 5 13.04.2013 08:10
DbGrid и Treeview c DbRichEdit ch1pah1 БД в Delphi 1 13.01.2012 05:47
Выборка в DBGrid по выбору узла в TreeView WhiteDemon БД в Delphi 13 17.02.2011 20:29


17:34.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru