Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

поиск по форме [D6]

nyron © (2006-03-27 08:45:00)
Добрый день. Подскажите пожалуйста как можно сделать так чтобы поиск на форме происходил по заданному слову и как можно связать edit с button, чтобы только определенная кнопка была связана с определенным edit?

nyron (2006-03-27 15:11:00) [1]
if ((Form1.Components[i] is TEdit) and(TEdit(Form1.Components[i]).Text = 'КНОПКА')) во, вот это нужно, спасибо большое

Mike Kouzmine (2006-03-27 14:52:00) [2]
nyron © (27.03.06 14:42) [13]
for i:= 0 to Form1.ComponentCount-1 do
if ((Form1.Components[i] is TEdit) and(TEdit(Form1.Components[i]).Text = 'КНОПКА')) then Button1.Проц.Нажатия;

balepa (2006-03-27 14:45:00) [3]
Выше посмотреть стул не позволяет ?
Для тех кто не умеет пользоваться Скролбарами в ie
for i:= 0 to Form1.ComponentCount-1 do if (Form1.Components[i] is TEdit) then if TEdit(Form1.Components[i]).Tag = TButton(Sender).Tag then begin TEdit(Form1.Components[i]).Text:= 'ddd'; end;

nyron (2006-03-27 14:42:00) [4]
ну вот ты написал
for i:= 0 to Form1.ComponentCount-1 do
if (Form1.Components[i] is TEdit) then
ShowMessage('111');
т.е. пробегая по всем edit'ам выдается столько сообщений, сколько существует edit'ов. а как искать определенный текст в этих edit?

balepa (2006-03-27 13:53:00) [5]

> nyron © (27.03.06 13:11) [11]
> ...чтобы не просто по edit'am пробегаться, а еще и в них искать
> значение чтоли

см. balepa © (27.03.06 11:22) [9]
Опять я Нихрена непонял

nyron (2006-03-27 13:11:00) [6]
ну т.е. на первой форме происходил поиск во всех компонентах слова такого же как и на второй форме т.е. "страна". соответственно в трех компонентах только в одном это слово, и соответственно происходило выполнение действия кнопки которая принадлежит к этому компоненту. по твоей подсказки сообщение выдается столько раз, сколько компонентов edit, а как правильно написать так, чтобы сообщение выскакивало только в том случае, если в этом edit есть какое-то слово, которое есть на другой совершенно форме? чтобы не просто по edit'am пробегаться, а еще и в них искать значение чтоли

nyron (2006-03-27 13:01:00) [7]
в итоге нужно чтобы на одной форме было 3 компонента edit с названиями (флаг, карта, страна) и три кнопки которые принадлежат к этим компонентам. а на другой форме был один компонент с названием 'страна' и одна кнопка, по нажатию которой происходил поиск по всем компонентам первой формы, но чтоб ы он еще искал значение этого компонента. а связывать автоматически кнопки для того, чтобы после того как это было найдено, но автоматом нажималась кнопка которая принадлежит к компоненту под названием 'страна' (ну вот так примерно)

balepa (2006-03-27 11:22:00) [8]
Вопрос сформулируй попонятнее а то нифига понять не могу че сделать то надо?

Editam и buttonam(которые надо "связать") присваевай одинаковый номер в Tag

for i:= 0 to Form1.ComponentCount-1 do if (Form1.Components[i] is TEdit) then if TEdit(Form1.Components[i]).Tag = TButton(Sender).Tag then begin TEdit(Form1.Components[i]).Text:= 'ddd'; //ну здесь выполняй свое действие end;

А действие которое должно выполняться оформи ввиде процедуры или помести в ActionList и че я тут накалякал тоже можно в ActionList(мож с небольшими изменениями).
А вообще опиши проблему попонятнее может еще кто че подскажет, а то я смотрю кроме меня никто даже попытатся понять не хочет че ты тут написал.

nyron (2006-03-27 10:52:00) [9]
простите а это как? я просто не знаю

balepa (2006-03-27 10:49:00) [10]
или создай свой компонент с кнопкой и эдитом

balepa (2006-03-27 10:40:00) [11]
Используй свойство Tag у обоих компонентов

nyron (2006-03-27 10:09:00) [12]
ну т.е. как сделать так, что как только в edit нашлось похожее слово, то вместо сообщения выполнялось действие по нажатию кнопки которая принадлежит этому edit

nyron (2006-03-27 10:05:00) [13]
простите, поспешил, искать по edit получилось, но вот все е как на счет автоматической связки edit с button?

nyron (2006-03-27 09:55:00) [14]
простите, че то у меня не получается. и я не могу понять как сделать так, чтобы допустим я сделал несколько edit'ов и несколько кнопок, но чтобы не руками прописывать, потому что если будет много эдитов и кнопок, то каждый раз прописывать что к этому эдиту эта кнопка будет напряжно. или т.е. я так понимаю можно же сделать автоматическое создание edit и button, а вот как сделать так чтобы они автоматически связывались друг с другом? или это не просто сделать?

balepa (2006-03-27 09:21:00) [15]

> balepa © (27.03.06 09:00) [1]
> Если текст в Edit'ах то пробегайся по всем Edit'am
т.е. по компонентам на форме

balepa (2006-03-27 09:00:00) [16]
Edit с Button связывает обращение к Edit'у из Button'a

> Подскажите пожалуйста как можно сделать так чтобы поиск
> на форме происходил по заданному слову

Че тебе искать надо ? Если текст в Edit'ах то пробегайся по всем Edit'am
for i:= 0 to Form1.ComponentCount-1 do if (Form1.Components[i] is TEdit) then ShowMessage('111');

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »