Quick Report da Sıra Numarası vermek

[mymenis]

1254 ALİ AKIN
2154 CEMİL NAS
1232 ELİF DENİZ

Quick Report da yukarıdaki gibi liste alabiliyorum. Fakat Listenin başına
aşağıdaki gibi sıra numarası vermek istiyorum.

1 1254 ALİ AKIN
2 2154 CEMİL NAS
3 1232 ELİF DENİZ
.....
..... şeklinde olması için ne yapmam gerekiyor ? teşekkürler

[ASE]

Detail banda bir adet QRSysData nesnesi koyup data özelliğini qrsDetailNo olarak ayarlayın....
Kolay gelsin...

[mymenis]

Teşekkür ederim hallettim güzel oldu. Tüm kayıtlarımı listelerken numaralı verdi. Fakat Tableden filtrelediğim kayıtları listemek istediğimde numaraları karıştırıyor
Örneğin;
Liste aldığımda numaralıyor
1 2131 ALİ AKIN
2 5464 DENİZ EFE
3 4556 HAKAN TURK
4 6546 VEYSEL AKHUN
5 6452 HASAN AKHUN
6 4552 KEMAL TAŞ
7 6546 YAVUZ AKHUN

Fakat Table'a filtre uyguladığım zaman (Soyadı 'AKHUN' Olanlar)
4 6546 VEYSEL AKHUN
5 6452 HASAN AKHUN
7 6546 YAVUZ AKHUN

Numaralar yukarıdaki gibi 4-5-7 oluyor. Filtrelenen kayıtlarında numaralarının 1-2-3-4.... şeklinde olmasını istiyorum

[selman]

selam
aslında sıra n vereceğiniz alanı db de tanımlayıp Autoincrement veya genarators la sayı numarasını birer birer artırabilirsiniz.Ve bunu qr.da gösterebilirsin.
ve
sıralama zaten 1,2,3....şeklinde gelicektir..
select*from tablo order by sno
kolay gelsin..

[ALUCARD]

selam
aslında sıra n vereceğiniz alanı db de tanımlayıp Autoincrement veya genarators la sayı numarasını birer birer artırabilirsiniz.Ve bunu qr.da gösterebilirsin.
ve
sıralama zaten 1,2,3....şeklinde gelicektir..
select*from tablo order by sno
kolay gelsin..

@selman hocam o zamanda filitrenen kayıtlarda sıra numarası 1-2-3.. diye gelmezki

yine 3-4-6-8.. gibi gelir

[mymenis]

Bu vereceğim sayı numaralarını (1-2-3..) db'ye girmeden QrLabel a sadece kodlarla yazmak istiyorum. Yani ben 100 tane kaydım olan table de filtreleme yaptığım gelen kayıt sayılarını(örneğin 3 kayıt buldu) bunları sol yanlarına

1 6546 VEYSEL AKHUN
2 6452 HASAN AKHUN
3 6546 YAVUZ AKHUN

şeklinde görünmesini istiyorum tşk.

[ASE]

Bunun için autocalc alan oluşturup raporu göstermeden önce 1 den başlayıp kayıt sayısı kadar +1 yapın. Sanırım en makul çözüm bu. Filtre değilde SQL kullanmış olsaydınız QRSysData yine normal sırasında verecekti numaraları.
Kolay gelsin....

[mymenis]

Quick report da Detail Bant olayına aşağıdaki kodu yazarak
CheckListBox1 da işaretlediğim bir alanı table da gösterip sıra numaralı rapar almak istedim.

procedure TForm2.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);

var
i:integer;

begin

for i:=0 to CheckListBox1.Items.Count-1 do
begin
if CheckListBox1.State=cbChecked then

PrintBand:=Table3SINIFI.AsString=CheckListBox1.Items;
end;

ASE arkadaşım dediniz ki "SQL kullanmış olsaydınız QRSysData yine normal sırasında verecekti numaraları"

SQL olarak nasıl bir kod yazmam gerecekti ... yardımcı olursanız sevinirim.

SQL den ne kadar kaçsamda yine de SQL olmadan olmuyor

[ALUCARD]

SQL den ne kadar kaçsamda yine de SQL olmadan olmuyor

sql den kaçmak demek program yazmaktan kaçmak demek bence

bunu aklınızdan cıkarın bence

sql yazmadan program yazılabilirmi bilemiyorum

[mymenis]

Sevgili ALUCARD arkadaşım

SQL kullanmadan elbette program yazılabilir.

Fakat SQL ile program yazmanın kolaylıklarını ve avantajlarının da farkındayım.

SQL dili üzerine çalışmaya başladım.

Benim amacım şu an için takıldığım konuda SQL kullanmadan nasıl halledebileceğimdir.Tşk.

[danaci]

verileri table dan bir sorgu ile çekin ve detail bantına count(saha) şeklinde ekle, her detail kayıttan sonra no bir artacağından sıralamış olursun
Kolay gelsin

[mymenis]

detail bantına " count(saha)" eklemem için nasıl bir kod yazmam gerekiyor

kısaca örneklendirebilir misiniz?

[mymenis]

Rapora listelediğim kayıtlara sıra numarası verebilmem için aşağıdaki gibi örnek bir kod buldum.

procedure TForm1.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);

const SiraNo:integer=0;

begin

inc(SiraNo); (HATA olan yer)
Qrlabel1.Caption:=inttostr(SiraNo);

end;

burada (HATA) takıldı.Şöyle bir hata verdi

Error] Unit1.pas(50): Left side cannot be assigned to

Cevaplarınız için teşekkürler

[selman]

selam
Bu hata UNit1.pas dosyası bulunamıyor diyo.Kolay gelsin

[hbahadir]

A constant (const) parameter is like a local constant or read-only variable.

const (sabit) olarak tanımlanmış bir değer üzerinde değişiklik yapamazsınız.