Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.10.28;
Скачать: CL | DM;

Вниз

Как сделать нумерацию?   Найти похожие ветки 

 
Штучка   (2007-10-09 12:15) [0]

Есть список, нужно строки пронумеровать

DataSet.FieldByName("number").AsInteger :=??????

а дальше что писать???


 
ЮЮ ©   (2007-10-09 12:21) [1]

Если это строка из обраmjтчика OnCalcFields, поле number ftCalculated и DataSet поддерживает RecNo, то
 DataSet.FieldByName("number").AsInteger := DataSet.RecNo.

P.S. только зачем?


 
Штучка   (2007-10-09 12:26) [2]

Я уже исполльзовала DataSet.RecNo. Выводит так:
-1,
1,
2....
...147,
-1
При abs(DataSet.Recno), нумерция идет нормально, только в последнюю строчку опять вставляется 1.

P.S.Ну как это зачем, при выгрузке в Excell создается таблица, надо проставить нумерацию строк (как обычно это делается в документах)


 
Штучка   (2007-10-09 12:28) [3]

Вернее эта таблица находится в DBGridEh


 
clickmaker ©   (2007-10-09 12:31) [4]

А почему бы не делать это при выгрузке? Как ее делаешь?


 
ЮЮ ©   (2007-10-09 12:32) [5]

> при выгрузке в Excell создается таблица

1) В Excell-е строки и так проеумерованы.
2) Вствлять этот номер при выгрузке, коль так приспичило.


 
Штучка   (2007-10-09 12:43) [6]

Так нужно чтобы и в DBGridEh нумерация была, т.к. очень много строк - тяжело искать


 
Штучка   (2007-10-09 12:44) [7]


> 1) В Excell-е строки и так проеумерованы.


Так при печати документа тоже нужна нумерация, а разговор вообще то не про Эксель


 
Desdechado ©   (2007-10-09 12:47) [8]

> при печати документа тоже нужна нумерация
Во всех репортерах есть возможность вставить нумерацию строк.


 
clickmaker ©   (2007-10-09 12:51) [9]


> очень много строк - тяжело искать

фильтр может прикрутить?
И что за СУБД?


 
Штучка   (2007-10-09 12:54) [10]

Уже и не знаю как объяснить:

procedure stat;
var
 cq: cquery;
begin
 Form1.Label14.Caption := IntToStr(Form1.DBGridEh1.DataSource.DataSet.recordCount);
end;

procedure TForm1.ADOmainCalcFields(DataSet: TDataSet);
begin
 stat;
 DataSet.FieldByName("number").AsInteger := ?????????????????
end;

Так понятно будет?


 
Маша Шрайбер   (2007-10-09 12:59) [11]

>>Так нужно чтобы и в DBGridEh нумерация была

Кому нужна и зачем? Вы можете обоснованно объяснить? Без детского сада "хочу"?


 
Штучка   (2007-10-09 13:12) [12]

ну ё-маё. есть таблица со столбцами: номер, ФИО, адрес и т.д.  Поэтому мне нумерация и нужна чтобы ее вставить. Обосновано? Необходимо видеть сколько строк есть


 
clickmaker ©   (2007-10-09 13:13) [13]


> Необходимо видеть сколько строк есть

а это что?
Form1.Label14.Caption := IntToStr(Form1.DBGridEh1.DataSource.DataSet.recordCount);


 
Штучка   (2007-10-09 13:16) [14]

статистика, при фильтровке чтобы указывалось количество строк (все это описывается в других процедурах)


 
Маша Шрайбер ©   (2007-10-09 13:17) [15]

Понятно. Детский сад.


 
clickmaker ©   (2007-10-09 13:23) [16]


> [14] Штучка   (09.10.07 13:16)

открою страшную тайну: при определенных условиях номера строк можно вытащить уже на этапе запроса
Не стоит зацикливаться на OnCalcFields


 
Штучка   (2007-10-09 13:24) [17]

раз это детский сад, что не можешь сама ответ дать? А этот пункт обязателен в таблице. я бы тебе скинула скриншот, убедилась бы тогда, что эта гребаная нумерация действительно нужна.


 
Штучка   (2007-10-09 13:26) [18]

знать бы еще как этот запрос написать на sql


 
clickmaker ©   (2007-10-09 13:31) [19]


> [18] Штучка   (09.10.07 13:26)

что за СУБД? есть ли уникальный ID у записи?


 
Штучка   (2007-10-09 13:33) [20]

sql server, ID есть


 
clickmaker ©   (2007-10-09 13:42) [21]


> [20] Штучка   (09.10.07 13:33)
> sql server

select Id,
(select count(*) from SomeTable t2
 where t2.Id<= t1.Id) as RowNo
from SomeTable t1
order by Id

в общем случае, в order by и в операции <= должно быть одно и тоже поле


 
Штучка   (2007-10-09 14:01) [22]


> clickmaker

СПАСИБО!



Страницы: 1 вся ветка

Текущий архив: 2007.10.28;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.047 c
15-1190773341
Slider007
2007-09-26 06:22
2007.10.28
С днем рождения ! 26 сентября 2007 среда


9-1162110637
Zlodey
2006-10-29 11:30
2007.10.28
DelphiX


2-1191588575
olevacho_
2007-10-05 16:49
2007.10.28
Представление данных


2-1191312738
webpauk
2007-10-02 12:12
2007.10.28
PopupMenu.Items.Width


15-1191518953
Nic
2007-10-04 21:29
2007.10.28
Total Commander - иногда произвольно закрывается





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский