#1.1 マイナーな修正とLED変更
period = 1000/StrToFloat(LabeledEdit1->Text);
と変更して1以下の周波数に対応しました。例えば、0.5Hzにすると周期は2秒=2000msとなります。
手持ちのLEDを試してみました。差し替えを容易にするために、直差しではなく、ブレッドボードを使用しました。

輝度が全然違います。飽和電圧が変わって、電流値も増えているかもしれませんね。周期を長く設定してみると、
さらにLED(見かけ上白)に変えると、
白とはいえず緑ですね。おまけの予告編、
コメント