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 ,
F