Главная страница
    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.043 c
15-1190126099
alex_ant
2007-09-18 18:34
2007.10.28
Поможет ли тут система сопровождения версий?


15-1190734016
ProgRAMmer Dimonych
2007-09-25 19:26
2007.10.28
Вопрос по ресурсам


2-1191784004
Альберт
2007-10-07 23:06
2007.10.28
потоки


4-1177871978
Плиз_не_пинайте
2007-04-29 22:39
2007.10.28
Нужен файл TLHelp32.dcu


2-1191823856
JohnKorsh
2007-10-08 10:10
2007.10.28
Как использовать widechar в memo или richedit.





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