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;