Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 10.01.2008, 00:50
JIexa JIexa вне форума
Прохожий
 
Регистрация: 02.09.2007
Сообщения: 38
Репутация: 10
Восклицание БД Запрос с одного окна другому...

Я хочу сделать SQL запрос из одного окна (в нем нет SQL не DB, просто окно, для поиска..) другому, но вот точно не знаю как.. подскажи мне пожалуйсто и поправьте ....
Зарание спасибо!
Вот что я намудрил:
Код:
procedure TForm13.Button1Click(Sender: TObject);
begin
Fam:=Edit1.text;
Name:=Edit2.Text;
Clas:=Edit3.Text;
if Fam > '' and Name > '' and Clas > '' then
begin
with form2.Query do
begin
Form2.Query.Close;
Form2.Query.SQL.Add('SELECT * FROM liceym.db WHERE Fam, Name, Clas LIKE "'+ Fam + '","'+ Name + '","'+ Clas + '"');
Form2.Query.Open;
end;
if Form2.Query.RecordCount <> 0 then  Form2.QSource.DataSet:=Query
 else
 begin
  ShowMessage ('Ничего не было найдено');
  Form3DSource.DataSet:=Table;
 end;
 end;
 end;
Описание, того, что должно получиться:
в 3 Edit-а вводим, имя, фамилию и класс, нажимаем кнопку Поиск, и из Формы №4 идет запрос форме №2....

Очень прошу помогите!!!

Последний раз редактировалось JIexa, 10.01.2008 в 00:57.
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 23:07.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter