Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.06.2009, 09:41   #11
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
fobass
Во-первых: Есть кнопка редактирования - не делай подряд свои же посты.
Во-вторых: Криминала я не вижу так что либо проверяй так:
Код:
if TreeView1.Selected.Index=чему там then
Или прикрепляй весь прокат сюда в архиве с БД.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.06.2009, 11:32   #12
fobass
Форумчанин
 
Регистрация: 05.06.2008
Сообщений: 100
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Во-первых: Есть кнопка редактирования - не делай подряд свои же посты.
Во-вторых: Криминала я не вижу так что либо проверяй так:
Код:
if TreeView1.Selected.Index=чему там then
Или прикрепляй весь прокат сюда в архиве с БД.
вот бд на access"е
сам Project пока в разработке
Вложения
Тип файла: rar Project.rar (391.1 Кб, 10 просмотров)
fobass вне форума Ответить с цитированием
Старый 22.06.2009, 11:59   #13
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Во-первых: Учти что прога твоя поперхнется если ее перенести на другой компьютер в папку не такую как указано в программе - рухнет, не найдя БД. Посему совет : базу кинь в папку с экзешником (все равно она не сетевая) а в коннекте к ней укажи только имя базы убрав полный путь.

Во-вторых: перенеси свои
Код:
 if TreeView1.Items[0].Selected  then
ADOQuery1.SQL.Text:='SELECT *FROM 01_Rukovodstvo';
...
В событие TreeView.Onlick. Тогда лажать не будет. Ты просто не то событие выбрал для обработки клика по веткам.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.06.2009, 16:22   #14
fobass
Форумчанин
 
Регистрация: 05.06.2008
Сообщений: 100
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Во-первых: Учти что прога твоя поперхнется если ее перенести на другой компьютер в папку не такую как указано в программе - рухнет, не найдя БД. Посему совет : базу кинь в папку с экзешником (все равно она не сетевая) а в коннекте к ней укажи только имя базы убрав полный путь.

Во-вторых: перенеси свои
Код:
 if TreeView1.Items[0].Selected  then
ADOQuery1.SQL.Text:='SELECT *FROM 01_Rukovodstvo';
...
В событие TreeView.Onlick. Тогда лажать не будет. Ты просто не то событие выбрал для обработки клика по веткам.
да большое рахмат
Теперь следу-ая проблема
у меня как видете 26 таблиц и соответствинно 26 итемов
мне нужно зделать запрос, когда выберается из treeview1 Местные подраздиления нужно сделать так чтоб все записи из всех таблиц выбирались (показывали в dbGrid) ну вот както так.
fobass вне форума Ответить с цитированием
Старый 22.06.2009, 16:25   #15
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Сорри, но мало что понял )
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.06.2009, 16:35   #16
fobass
Форумчанин
 
Регистрация: 05.06.2008
Сообщений: 100
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Сорри, но мало что понял )
надо сделать запрос на Местные подраздиления
чтобы показывали все записи всех таблиц
fobass вне форума Ответить с цитированием
Старый 22.06.2009, 16:56   #17
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Ну если я правильно понял тебе нужно свормировать запрос на несколько таблиц, Тебе нужно пройтись по веткам Местные подраздиления и добавить их в запрос:
Код:
var s:string;i:integer;
begin
for i:=0 to TreeView1.Selected.Count-1 do begin
 s:=s+TreeView1.Selected.Item[i].Text+',';
end;
delete(s,length(s),1);
caption:='Select * form '+s;
end;
Таким образом в S будет через запятую перечислены таблицы в ветке которую ты выбрал.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.06.2009, 19:25   #18
fobass
Форумчанин
 
Регистрация: 05.06.2008
Сообщений: 100
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Ну если я правильно понял тебе нужно свормировать запрос на несколько таблиц, Тебе нужно пройтись по веткам Местные подраздиления и добавить их в запрос:
Код:
var s:string;i:integer;
begin
for i:=0 to TreeView1.Selected.Count-1 do begin
 s:=s+TreeView1.Selected.Item[i].Text+',';
end;
delete(s,length(s),1);
caption:='Select * form '+s;
end;
Таким образом в S будет через запятую перечислены таблицы в ветке которую ты выбрал.
да именно так но только запрос не выберает записи всех таблиц, в caption'е форме пишется запрос но не выберается
я место caption написал
PHP код:
adoqery.sql.text:='selec* from '+s
ругается что FROM не правельно
fobass вне форума Ответить с цитированием
Старый 23.06.2009, 07:31   #19
S@fer
Форумчанин
 
Аватар для S@fer
 
Регистрация: 29.01.2009
Сообщений: 411
По умолчанию

Цитата:
selec* from
Может правильнее так?
Код:
select * from
S@fer вне форума Ответить с цитированием
Старый 23.06.2009, 08:41   #20
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
в caption'е форме пишется запрос но не выберается
Я просто пример тебе написал )
Поскольку открывать запросы ты умеешь - дальше сам доделаешь.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
подключиться к sql server Imya Базы данных (ADO.NET, LinqToSql, ORM Entity Framework, NHibernate) 10 25.10.2011 21:31
Delphi - SQL Server ghost_vlv БД в Delphi 1 24.05.2009 17:39
Доступ к БД (SQL server) в ОС Windows server 2003 Mann SQL, базы данных 2 07.12.2008 19:15
C# + SQl server kommunist Общие вопросы .NET 0 24.07.2008 21:09
MS SQL Server AlexDoul БД в Delphi 3 22.11.2007 09:33