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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 16.02.2013, 14:14
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию грид (количество строк)

Здравствуйте. При создании формы, в EhGrid при помощи sql вытаскиваются строки из акцесса, подскажите пжл, как ограничить количество строк которые отображаются в гриде при создании формы, например 50 последних.
Ответить с цитированием
  #2  
Старый 16.02.2013, 14:37
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 339
Версия Delphi: 10.4
Репутация: 429
Сообщение

А что в Google найти помешало?
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
Ответить с цитированием
  #3  
Старый 16.02.2013, 14:42
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

А зачем вообще этот сайт? Если все можно найти в гугле!!!
Ответить с цитированием
  #4  
Старый 16.02.2013, 14:43
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 339
Версия Delphi: 10.4
Репутация: 429
По умолчанию

Да ладно тебе кричать... Помогла ссылка?
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
Ответить с цитированием
  #5  
Старый 16.02.2013, 15:03
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

Код:
select тор 2
id, q
from main_tabl
ORDER BY id DESC;

ругается что пропущен оператор, хотя вот пример
Код:
SELECT TOP 25
FirstName, LastName
FROM Students
WHERE GraduationYear = 2003
ORDER BY GradePointAverage DESC;
Ответить с цитированием
  #6  
Старый 16.02.2013, 15:18
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 339
Версия Delphi: 10.4
Репутация: 429
Сообщение

А у меня работает...
Код:
with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT TOP 2 Num, InvNom, User');
  SQL.Add('FROM Comps');
  SQL.Add('ORDER BY Num DESC');
  Open;
end;
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
Ответить с цитированием
Этот пользователь сказал Спасибо Kailon за это полезное сообщение:
DOR (16.02.2013)
  #7  
Старый 16.02.2013, 15:36
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

когда пишу код на событие FormShow, работает. Когда пишу в DATOQuery не работает.
Ответить с цитированием
  #8  
Старый 16.02.2013, 15:39
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 339
Версия Delphi: 10.4
Репутация: 429
По умолчанию

Дай весь код.
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
Ответить с цитированием
  #9  
Старый 16.02.2013, 15:42
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

Код:
procedure Tf_Osnov.FormShow(Sender: TObject);
begin
with DataModule1.Q_Main_Grid do
begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT TOP 2 id, q');
  SQL.Add('FROM main_tabl');
  SQL.Add('ORDER BY id DESC');
  Open;
end;
end;
это на событие
Код:
SELECT TOP 2 id, q FROM main_tabl ORDER BY id DESC
это на в DATOQuery
Ответить с цитированием
  #10  
Старый 16.02.2013, 15:49
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 339
Версия Delphi: 10.4
Репутация: 429
По умолчанию

А ты не забываешь
Код:
ADOQuery1.Active := True;
или
Код:
ADOQuery1.Open;
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
Ответить с цитированием
  #11  
Старый 16.02.2013, 16:10
DOR DOR вне форума
Начинающий
 
Регистрация: 14.01.2011
Сообщения: 171
Версия Delphi: 7
Репутация: 10
По умолчанию

Ладно, пофиг. вот это работает, мне этого достаточно
Код:
procedure Tf_Osnov.FormShow(Sender: TObject);
begin
with DataModule1.Q_Main_Grid do
begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT TOP 2 id, q');
  SQL.Add('FROM main_tabl');
  SQL.Add('ORDER BY id DESC');
  Open;
end;
end;
Спасибо.
Ответить с цитированием
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter