Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как отобразить запрос ч/з TDBGird [D5, Paradox]


n1tro ©   (2003-06-19 18:14:00) 

Как отобразить запрос ч/з TDBGird
В книге написанно что типа создаёте TDBGird в свойствах етого компонента в поле DataSource выбираем DataModule.QuerySource
но у меня кроме DataModule.dataSource нету ни чего
Помогите с решить данную проблемку


Жук   (2003-06-20 09:09:00) [1]


> Rol (20.06.03 06:20)

Все читают и тихо хихикают. :-)))


Rol   (2003-06-20 06:20:00) [2]

мляя...
Надо же, ни Anatoly Podgoretsky, ни ЮЮ ни одного слова о врождённом слабоумии и ленности ума - очевидное невероятное... :)


ЮЮ   (2003-06-20 02:41:00) [3]

русская буква присутствует в коде :-)


n1tro   (2003-06-19 20:01:00) [4]

Не понел !!!


Anatoly Podgoretsky   (2003-06-19 19:58:00) [5]

n1tro © (19.06.03 19:13)
Не надо копировать из Веб окон


n1tro   (2003-06-19 19:42:00) [6]

всё понел не надо объеснять я ступил немного :)Sorry
А ошибка в процедуре не изчезает
Illegal character in input file: " " ($A0)
вылазеет на

with datamodule2.Query2 do begin
Close;{Здесь}
Params[0].AsDateTime := DT1.Date;
Open{и Здесь}
end

Может так написать

datamodule2.Query2.CloseDatabase
и
datamodule2.Query2.OpenDatabase


n1tro   (2003-06-19 19:31:00) [7]

Не работает так
а какая разница м/у
DatabaseName = С:\.............\и FROM "Klients.DB"Klients
и ещё надо в сойстве запроса ставить Active:=true;??????


Семен Сорокин   (2003-06-19 19:23:00) [8]

DatabaseName = С:\.............\
без klients.db


n1tro   (2003-06-19 19:13:00) [9]

У меня возникла Ошибка вот в этом месте

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
with datamodule2.Query2 do begin
Close;
Params[0].AsDateTime := DT1.Date;
Open
end
end;

[Error] Unit5.pas(152): Illegal character in input file: " " ($A0)

и когда прописывал полный путь к базе
DatabaseName = С:\.............\klients.db
вылазила ошибка: Invalid use keyword
Token:DataBaseName


Семен Сорокин   (2003-06-19 18:52:00) [10]

Сам врядли подскажу, давно уже ничего не читал :))
но здесь этого добра навалом, главное только захотеть найти.


n1tro   (2003-06-19 18:47:00) [11]

Спасибо завтра поюду книги посмотрю
не подскажите Какую лучше взять по данно тематике
а то уменя С.Бобровский есть но там всё поверхностно


Семен Сорокин   (2003-06-19 18:42:00) [12]

в дизайнере для Datamodule2.Query2 вставь текст в Sql:
SELECT Name, 1Name, Addres, Computer, Oplachenno, Admin, ID
FROM Klients where data=:dp1

DatabaseName = Путь где находится klients

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
with datamodule2.Query2 do begin
Close;
Params[0].AsDateTime := DT1.Date;
Open
end
end;

и все-таки найди время почитать литературу.


n1tro   (2003-06-19 18:32:00) [13]

Я не понел как ето делать
да у меня под рукой не качественной литературы
и ещё, скажите Семен как делать
у меня усть запрос вот такой:
------------------------------------------------------------
SELECT Name, 1Name, Addres, Computer, Oplachenno, Admin, ID
FROM "Klients.DB" Klients
where klients.data=:dp1
-------------------------------------------------------------
потом по событию
--------------------------------------------------------------
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
datamodule2.Query2.Params[0].AsString:=datetostr(DT1.Date);
end;
--------------------------------------------------------------
и мне нужно вывести данные по выбранной дате в таблицу

Скажите как ето сделать


Семен Сорокин   (2003-06-19 18:21:00) [14]

TDataSource + TQuery (Закладка DataAccess) тебя спасет.
Советую почитать доки по предемету.


Наверх

Титульная страница Поиск, карта сайта Написать письмо