teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

1

質問内容の追加。

2021/02/19 04:04

投稿

MaeharaKenji
MaeharaKenji

スコア86

title CHANGED
File without changes
body CHANGED
@@ -9,4 +9,61 @@
9
9
  ビルド成功後に起動時にuConnect.dfmのVCLフォームが表示されます。
10
10
 
11
11
  最初に表示されるのはuMain.dfmにしたいのですが、この設定はどこで変更すればよいのでしょうか?
12
- どうぞ、ご教示の程宜しくお願い致します。
12
+ どうぞ、ご教示の程宜しくお願い致します。
13
+
14
+
15
+
16
+
17
+ プロジェクト作成時に作成されるcppファイルの内容で、
18
+
19
+ ```ここに言語を入力
20
+ Application->CreateForm(__classid(TfrmConnect), &frmConnect);
21
+ Application->CreateForm(__classid(TfrmMain), &frmMain);
22
+ ```
23
+
24
+ このようなコードがありますが、このコードの順序を変えたところ、uMainのフォームが表示されるようになりましたが、
25
+ このようなやり方で問題ないでしょうか?
26
+
27
+ 正しい方法など教えて頂きますよう、宜しくお願い致します。
28
+
29
+
30
+
31
+ ```cpp
32
+ //---------------------------------------------------------------------------
33
+
34
+ #include <vcl.h>
35
+ #pragma hdrstop
36
+ #include <tchar.h>
37
+ //---------------------------------------------------------------------------
38
+ USEFORM("uConnect.cpp", frmConnect);
39
+ USEFORM("uMain.cpp", frmMain);
40
+ //---------------------------------------------------------------------------
41
+ int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
42
+ {
43
+ try
44
+ {
45
+ Application->Initialize();
46
+ Application->MainFormOnTaskBar = true;
47
+ Application->CreateForm(__classid(TfrmConnect), &frmConnect);
48
+ Application->CreateForm(__classid(TfrmMain), &frmMain);
49
+ Application->Run();
50
+ }
51
+ catch (Exception &exception)
52
+ {
53
+ Application->ShowException(&exception);
54
+ }
55
+ catch (...)
56
+ {
57
+ try
58
+ {
59
+ throw Exception("");
60
+ }
61
+ catch (Exception &exception)
62
+ {
63
+ Application->ShowException(&exception);
64
+ }
65
+ }
66
+ return 0;
67
+ }
68
+ //---------------------------------------------------------------------------
69
+ ```