Не изменяется название дочерней формы

@Reavolt · Регистрация: 15.10.2015

Студворк — интернет-сервис помощи студентам

Здравствуйте, сделал форму авторизации по данному уроку. Все работает отлично, только вот на самой форме авторизации при попытке изменить название формы, по нажатию кнопки ничего не происходит.

Код ULogin.h

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
private:    // User declarations
public:     // User declarations
bool LoginFlag;
        __fastcall TFLogin(TComponent* Owner);
        static bool __fastcall Execute();
};
bool __fastcall TFLogin::Execute()
{
    TFLogin *Form = new TFLogin(0);
    int res = Form->ShowModal();
    delete Form;
    return res == mrOk;
}

Код Project1.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
        if(TFLogin::Execute()) {
                 Application->Initialize();
                 Application->CreateForm(__classid(TFMain), &FMain);
                 Application->CreateForm(__classid(TDM), &DM);
                 Application->Run();
           }
        else
           {
            MessageBoxA(0,"Авторизация не пройдена, приложение будет закрыто!",
    "Защита!",MB_OKCANCEL);
           }
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}

@volvo · 23.04.2017, 15:40

Ну и где в приведенном коде попытка изменить название формы?

@Reavolt · 23.04.2017, 15:43 **[ТС]**

C++
1
2
3
4
void __fastcall TFLogin::Button3Click(TObject *Sender)
{
FLogin->Caption = "Авторизация";
}

@volvo · 23.04.2017, 16:28

FLogin это что? Зачем тут вообще что-то уточнять, если

C++
1
2
3
4
void __fastcall TFLogin::Button3Click(TObject *Sender)
{
    Caption = "Авторизация";
}

прекрасно отработает?

@Dinkin · 23.04.2017, 17:12

Просто добавлю коммент (свои 5 коп.). Reavolt, Вы создаете новую форму, а название меняете эталонной, с которой делаете копию.

@Reavolt · 23.04.2017, 20:30 **[ТС]**

А можно узнать почему не работает, когда обращаешься данным образом ?
Я просто в этом не разбираюсь.

C++
1
FLogin->Caption = "Авторизация";

Новые блоги и статьи Все статьи Все блоги /
Вывод данных через динамический список в справочнике Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .

@volvo Супер-модератор 33403 / 21513 / 8236 Регистрация: 22.10.2011 Сообщений: 36,914 Записей в блоге: 12
	23.04.2017, 15:40
	Ну и где в приведенном коде попытка изменить название формы? 0

@Dinkin 783 / 556 / 136 Регистрация: 31.05.2013 Сообщений: 3,154 Записей в блоге: 3
	23.04.2017, 17:12
	Просто добавлю коммент (свои 5 коп.). Reavolt, Вы создаете новую форму, а название меняете эталонной, с которой делаете копию. 1

Не изменяется название дочерней формы

Решение