Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 12.03.2013, 20:36
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию проблема после создания формы

Добрый вечер. Форму создаю так:
Код:
procedure Tf_Main.sbt_SchetClick(Sender: TObject);
var
  foo: Tf_Schet;
begin
  foo := Tf_Schet.Create(Application);
  Try
    foo.ShowModal;
  Finally
    foo.Free;
  end;
end;
На форме есть кнопка, которая таким же образом создает и вызывает форму с именем f_xxx. Когда я с формы f_xxx пытаюсь записать в f_Schet какую либо информацию, то ничего не происходит. НО если формы создать при старте программы, то все работает. Что я не так делаю, что нужно поправить? Помогите пожалуйста.
Ответить с цитированием
  #2  
Старый 12.03.2013, 20:43
Аватар для BBBCat
BBBCat BBBCat вне форума
Новичок
 
Регистрация: 10.03.2013
Сообщения: 73
Репутация: 10
По умолчанию

А наверняка потому что foo - локальная переменная. Хотя с уверенностью не скажу. Код в студию!
Ответить с цитированием
  #3  
Старый 12.03.2013, 20:47
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

какой именно? создания формы или записи данных в созданную форму?
Ответить с цитированием
  #4  
Старый 12.03.2013, 21:22
Аватар для BBBCat
BBBCat BBBCat вне форума
Новичок
 
Регистрация: 10.03.2013
Сообщения: 73
Репутация: 10
По умолчанию

Как f_xxx пытается записать в f_Schet. И ещё - обе эти формы просто наследники TForm с приколоченными к ним компонентеми? Во ещё, спрошу на всякий случай: не в курсе как SetString работает?

Последний раз редактировалось BBBCat, 12.03.2013 в 21:27.
Ответить с цитированием
  #5  
Старый 12.03.2013, 21:25
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

Код:
procedure Tf_xxx.sbt_SelectClick(Sender: TObject);
begin
  f_Schet.Edit1.Text := '123';
end;

И ещё - обе эти формы просто наследники TForm с приколоченными к ним компонентеми?

Я не очень в этом разбираюсь(((( На формах так же есть компоненты которые связаны с БД (Акцесс) через запросы. Если это может влиять.
Ответить с цитированием
  #6  
Старый 12.03.2013, 21:34
Аватар для BBBCat
BBBCat BBBCat вне форума
Новичок
 
Регистрация: 10.03.2013
Сообщения: 73
Репутация: 10
По умолчанию

А uses кто-кого? Что-то так по обрывкам кода тяжко всё охватить. Сейчас просто попробую смоделировать по своему подобную ситуёвину. Т.е. главная форма вызывает вторую форму, а та в свою очередь вызывает третью. И третья должна чёй-то написать во второй. Так?
Ответить с цитированием
  #7  
Старый 12.03.2013, 21:35
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

Да, Uses подключены, формы друг друга видят. И не просто вызывает, а создает. т.е. в начале формы не созданы
Код:
begin
  Application.Initialize;
  //Application.CreateForm(Tf_xxx, f_xxx);
  //Application.CreateForm(Tf_Shet, f_Shet);
  Application.Run;
end.

Последний раз редактировалось DOR, 12.03.2013 в 21:38.
Ответить с цитированием
  #8  
Старый 12.03.2013, 22:10
Аватар для BBBCat
BBBCat BBBCat вне форума
Новичок
 
Регистрация: 10.03.2013
Сообщения: 73
Репутация: 10
По умолчанию

Чё-та или я задачи не понял, или магнитные бури У меня всё работает. Вот проект

Последний раз редактировалось BBBCat, 17.03.2013 в 00:07.
Ответить с цитированием
Этот пользователь сказал Спасибо BBBCat за это полезное сообщение:
DOR (12.03.2013)
  #9  
Старый 12.03.2013, 22:20
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

дело видимо во мне, убрал переменные, как у Вас, и все заработало.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

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

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:29.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025