Скачать: CL | DM;

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]

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

---

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

>KilkennyCat

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

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

---

← →
Sanya ©   (2004-11-27 10:46) [8]

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

---

← →
KilkennyCat ©   (2004-11-27 11:27) [9]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.048 c