Forum: Programmieren allgemein
by Amenovis,
14. Nov 2018
Lösung für andere :
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';
Forum: Programmieren allgemein
by Amenovis,
14. Nov 2018
procedure TForm1.FormCreate(Sender: TObject);
var
item:TListItem;
blabla:string;
begin
con.LibraryLocation:=ExtractFilePath(application.ExeName)+'sqlite3.dll';
con.Database:=ExtractFilePath (application.ExeName)+'test.sqlite';
con.Connected:=true;
Query1.SQL.Text:='Select SUM(Test) as blabla FROM Versuch';
Query1.Open;
Forum: Programmieren allgemein
by Amenovis,
14. Nov 2018
Spalte Test
Wert1 = 2
Wert2 = 10
Wert3 = 33
Ergebnis im Edit Feld sprich 45 Ich weiss für die meisten hier ein Schmunzler ich sitz da wirklich so lange dran ich hab es mit for schleifen mit while schleifen versucht irgendwas war immer falsch dann fand ich die Zeile und auch die will nicht ... Hab die Nerven echt Blank
hatte ich auch schon weg die zeilen sind nur damit ich sehe was...
Forum: Programmieren allgemein
by Amenovis,
14. Nov 2018
die waren vorhin noch drin mir brummt der Kopf *Sorry
var
blabla:String;
id:Integer;
mein Problem fängt erst hier an
Query1.SQL.Text:='Select SUM(Test) as blabla FROM Versuch';
Query1.Open;