Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Не могу достать переменную из другой формы 
V
    Опции темы
Mpak
Дата 4.12.2006, 19:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 12.11.2006

Репутация: 4
Всего: 7
У меня есть Form1 и Form2

В Form1->Edit1->Text вводяться данные при нажатии на кнопку срабатывает функция
Form2->ShowModal()

В Form2 вот такой код:
Код

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
Form2->Caption=Form1->Caption;
Form2->Label1->Caption="Текст: "+Form1->Edit1->Text;
}
//---------------------------------------------------------------------------


15 строчка срабатывает, а 16 нет....


--------------------
В любой откомпилированной программе есть, по крайней мере, одна ошибка...
P.S. А у меня их минимум две...
PM MAIL ICQ   Вверх
Anikmar
Дата 4.12.2006, 19:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2513
Регистрация: 26.11.2006
Где: Санкт-Петербург

Репутация: 34
Всего: 59
А что пишет?
PM MAIL ICQ   Вверх
Rodman
Дата 4.12.2006, 19:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 7
Всего: 122
Mpak, мне кажется она срабатывает...

Просто при выполненнии кода
Код

__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)


в Form1->Edit1->Text ничего не написано....



--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
Mpak
Дата 4.12.2006, 19:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 12.11.2006

Репутация: 4
Всего: 7
Оно, что, сбрасываеся?


Anikmar , в том то и дело, оно ничего не пишет smile


Это сообщение отредактировал(а) Mpak - 4.12.2006, 19:40


--------------------
В любой откомпилированной программе есть, по крайней мере, одна ошибка...
P.S. А у меня их минимум две...
PM MAIL ICQ   Вверх
Rodman
Дата 4.12.2006, 19:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 7
Всего: 122
Mpak, в свойстве Техt в Form1->Edit1->Text сразу введи что нить и потом скомпиль попробуй


--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
witex
Дата 4.12.2006, 19:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 224
Регистрация: 16.10.2006
Где: Эстония

Репутация: 1
Всего: 4
Просто луше посылать данные на форму модальную, чем считывать с другой! Всегда работать будет!
А так у тебя форма блокируеться первая!
--------------------
Я не волшебник, я только учусь."Шлёпни в Гугл" - Афтор Былов Ю.М. 
PM MAIL   Вверх
Rodman
Дата 4.12.2006, 19:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 7
Всего: 122
Код

ShowMessage("Текст: "+Form1->Edit1->Text);


тоже ничего не видет?

Это сообщение отредактировал(а) Rodman - 4.12.2006, 20:24


--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
Mpak
Дата 4.12.2006, 20:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 12.11.2006

Репутация: 4
Всего: 7
Цитата

Просто луше посылать данные на форму модальную, чем считывать с другой! 


Не понял... а как послать данные?


--------------------
В любой откомпилированной программе есть, по крайней мере, одна ошибка...
P.S. А у меня их минимум две...
PM MAIL ICQ   Вверх
witex
Дата 4.12.2006, 20:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 224
Регистрация: 16.10.2006
Где: Эстония

Репутация: 1
Всего: 4
Rodman, чего флудишь то?
--------------------
Я не волшебник, я только учусь."Шлёпни в Гугл" - Афтор Былов Ю.М. 
PM MAIL   Вверх
Rodman
Дата 4.12.2006, 20:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 7
Всего: 122
witex, сорри...

Глюкнуло... 


Добавлено @ 20:17 
Mpak, выложи полный исходник

Это сообщение отредактировал(а) Rodman - 4.12.2006, 20:26


--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
witex
Дата 4.12.2006, 20:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 224
Регистрация: 16.10.2006
Где: Эстония

Репутация: 1
Всего: 4
Код

Form2->Caption = Form3->Caption;
Form2->Label1->Caption = "Text "+ Edit1->Text;
Form2->ShowModal();

Декларируешь опять же форму втрую на первой!
и при обработчике нажатия батона введи этот код! вот и всё!
Ток убери со второй формы код при загрузке!
--------------------
Я не волшебник, я только учусь."Шлёпни в Гугл" - Афтор Былов Ю.М. 
PM MAIL   Вверх
Partizan
Дата 4.12.2006, 20:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Let's do some .NET
****


Профиль
Группа: Модератор
Сообщений: 2828
Регистрация: 19.12.2005
Где: Санкт-Петербург

Репутация: 7
Всего: 67
вычо прикалываетесь? =)))
просто конструктор формы вызывается вместе с первой формой...создаются они вместе практически...
при вызове Show или ShowModal просто меняется Visible на TRUE....
Решение проблемы:

надо код:

Код

Form2->Caption=Form1->Caption;
Form2->Label1->Caption="Текст: "+Form1->Edit1->Text;


перенести в обработчик события OnShow...


--------------------
СУВ,
       Partizan.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
Mpak
Дата 4.12.2006, 20:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 12.11.2006

Репутация: 4
Всего: 7
witex,  Спасибо! Заработало!


Rodman, Спасибо, но уже зароботало ;)

А не могли бы вы объяснить почему, у меня не работало? (принцип)


--------------------
В любой откомпилированной программе есть, по крайней мере, одна ошибка...
P.S. А у меня их минимум две...
PM MAIL ICQ   Вверх
Partizan
Дата 4.12.2006, 20:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Let's do some .NET
****


Профиль
Группа: Модератор
Сообщений: 2828
Регистрация: 19.12.2005
Где: Санкт-Петербург

Репутация: 7
Всего: 67
юмористы)

Добавлено @ 20:35 
Цитата(Mpak @ 4.12.2006,  20:33)
А не могли бы вы объяснить почему, у меня не работало? (принцип)

смотри мой пост выше....


--------------------
СУВ,
       Partizan.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
witex
Дата 4.12.2006, 20:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 224
Регистрация: 16.10.2006
Где: Эстония

Репутация: 1
Всего: 4
Странно, у меня даже если на копку нажимаешь, выдаёт Acces violidation.
--------------------
Я не волшебник, я только учусь."Шлёпни в Гугл" - Афтор Былов Ю.М. 
PM MAIL   Вверх
Mpak
Дата 4.12.2006, 20:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 12.11.2006

Репутация: 4
Всего: 7
Partizan,  спасибо, буду должен ;)


--------------------
В любой откомпилированной программе есть, по крайней мере, одна ошибка...
P.S. А у меня их минимум две...
PM MAIL ICQ   Вверх
_int64
Дата 19.3.2007, 18:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 36
Регистрация: 30.1.2007

Репутация: нет
Всего: нет
Unit1.cpp
Код

#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
bool s;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   s=1;
   Form2->Show();
}
//---------------------------------------------------------------------------


Unit2.cpp
Код

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit1.cpp"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
extern bool s;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm2::FormClick(TObject *Sender)
{
      if(s) ShowMessage("!!!");
}
//---------------------------------------------------------------------------


Сообщение при клике на вторую форму не выводится....

при компилировании пишет
Цитата

[Linker Warning] Public symbol '_s' defined in both module D:\PROGRAM FILES\BORLAND\CBUILDER6\PROJECTS\UNIT1.OBJ and D:\PROGRAM FILES\BORLAND\CBUILDER6\PROJECTS\UNIT2.OBJ


[/quote]
[/quote]
PM MAIL   Вверх
_hunter
Дата 19.3.2007, 19:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 24
Всего: 98
а не проще ли (в таком случае) сделать s членом класса (что TForm1 что TForm2)?
и в .cpp extern писать не нужно (мог бы и на обявление/реализацию TForm1 глянуть)


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Страницы: (2) [Все] 1 2 
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1068 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.