легкая проблемка

[Domanoff]

пытаюсь присвоить значение компонента открываемой формы значению такого же компонента формы из которой открывается ЭТА ФОРМА, не ПОЛУЧаЕТСЯ

    procedure TForm4.FormCreate(Sender: TObject);
begin
        form4.DateTimePicker1.Date:=form3.DateTimePicker1.Date;
end;

подскажите как нужно....

[SERG1980]

procedure TForm4.FormShow(Sender: TObject);
begin
        form4.DateTimePicker1.Date:=form3.DateTimePicker1.Date;
end;

[Domanoff]

все равно не выводит то что в предыдущей , может там свойство какое то другое?

[Sanprof]

в Unit4 должен стоять оператор Uses Unit3; после implementation, это если вы юниты не переименовывали, если переименовывали, то смысл остается тем же. На счет вашего примера:

procedure TForm4.FormCreate(Sender: TObject);
begin
  form4.DateTimePicker1.Date:=form3.DateTimePicker1.Date;
end;

вы пытаетесь получить данные при создании форм, а это не правильно в ряде причин. SERG1980, вам правильно подсказал, так как оператор OnShow для формы вызывается в момент когда уже все формы созданы и загружены в память. Соответственно в этой процедуре можно работать уже со всеми параметрами всех форм, если конечно они связаны.

[Domanoff]

Сообщение от Sanprof

в Unit4 должен стоять оператор Uses Unit3; после implementation, это если вы юниты не переименовывали, если переименовывали, то смысл остается тем же. На счет вашего примера:

procedure TForm4.FormCreate(Sender: TObject);
begin
  form4.DateTimePicker1.Date:=form3.DateTimePicker1.Date;
end;

вы пытаетесь получить данные при создании форм, а это не правильно в ряде причин. SERG1980, вам правильно подсказал, так как оператор OnShow для формы вызывается в момент когда уже все формы созданы и загружены в память. Соответственно в этой процедуре можно работать уже со всеми параметрами всех форм, если конечно они связаны.

да есть все uses иначе ошибку выдавало что не найдет form3. но и так как подсказал SERG1980 тож не выходит почему то...

[Sanprof]

у меня все работает: бросаю на обе формы DateTimePicker-ы во второй ставлю произвольную дату в первый сегодняшнюю, связываю формы не вручную, а командой File | Use Unit. В операторе OnShow прописываю form2.DateTimePicker1.Date:=form1.D ateTimePicker1.Date; все работает.

[SERG1980]

Тогда выкладывайте ваш проект, посмотрим поправим

[Domanoff]

Сообщение от SERG1980

Тогда выкладывайте ваш проект, посмотрим поправим

вот оно увидете на формах, за одно можете посмотреть почему не выводится то что в procedure TForm1.FormCreate(Sender: TObject);, просто похожая проблемка по моему(через кнопку все работает)

[SERG1980]

Ну понятно. Саму строчку присвоения даты в самом коде я нашёл, а вот в инспекторе объектов формы я этого события не наблюдаю. просто дважды кликните по событию OnCreate формы 4 а лучше скопируйте ту же строку с событие OnShow. Скомпилить ваш проект не могу ругается на компоненты InterBase