掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
日付を取り込んで、決まった日に処理を実行するには (ID：8534)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
プロジェクトファイルを例えば以下のようにすると、２６日以外ではすぐ終了します。 program Project1; uses Forms, SysUtils, // SysUtils を加える Unit1 in 'Unit1.pas' {Form1}; {$R *.RES} function GetDay:integer; var Year, Month, Day: Word; begin DecodeDate(Date,Year,Month,Day); result := Day; end; begin if GetDay <> 26 then exit; Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.