Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 01.02.2010, 16:09   #1
zii
 
Регистрация: 01.02.2010
Сообщений: 4
По умолчанию Вопрос по TreeView

Всем привет.
Пишу программу.
Суть: Есть главная форма с элементом дерева(TreeView), 2 кнопки. 1ая кнопка вызывает 2ую форму ввода значений дерева (после ввода данных нажимаем на ОК и переходим к 1ой форме), 2ая кнопка удаляет выбранный узел дерева.
Вопрос: Как передать 2ой форме доступ к TreeView и заполнить дерево из Unit2(модуль 2ой формы)???
zii вне форума
Старый 01.02.2010, 16:16   #2
Sensizu
Otsukitakitte
Форумчанин
 
Аватар для Sensizu
 
Регистрация: 01.10.2009
Сообщений: 126
По умолчанию

ну.. так и объявляешь. к примеру, первая форма Form1, вторая - Form2.
В Форм2 на Button1.Click пишем:
Код:
Form1.TreeView.Items... //ну и так далее
нажимаешь на Cltr+F9 и делфи автоматически выдаст табличку, добавить ли юнит Форм1 в юнит Форм2. И всё. В этом была проблема?
Помог - ставь плюс.
$("question").onAnswer(function() { $(this).getItWright(true); });
Sensizu вне форума
Старый 01.02.2010, 16:28   #3
zii
 
Регистрация: 01.02.2010
Сообщений: 4
По умолчанию

Извините конечно за глупые вопросы, но делфи ругается, когда я в Unit2 в графу uses вставляю Unit1, так как в Unit1 уже записан Unit2 в графе uses.
А так Unit2 не определяет Form1 и ругается на нее.
zii вне форума
Старый 01.02.2010, 16:33   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
но делфи ругается
Попробуй вставлять его ниже
Код:
Unit Unit1
 uses Чето там
...
Interface
 uses Unit2
Может и получится.
I'm learning to live...
Stilet вне форума
Старый 01.02.2010, 16:52   #5
zii
 
Регистрация: 01.02.2010
Сообщений: 4
По умолчанию


Опять же Делфи(2009) ругается на то что uses стоит перед interface.
В общем так:
PHP код:
unit Unit1;

interface

uses
  Unit2
,.......
var
  
MainFormTMainForm;
  
TDIRFormTDIR;
implementation

{$R *.dfm}


procedure TMainForm.Button1Click(SenderTObject);

begin
  TDIRForm 
:= TDIR.Create(Application);
  
TDIRForm.ShowModal;
end
и второй юнит
PHP код:
unit Unit2;

interface

uses (юниты по умолчанию)
implementation

procedure TDIR
.OkClick(SenderTObject);
begin
  TMainForm
.TreeView1.Items.Add(nil,'1111'); - а вот здесь Делфи говорит что Undeclared identifier'TMainForm' и т.д.
end;

end
как быть? Помогите плз
zii вне форума
Старый 01.02.2010, 16:54   #6
Sensizu
Otsukitakitte
Форумчанин
 
Аватар для Sensizu
 
Регистрация: 01.10.2009
Сообщений: 126
По умолчанию

попробуй после implementation поставить uses название_файла_первой_формы. должно помочь.
Помог - ставь плюс.
$("question").onAnswer(function() { $(this).getItWright(true); });
Sensizu вне форума
Старый 01.02.2010, 17:01   #7
zii
 
Регистрация: 01.02.2010
Сообщений: 4
По умолчанию

кажется решил часть проблемы с помощью with..do
zii вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TreeView ddr111 Общие вопросы Delphi 7 31.03.2009 00:35
TreeView Help KWN, lnc Общие вопросы Delphi 12 03.03.2009 10:34
вопрос по TreeView user_jasser Win Api 2 24.11.2008 20:25
вопрос по TreeView Cyn4uk Общие вопросы Delphi 10 23.12.2007 21:34