StringGrid

[stp56]

Не нашел ничего похожего, что мне надо.

Есть БД а экселе (свои заморочки)
При открытии StringGrid автоматически считываются данные в строки Grid'а
Как сделать так, чтобы при ввобде Edit необходимый текст, в поле Grid отображались строки содержащие значения из Edit........т.е. грубо сделать фильтр строк, которые соответствуют требуем банным. Поиск необходимо только в одном столбце.

Сейчас есть только поиск, т.к. строка останавливается на первом попашемся значении.....не могу понять как сделать цикл по дальнейшим строкам и отсортировку....

[artemavd]

Используйте компонент DBEdit. Настройте его свойство DataSource на тот же DataSource, на который настроен DBGrid. И этот DBEdit будет отображать то значение по столбцу, на которой стоит курсор. Если я конечно правильно Вас понял. Если правильно понял, то, оставьте пожалуйста отзыв )

[stp56]

не, DB в том, то и дело не использую.....или оно со стрингом нормально будет работать?

[artemavd]

Дык вы уточните, у вас stringgrid или dbgrid?

[psycho-coder]

Сообщение от artemavd

Дык вы уточните, у вас stringgrid или dbgrid?

Там же написано StirngGrid

чтобы при ввобде Edit необходимый текст, в поле Grid отображались строки содержащие значения

Ну как то, так...

var
  rows: array of PChar;
  cnt: INteger;
...
SetLength(rows, StringGrid1.RowCount);
cnt := 0;
for i := 0 to StringGrid1.RowCount - 1 do
begin
  if StringGrid1.Cells[<столбец>, <строка>] = Edit1.Text then
  begin
    rows[cnt] := StringGrid1.Rows[i].GetText;
    Inc(cnt);
  end;
end;

for i := 0 to StringGrid1.RowCount - 1 do
  StringGrid1.Rows[i].Clear;

StringGrid1.RowCount := cnt;

for i := 0 to cnt do
  StringGrid1.Rows[i].SetText(rows[i]);

Но тут идет только полное сравнение, что ни есть гуд. Лучше поиск по маске

if Pos(Edit1.Text, StringGrid1.Cells[<столбец>, <строка>]) > 0 then

P.S. могут быть ошибки, писал прямо сюда