[ popmilan76 @ 04.02.2015. 08:54 ] @
Kako da postavim da mi podaci u qreportu ne idu vertikalni,kao sto je dafault,vec horizontalno...Dakle da ne idu ovako
1
2
3
4

Vec ovako:

1,2,3,4
[ savkic @ 04.02.2015. 13:19 ] @
Možeš li dati neki konkretniji primer toga što ti treba, sliku najbolje?
[ captPicard @ 04.02.2015. 17:24 ] @
Probaj ovo (nisam testirao linkove, ali to je ta komponenta) QRAngledLabel
[ popmilan76 @ 04.02.2015. 17:28 ] @
Postavim qrdbtext na details band,i povezem ga sa bazom,tj,sa poljem koje se zove brojkaveza,gde sledeci podaci, 012,013,253,...i hocu da oni idu tako,horizontalno,a ne vertikalno,kako je po defaultu.Taj preview treba da izgleda ovako:
broj kaveza
_______________

012,013,125,563,564,..
[ captPicard @ 04.02.2015. 17:53 ] @
Onda ono šta sam ti napisao u PM. QRDBText ti prikazuje JEDNO polje. Ili napravi kako sam ti napisao ili napravi upit:

Code:
SELECT LIST(POLJE, ',') AS brojkaveza FROM TABLICA


ukoliko ti baza podržava LIST funkciju (možda se zove nekako drukčije) i onda ćeš dobiti rezultat: 1,2,3,4,5 itd.

Firebird LIST function
[ popmilan76 @ 05.02.2015. 07:33 ] @
Zar je moguce da ne postoji resenje da podaci idu horizontalno?Pomagajte ljudi.
[ captPicard @ 05.02.2015. 07:43 ] @
Pa dao sam ti dva moguća rješenja

(Drugo je da napraviš sam listu i pucaš to u QRLabel ili QRMemo npr.)
[ popmilan76 @ 05.02.2015. 07:47 ] @
Ono sa list ne prepoznaje,a ovo sa memo mi nije bas elegantno resenje...Da li postoji nesto u properties,da prikazuje horizontalno...ja to ne vidim...
[ captPicard @ 05.02.2015. 08:30 ] @
Ne postoji. QRDBText ti prikazuje jedno polje iz baze.
Možeš jedino dodati kolone na QReport (dupli klik na prazno na quickreportu i onda number of columns). Tada će ti detail band se prikazivati u kolonama, ali je pitanje da li će ti taj način odgovarati. Pokušaj.
[ popmilan76 @ 05.02.2015. 08:41 ] @
Ima opcija columns gde se pise koliko kolona hoces,i koliko god da ih stavis,nista se ne desava,sve je isto
[ captPicard @ 05.02.2015. 09:38 ] @
Stavi jedan detail band i vidit ćeš da se on postavi na prvu kolonu.
[ captPicard @ 05.02.2015. 09:40 ] @
Evo, ovako to izgleda:

[ popmilan76 @ 05.02.2015. 11:15 ] @
Da ,jasno mi je to,ali ce u tom slucaju da puni prvu kolonu,pa ce posle preci u drugu....a ja to necu,hocu da napuni prvi red,pa da predje u drugi red...
[ savkic @ 05.02.2015. 14:16 ] @
> Da ,jasno mi je to,ali ce u tom slucaju da puni prvu kolonu,pa ce posle preci u drugu....a ja to necu,hocu da napuni prvi red,pa da predje u drugi red...

Ti želiš da ti slogovi postanu polja? Koju bazu koristiš? Neke imaju komandu koja to može uraditi za tebe ali ništa ti ne fali da to sam uradiš.
Prosto dodaj još jedan dataset sa željenim poljima i onda _ručno_ prebacuj slogove u novi dataset (polja) i na kraju prikaži QR vezan za taj novi dataset.
[ popmilan76 @ 05.02.2015. 19:28 ] @
Baza mi je paradox.....
Ja hocu da mi kolone bude zapravo red.....da se podaci ispune horizontalno i kada zavrse taj red,da se puni drugi red
[ captPicard @ 05.02.2015. 19:48 ] @
Probaj ovo sta je kolega savkic rekao, trebalo bi raditi.
[ popmilan76 @ 06.02.2015. 09:09 ] @
Savkicu,ne razumem te najbolje...Jel moze malo pojasnjenje...
[ savkic @ 06.02.2015. 12:26 ] @
Ako sam te dobro ispratio ti zelis ovo:

www.tylogix.com/tylogix%20main...ble_Vertical_to_Horizontal.gif

Da radiš u MSSQL mogao bi to dobiti PIVOT SQL komandom, ali kako je kod tebe Paradox u pitanju moraš to uraditi ručno.
A ručno radiš tako što
a) napuniš dataset 1 sa originalnim podacima (dst1)
b) napraviš drugi (prazan) dataset sa željenim poljima recimo njih 5 (dst2)
c) napišeš kod, otprilike ovako (netestirano, pisem napamet)

Code:

var
   CurrFld: Integer;
begin
  ... // koraci a) i b)
   
  CurrFld := 0;
  dst1.First;

  while not dst1.Eof do 
  begin
    if dst2.State <> dsAppend then
      dst2.Append;
    
    dst2.Fields[CurrFld].AsString := dst1.Fields[0].AsString;    

    Inc(CurrFld);
    if CurrFld = dst2.Fields.Count then
    begin
      dst2.Post;
      CurrFld := 0;
    end;
   
    dst1.Next;
  end;
end;

[ popmilan76 @ 06.02.2015. 19:36 ] @
Ne znam,mislim da nisam dovoljno objasnio...Aj jos jednom da pokusam....Dakle imam polje koje se zove brojkaveza,i recimo upit koji treba da prikaze samo to polje(brojkaveza) where brojkaveza < 5.....Sada mi se desava ovako nesto

brojkaveza
0
1
2
3
4
a ja hocu ovako

brojkaveza
0 1 2 3 4

[ savkic @ 06.02.2015. 20:22 ] @
Meni to tvoje lici na pivot, ono sto sam objasnio. Pronadji/nacrtaj sliku toga sto ti trazis i posalji.
[ popmilan76 @ 06.02.2015. 20:31 ] @
evo ovako...ovo sto je zaokruzeno...tako da mi izlazi
[ captPicard @ 06.02.2015. 20:50 ] @
Code (delphi):
var
  strBrojkaveza: string;
...

with DataSet1 do
begin
  Close;
  SelectSQL.Text := 'SELECT brojkaveza FROM tablica WHERE uvjet = :nesto';
  Open;

  First;

  While not EOF do
  begin
    strBrojkaveza := strBrojkaveza + Fields[0].AsString + ', ';

    Next;
  end;
end;


I onda stavi na QReport u Band koji koristiš jedan TQRLabel i u njega upucaj strBrojkaveza. I stavi da QRLabel ima AutoSize, AutoStretch ili kako se već zove. To je ono šta sam ti odmah napisao na PM.

Mogao bi ti riješiti i sa DataSet-om na sličan način kako ti je kolega savkic rekao, ali ako hočeš najjednostavnije rješenje onda napravi ovako kako sam ti napisao.

p.s. kod je iz glave ali to je u principu to. Još samo sredi da strBrojkaveza ne završava sa ,
[ popmilan76 @ 06.02.2015. 22:13 ] @
Uspeo sam uz malo ispravki,i izbacio skroz detail band a obican qrlabel sam stavio...tako da ce sljakati....Hvala svima...
[ captPicard @ 06.02.2015. 22:17 ] @
Da, za ovo ti ne treba Detail band. Glavno da si rješio.