Avatar uživatele
Pokročilý

Jak v Delphi exportovat horní lištu s nazvy s Dbgrid ?

Zravím , mam dotaz ohledně delphi
Mam zde dbgrid a přes button a script do něj vypíšu hodnoty z SQL

Var
i: integer;
str: string;
stl: TStringList;
begin


adoQuery1.SQL.Clear;
adoQuery1.SQL.Add('select datum, sum(celkem) from tabulka1 group by datum ;');
adoQuery1.Active := True;

stl:= TStringList.Create;
Try
With DBGrid1.DataSource.DataSet Do
begin
First;
while not Eof do
begin
str:= ';'+Fields[0].AsString+';';
for i:= 1 to FieldCount-1 do
str:= str+';'+Fields[i]. AsString+';';
sstl.Add(str);
Next;
end;
First;
end;
stl. SaveToFile('C: \data\test. csv');
Finally
stl.Free;
End;

výsledkem je že se mi exportuje csv kde mam vypsaný datum a částky ale už mi chybí ten první řádek jakoby popisy

datum částka // tyto řádky
13.1.2019 4000

prosím jak to doplnit?

Uzamčená otázka – ohodnoťte nejlepší odpověď symbolem palce.

Otázka ještě nemá žádnou odpověď.

Zajímavé otázky v kategorii Počítače a internet

Přihlásit se

Položte otázku, odpovězte, zapojte se, …

začněte zde

Reklama

Kvalitní odpovědi v: Počítače a internet

Zlatý Bedy 1527
Zlatý Michal Kole 1199
Zlatý ge0rge 1181
Zlatý mosoj 1096
Zlatý Hlada 1023
Zlatý led 996
Zlatý gecco 904
Zlatý www 828
Zlatý badisko 817
Stříbrný cochee 725

Zobrazit celkový žebříček

Facebook

 

Váš požadavek se vyřizuje, počkejte prosím.