>>432
にしたがってメインフォームに以下のように書きました。

procedure TMain.OnCreate(Sender: TObject);
var
t:TTimer;
begin
t:=TTimer.Create(Self);

if t.ShowModal = mrCancel then
Close;

t.Free;
end;


しかし、TTimerでキャンセルボタンを押して、Closeが実行されるのを
確認したんですが、メインフォームが開いてしまいます。

どうしたらいいのでしょうか？