поиск - Общие вопросы Delphi

sid1868 · 10.11.2010, 14:19

чего то не идет может кто сказать в чём проблема
procedure TForm3.Edit1Change(Sender: TObject);
begin
if (Edit1.Text) <> 0
then
form3.ADOTable1.filtered:=true
else
form3.ADOTable1.filtered:=false
form3.ADOTable1.filter:='наименовва ние ОС' ''+ Edit1.Text + '''';
end;

end.

mihali4 · 10.11.2010, 14:58

Читаем правила, пишем осмысленное название для темы...
Модератор.

10.11.2010, 14:19	#1
sid1868 Пользователь Регистрация: 30.03.2010 Сообщений: 48	поиск чего то не идет может кто сказать в чём проблема procedure TForm3.Edit1Change(Sender: TObject); begin if (Edit1.Text) <> 0 then form3.ADOTable1.filtered:=true else form3.ADOTable1.filtered:=false form3.ADOTable1.filter:='наименовва ние ОС' ''+ Edit1.Text + ''''; end; end.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
поиск	STALKER7538	Паскаль, Turbo Pascal, PascalABC.NET	2	11.10.2010 00:09
Поиск по БД	jaxik	БД в Delphi	8	08.09.2010 03:41
поиск	spree	Microsoft Office Excel	22	16.11.2009 15:08
Поиск В бД	Старик_Романыч	БД в Delphi	5	29.04.2008 21:12
поиск	Lonix	Общие вопросы Delphi	2	04.04.2007 01:59

10.11.2010, 14:58	#2
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Читаем правила, пишем осмысленное название для темы... Модератор.