掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
リアルタイム検索をするには？ (ID:21005)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
実際には、動かして試したわけではないのですが、 イメージ的には、以下のような感じです。 procedure TForm1.edtHogeChange(Sender: TObject); begin DispUpdate; // SQLによる表示データ格納 end; procedure TForm1.DispUpdate; var str_hoge: String; begin // 部分絞込み文字列 str_hoge := Trim(edtHoge.Text); with Query1 do begin Active := False; SQL.Clear; SQL.Add('Select * from SomeTable'); if str_hoge <> '' then SQL.Add(' WHERE (KanaName LIKE ''%' + str_hoge + '%'')'); Active := True; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.