Borland Delphi

← →
Sanya © (2004-11-27 10:00) [0]

Добрый день, скажите пожалуйста как найти текст в StringGrid который написан в TEdit.

← →
ssk © (2004-11-27 10:06) [1]

var i, j: integer; begin for i := 0 to StringGrid.ColCount-1 do for j := 0 to StringGrid.RowCount-1 do if StringGrid.Cells[i, j] = Edit.Text then begin // текст найден. делаем нужные действия... end; end;

← →
Sanya © (2004-11-27 10:08) [2]

ssk
Спасибо большое!
А вот ещё такой вопрос можно ли сделать так чтобы весь остальной текст исчезал?

← →
ssk © (2004-11-27 10:11) [3]

begin // текст найден. делаем нужные действия... end else StringGrid.Cells[i, j] = "";

← →
KilkennyCat © (2004-11-27 10:12) [4]

> if StringGrid.Cells[i, j] = Edit.Text then > begin > // текст найден. делаем нужные действия... > end else StringGrid.Cells[i, j] := "";

← →
KilkennyCat © (2004-11-27 10:13) [5]

> ssk © (27.11.04 10:11) [3]

:) мысли витают в воздухе

← →
Sanya © (2004-11-27 10:13) [6]

Спасибо всем Большое!

>KilkennyCat

можно и CompareText прикрутить конечно... ;-)

З.Ы. а мысли пусть витают...

А вот ещё такой вопрос, как найти текст в DBGrid который написан в TEdit, и чтобы остальной текст исчезал.
Please!

а как насчет терминов "аналогия", "ассоциативное мышление" ?

Borland Delphi Найти похожие ветки