掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TStringlistを使って文字列をTSTringGridに表示 (ID:43412)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
//以下でどうでしょうか？ //純粋に馬番だけを検索し、ヒットした列の順位だけを、 //listbox2に納めるようにしました。 var i,i1:integer; s,s1:string; begin i1 := 0; while listbox1.Items.Count > i1 do begin s1 := listbox1.items[i1]; i := ansipos(edit1.Text,s1[1]+ s1[2]); if i = 0 then begin {showmessage(IntToStr(i1) + '行目には' + char(13) +'見つかりませんでした')} end else begin s := listbox1.Items[i1]; listbox2.Items.Add(s[10] + s[11]); end; inc(i1); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.