名前 題名 ▼ satoさん > ▼ マスター、皆さん > 目覚ましは日曜日にセットしたのですが、 > チョット困ったことがおきたので起きてきました。 > よろしくお願いします。 > 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を持ってきて > さしかえたり、間に入れたり、コメントにするときに > ブロックとして分かりやすいためです（初心者好み）。 > そのため、あとで整形するのに矩形選択でスペースの追加、 > 削除もよく使います。 GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link