掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
すべてのFormのCreateFormが終わる前にプログラムを終了させるには? (ID:38212)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
program Project1; uses Windows, Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); if Form1.Download = 'OK' then begin Application.Run; end else begin Application.MessageBox(pchar('ログインできません。'), pchar('softwarename'), MB_OK ); end; end.
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.