2 Формы

← →
Reticent (2002-05-06 13:33) [0]

Доброе время суток!

есть 2 Формы. В одной, у примеру, Listbox. А в другой мне надо опрашивать данные из Listbox. Как правильно это сделать. Ну uses я состряпал. И потом пишу, у примеру, Form1.Listbox... а комп мне, во время выполнения проги дулю показывает и говорит, что не доступны данные из Listbox. Вроде еще надо Форму как то объявить, а как и где? Подскадите начинающему чайнику.

Всего хорошего!

← →
Song (2002-05-06 13:41) [1]

В Form2 в секции implementation указываете Uses Form1 После этого обращаетесь к клмпоненту Form1.ListBox1....

← →
Reticent (2002-05-06 13:49) [2]

все равно говорит, что form1.listbox.items.count? - "недоступное значение".

← →
AlexDbases (2002-05-06 14:13) [3]

Надо в implementation написать модуль (Uses unit1{form1};) и из второй формы обратиться к примеру:

procedure TForm2.Button1Click(Sender: TObject);
begin
Label1.Caption:=IntToStr(Form1.ListBox1.Items.Count);
end;

← →
Lord Warlock (2002-05-06 14:16) [4]

Советую привести код полнее. вполне возможна тривиальная ошибка

2 Формы Найти похожие ветки