名前
題名
▼ snailさん > ▼ takiさん > > 何がしたいか理解できていませんが > > procedure TForm1.SetDataComboBox(oya:string); > ↓ > procedure TForm1.SetDataComboBox(oya:TObject); > begin > if oya = Label1 then > ComboBox1.Items.CommaText := 'タイ,マグロ,シャケ' > else if oya = Label2 then > ComboBox1.Items.CommaText := 'たんぽぽ,すみれ,パンジー' > else if oya = Label3 then > ComboBox1.Items.CommaText := 'サクラ,ウメ,マツ'; > end; > > と書いてもいいですよね。 >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link