▼ マスター、皆さん
目覚ましは日曜日にセットしたのですが、
チョット困ったことがおきたので起きてきました。
よろしくお願いします。
Formに
Combobox1,SpeedButton1,SpeedButton2 をおきます。
SpeedButton1Clickで
ComboBox1.Items.Clear;
for i:=1 to 10 do
ComboBox1.Items.Insert(0,IntToStr(i));
SpeedButton2Clickで
for i:=1 to 5 do
ComboBox1.Items.Delete(0);
としておきます。
SpeedButton1を押下したあと、ComboBox1.Itemsは
上から、10,9,8,7,6,5,4,3,2,1 となっています。
ComboBox1のクリックで10,9,8,7,6を選んだ場合
(ComboBox1.Itemindexが0-4の場合)SpeedButton2を押下すると
ComboBox1のTextがクリアーされてしまいます。
5,4,3,2,1を選んだ場合は、変化なしです。
これは、ComboBox1がクリックされたときのItemindexを
覚えていて、ComboBox1.Items.DeleteでそのItemindexに相当するItemが
なくなったので、親切にTextも消してくれるのでしょうか。
Edit部分は編集可能なはずなので、そっとしておいて欲しいのですが。
追伸
私は、
begin
begin
end;
end;
の方に一票です。
他の場所から、begin〜endを持ってきて
さしかえたり、間に入れたり、コメントにするときに
ブロックとして分かりやすいためです(初心者好み)。
そのため、あとで整形するのに矩形選択でスペースの追加、
削除もよく使います。
|