TntForm使用時の初期フォーム表示(今更だけれど)

Tnt Delphi UNICODE Controlsを使って新規アプリケーションを作成するとき、

  1. メニューの「新規作成」「アプリケーション」を選ぶ。
  2. メニューの「新規作成」「その他」を選び、「New」タブから「TntForm (Unicode)」を選ぶ。
  3. 自動で作成されているUnit1.pasを削除する。

という手順で作るかと思います。
ただ、この手順で保存したプロジェクトを開き直すと、IDEの初期表示時にTntFormが表示されません。
(プロジェクトのソースだけ表示される)。

これを修正するには、プロジェクトのソースを変更する必要があります。
[sourcecode language=’delphi’]
program Project1;

uses
Forms,
Unit2 in ‘Unit2.pas’ {TntForm2};
//元はこう。
//Unit2 in ‘Unit2.pas’ {TntForm2: TTntForm};

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TTntForm2, TntForm2);
Application.Run;
end.
[/sourcecode]

以上、小ネタでした。
# 自分が忘れそうなので。

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください