Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Select Sum(Fieldname) From Table (https://www.delphipraxis.net/198571-select-sum-fieldname-table.html)

DeddyH 14. Nov 2018 22:11

AW: Select Sum(Fieldname) From Table
 
Ersetze mal die eckigen Klammern bei FieldByName durch runde.

Papaschlumpf73 14. Nov 2018 22:12

AW: Select Sum(Fieldname) From Table
 
Probiere es mal so... (Nicht getestet)

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var item:TListItem;
 begin
  con.LibraryLocation:=ExtractFilePath(application.ExeName)+'sqlite3.dll';
  con.Database:=ExtractFilePath (application.ExeName)+'test.sqlite';
  con.Connected:=true;
  Query1.SQL.Clear;
  Query1.Params.Clear;
  Query1.SQL.Text :='SELECT * FROM Versuch';
  Query1.Open;
  while not Query1.Eof do
   begin
   Item:=Form1.listview1.items.Add;
   Item.Caption:=(Query1.FieldByName('id').AsString);
   Item.SubItems.Add(Query1['Test']);
   Item.SubItems.Add(Query1['Test2']);
   Query1.Next; //hier geht es zum nächsten Datensatz; ohne das wird es eine Endlosschleife
   end;
  Query1.Close; //Query erst schließen, wenn die Schleife fertig ist
  Query1.SQL.Text:='Select SUM(Test) as blabla FROM Versuch';
  Query1.Open;
  Edit1.Text:=Query1.FieldByName['blabla'].asString;
  Query1.Close;
end;
end.

Amenovis 14. Nov 2018 22:16

AW: Select Sum(Fieldname) From Table
 
JEEEETTTTTTTTTTTTTTTZZZZZZZZZZZZZZZZTTTTTTTTTTT und für sowas 2 Tage mhh es gibt momente da möchte ich den Laptop mit delphi aus dem Fenster werfen mhh


Vielen vielen Dank und auch wenn meine alten Beiträge irgendwie weg sind du hast mir immer super geholfen DeddyH :) DANKE DANKE DANKE

Dann kann ich mich jetzt mit dem Nächsten rumärgern dem Datums format in db und zurück aber da Setz ich mich erstmal selbst dran um den Fehler zu finden :) :thumb:

Danke PapaSchlumpf der Fehler diesmal waren wirklich a) Das selbe DataSet und B) [] statt ()

DeddyH 14. Nov 2018 22:19

AW: Select Sum(Fieldname) From Table
 
Gern geschehen :)

Amenovis 14. Nov 2018 22:20

AW: Select Sum(Fieldname) From Table
 
Lösung für andere :

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
platzhalter:string;
 begin
  con.LibraryLocation:=ExtractFilePath(application.ExeName)+'sqlite3.dll';
  con.Database:=ExtractFilePath (application.ExeName)+'DEINEDB.sqlite';
  con.Connected:=true;
  Query1.SQL.Text:='Select SUM(Spaltenname) as platzhalter FROM Tabellenname';
  Query1.Open;
  Edit1.Text:=Query1.FieldByName('platzhalter').asString;
  Query1.Close;
  end;
  end.

hoika 15. Nov 2018 10:18

AW: Select Sum(Fieldname) From Table
 
Hallo,
oder einfach so.
Delphi-Quellcode:
Edit1.Text:=Query1.Fields[0].AsString;

mkinzler 15. Nov 2018 10:32

AW: Select Sum(Fieldname) From Table
 
Zitat:

Zitat von hoika (Beitrag 1418124)
Hallo,
oder einfach so.
Delphi-Quellcode:
Edit1.Text:=Query1.Fields[0].AsString;

Birgt allerdings die Gefahr, das später die Abfrage geändert wird und sich der Index dadurch verschiebt.

hoika 15. Nov 2018 10:44

AW: Select Sum(Fieldname) From Table
 
Hallo,
korrekt, deshalb steht bei mir immer ein Kommentar drüber ;)
Das ganze sollte man auch nur bei einem einzigen count(*) machen, weil ja ohne einen Aliasnamen die Datenbank irgendeinen Feldnamen generiert.

Amenovis 15. Nov 2018 17:58

AW: Select Sum(Fieldname) From Table
 
Zitat:

Edit1.Text:=Query1.Fields[0].AsString;
Die Zeile hatte ich fast am Ende mit dem Lösungsweg des gezeigten Codes mhh da kam auch nur ein Fehler vermutlich wegen dem selben DataSet bzw query.next---end;---query.close


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:17 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz