Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
263 / 109 / 26
Регистрация: 16.03.2013
Сообщений: 272
1

Сделать отображение dbgrid похожим, как в PLSQL Developer

17.09.2015, 12:40. Показов 891. Ответов 1
Метки нет (Все метки)

Здравствуйте, форумчане. У меня 3 вопроса:
В проекте на D7 есть грид dbGridEh (компанент Ehlib), запрос TOraQuery (компанент ODAC, FetchAll=false), выше него лежит сплитер, чтоб изменять положение грида.
Открываю TOraQuery. В таблице, откуда идёт выборка 30 записей. В грид вместились только 10.
1) Если после этого поднять сплитер, то количество записей записей в гриде увеличивается. А мне нужно, чтоб оно оставалось таким же и увеличивалось только в том случае, если у TOraQuery FetchAll будет равен true.
2) Если в гриде 10 записей и TOraQuery.RecordCount= 10 (хотя запрос возвращает 30) и я перехожу по записям вниз, то на 10 курсор не останавливается и происходит Fetch до тех пор, пока я не достигну конца TOraQuery. Подскажите, как правильно сделать так, чтоб если в гриде 10 записей, а в запросе больше - не выводить остальные, пока не будет нажата кнопка, с обработчиком:
Delphi
1
ORAQuery.FetchAll=true;
3) Правильно ли, что у меня при открытии запроса, если в нём больше записей, чем возвращает грид в сессиях этот запрос остаётся открытым. Хотя, в PLSQL Developer при таких же условиях запрос не активен, он активен только если он выполняется.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.09.2015, 12:40
Ответы с готовыми решениями:

Plsql developer как посмотреть какими операциями используется функция/процедура
Здравствуйте, как в plsql developer посмотреть какими операциями используется функция/процедура из...

PLSQL Developer
Доброе время суток! Господа, помогите решить проблему. Скачал PLSQL Developer, установил, прошло...

Как While сделать похожим на For
Как While сделать похожим на For Пример: s:=0; while s<=100 do s:=s+i; i - нужно сделать...

PLSQL Developer не видит Oracle
Установлен Oracle Database 12g 64 bit, Oracle Database 12g Client 32 bit, PLSQL Developer 32 bit. ...

__________________
1
263 / 109 / 26
Регистрация: 16.03.2013
Сообщений: 272
18.09.2015, 22:54  [ТС] 2
Разобрался. Если кому интересно - реализовал так:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm1.Oraquery1AfterOpen(DataSet: TDataSet);
begin
  ...
  FRecordCount := DataSet.RecordCount; //присваиваем значение глобальной переменной; QueryRecCount у DataSet = false
  ...
  DataSet.Tag := 1;
  ...
 
procedure TForm1.Oraquery1BeforeFetch(DataSet: TCustomDADataSet;
  var Cancel: Boolean);
begin
  if ((Dataset.RecNo = FRecordCount) and (FRecordCount > 0)) or
     (DataSet.Tag = 1) then
    begin
      Cancel:= True;
    end;
end;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.09.2015, 22:54

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Web интерфейс APEX + PLSQL Developer
Подскажите пожалуйста чайнику. Существует база данных созданная во Free workspace. Можно ли...

Как сделать модуль браузера похожим на Webkit?
Как сделать модуль браузера похожим на Webkit?

Какие права выдать пользователю чтобы открыть в plsql-developer тело пакета DBMS_DATA_MINING ?
Какие права выдать пользователю чтобы открыть в plsql-developer тело пакета DBMS_DATA_MINING ? ...

Как сделать похожим program p1 через type ,+ вывод элементов и без const, counter
как сделать похожим program p1 через type ,+ вывод элементов и без const, counter похожим program...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.