Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.28;
Скачать: [xml.tar.bz2];

Вниз

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

 
Штучка   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.49 MB
Время: 0.044 c
2-1191433058
aaaaa
2007-10-03 21:37
2007.10.28
про формы


15-1190920089
oxffff
2007-09-27 23:08
2007.10.28
GC в Delphi.


15-1190522105
Nastena
2007-09-23 08:35
2007.10.28
про Windows Vista


2-1191603024
smartleds
2007-10-05 20:50
2007.10.28
Господа, подскажите плз как програмно убрать с формы


1-1187252176
Gbp
2007-08-16 12:16
2007.10.28
Как заставить нормально работать форму в службе (service?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский