Здравствуйте, вопро с следующий:
Написал я запрос для TQuery

Код

Select Field1, Field2, Field1Table2 from Table1, Table2 Order by Field1, Field2

Причем в Table1 есть данные а Table2 пустая, в результате мне выдается запрос с одним пустым полем. Если объединяю два запроса через UNION - выдает ошибку. Как сделать чтобы в запросе выводились все значения полей из Table1 и рядом, соответственно, пустые поля из Table2?


Это сообщение отредактировал(а) Chechaco - 20.10.2005, 05:12

А у таблиц есть общие поля?

При объединении через union все поля в о обоих выборках должны иметь одинаковый тип и их кол-во должно быть равным

Код

SELECT * FROM Table1  LEFT JOIN Table2 ON Table1.id=Table2.id;

Проверено на базе данных Microsoft Access, откуда получен вывод, что должно работать на других базах данных.

P. S.
Table1 запелнена, а Table2 не заполнена. В противном случае меняется слово LEFT на слово RIGHT, что можно без труда сделать при автоматической генерации SQL-запроса в программе, т. е. преварительно посмотрев, какая из таблиц является пустой.

Спасибо, получилось!
То есть, если я правильно понял, чтобы объединить две таблицы (Paradox) в одном запросе у них должны быть общие ключевые поля? Других ограничений для объединения нет?

Да, что бы включть несколько таблиц в запрос, нужно, что бы они были связанны между собой, но не обязательно ключевыми полями. если Table1.id=Table2.id ID ключевое поле, а таблицы связанны не этими полями, то результат запроса буден неверным

А может еще подскажете как вводить данные в таблицу через DBGrid -> Query без дополнительных действий типа нажимания кнопки после ввода, чтобы данные сохранялись в таблице просто после перехода в гриде на другую ячейку (или хотя бы по нажатию Enter)? Благодарю.

Цитата(Chechaco @ 21.10.2005, 18:41)

или хотя бы по нажатию Enter

Так что ли?

Код

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char); begin  if key = #13   then    Query1.Post end;

Цитата(kirilllius @ 21.10.2005, 11:57)

ключевыми полями.

А если просто создать поле, которое всегда будет равняться единице у двух таблиц? Как в этом случае?

Цитата

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char); begin if key = #13   then    Query1.Post end;

Ну-ну.... по Enter осуществляется вход в редактирование поля записи (во всяком случае в EhGrid), и если оказалось, что заполнены не все поля и среди незаполненных остались обязательные к заполнению, будет Exception...

Гораздо лучше post делать по закрытию окна, где редактировались данные.

Цитата

А если просто создать поле, которое всегда будет равняться единице у двух таблиц? Как в этом случае?

Мммм.... зачем такое.....???

Это сообщение отредактировал(а) YurikGL - 22.10.2005, 18:30

Цитата

А если просто создать поле, которое всегда будет равняться единице у двух таблиц? Как в этом случае?

Тогда для связки таблиц лучше не использовать такое поле что-бы дров не наломать и головной боли было меньше. Заводи в каждой таблице ключевое автоинкременируемое поле и связывай его с любым полем подчененной таблицы 100% без заморочек.

Цитата

чтобы данные сохранялись в таблице просто после перехода в гриде на другую ячейку

Обрати внимание на пост YurikGL он верно сказал

Цитата

Гораздо лучше post делать по закрытию окна, где редактировались данные.

Данные в сетки лучше не редактировать, это не очень хорошо Пользователь может ткнуть случайно или еще что нибудь, а данные уже не вернешь Лучше для редактирования создавать специальное окно в котором по нажатию например на кнопочки " Принять" данные будут переноситься в таблицу, а если не нужно то просто закрыть окошко или сделать кнопочку "Отменить" которая вызовет Close. А на сетки лучше установить свойство "Только для чтения"

Это сообщение отредактировал(а) kirilllius - 22.10.2005, 19:26

Цитата

Гораздо лучше post делать по закрытию окна, где редактировались данные.

Добавлю, что надо это делать в OnCloseQuery примерно так:

try
Table.post
except
on e:exception do begin
canclose:=false;
raise Exception.Create('Не могу подтвердить изменения записи. Произошла ошибка'+#13+e.Message);
end;

З.Ы. это в том случае, если все же решишь редактировать в сетке...

Лучше вешать на отдельную кнопку. Я например хочу закрыть окно не сохраняя изменений. Да и использовать компоненты не связанные с DB, а простые. Хотя это все дело вкуса

Цитата

Лучше вешать на отдельную кнопку. Я например хочу закрыть окно не сохраняя изменений. Да и использовать компоненты не связанные с DB, а простые. Хотя это все дело вкуса

Тогда уж Firebird + прямое управление транзакциями И можно DB-компоненты пользовать.

Так, а теперь по порядку. Я поставил Query, подцепил к ней базу, Поставил DataSource, поставил DBGrid, соединил все это дело. В Query написал
SELECT * FROM Table1
LEFT JOIN Table2 ON Table1.id=Table2.id; (по совету Самурая)
Поставил RequestLive = true, Active = true
Начинаю редактировать - а оно не редактируется, в то время как с выборкой из одной таблицы все проходит на ура. Т.е. я так понимаю должен быть какой-то другой выход, а какой? И еще, как сделать чтобы в выборке из двух таблиц (master-detail) запись, введенная в detail-таблицу соответствовала по внешнему ключу записи в master-таблице напротив которой она была введена?

Цитата(kirilllius @ 22.10.2005, 19:20)

Данные в сетки лучше не редактировать, это не очень хорошо smile Пользователь может ткнуть случайно или еще что нибудь, а данные уже не вернешь smile

В моем случае это нет суть важно, на крайний случай все данные есть на бумаге, главное не ставить кнопку "Удалить базу"

Цитата(Chechaco @ 24.10.2005, 03:43)

Начинаю редактировать - а оно не редактируется

А что именно не редактируется?
Может ошибку выдает какую-нибудь?
Query1.Post стоИт?