Forum: Datenbanken
by gemy,
24. Feb 2019
Dr Jack: Danke, hat sich aber schon erledigt. :)
Forum: Datenbanken
by gemy,
18. Feb 2019
Danke delbor.
Ich bin gerade auf der Arbeit und setze das gleich heute Abend um.
Natürlich poste ich das Ergebniss dann 🙂
Forum: Datenbanken
by gemy,
18. Feb 2019
@Delbor : Danke, ich schreibs nochmal um. Habe das mit dem Datenmodul in einem video schon gesehen, schien mir aber noch nicht von nöten.
Wenn ich jetzt eine class erstelle und dort private und drunter die variablen packe, dann kann ich z.B. mit einem Hex editor von ausen die eingegeben werte nicht mehr auslesen ?
z.b.
type
Tuserdb = class
private
Forum: Datenbanken
by gemy,
18. Feb 2019
Natürlich speichere ich passwörter nicht in plain text. Ist ja auch noch nicht fertig.
Forum: Datenbanken
by gemy,
17. Feb 2019
Also ich bin jetzt durchgestiegen !
Schickt man ein
SQLQuery1.SQL.Text := 'select last_insert_rowid()';
SQLQuery1.open;
ab, und schaut sich danach mit SQLQuery1.GetFieldNames(names); an, so sieht man das der Eintrag 0 "Column0" heisst.
Im regelfall würde man z.B. so schreiben SQLQuery1.SQL.Text :='select id,website, mainurl,username from users. Schaut man sich dann mit...
Forum: Datenbanken
by gemy,
17. Feb 2019
Das hat auch funktioniert.
Der Moderator schaltet leider meine Beiträge nicht frei die etwas länger sind.
Forum: Datenbanken
by gemy,
17. Feb 2019
SQLQuery1.SQL.Add('SELECT last_insert_rowid() as my_last_id');
mag er auch nicht. Das feld my_last_id wurde nicht gefunden.
Forum: Datenbanken
by gemy,
17. Feb 2019
CREATE TABLE users (
id INTEGER NOT NULL
PRIMARY KEY AUTOINCREMENT,
website VARCHAR UNIQUE
NOT NULL,
mainurl VARCHAR UNIQUE
NOT NULL,
username VARCHAR UNIQUE,
password VARCHAR,
dbname VARCHAR UNIQUE
Forum: Datenbanken
by gemy,
17. Feb 2019
Habe in der Datenbank 'id' ind 'my_last_id' geändert. Nun kennt er in
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('SELECT last_insert_rowid() as my_Last_id FROM users');
SQLQuery1.open;
if not sqlquery1.IsEmpty then begin
ID := SQLQuery1.FieldByName('My_Last_id').AsInteger;
end;
SQLQuery1.Close;
Forum: Datenbanken
by gemy,
17. Feb 2019
Habe davor ein SQLQuery1.SQL.Clear;
ändert leider nichts :(
Forum: Datenbanken
by gemy,
17. Feb 2019
Habe nun in der Datenbank 'id' nach 'my_last_id' umbenannt.
SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add('SELECT last_insert_rowid() as my_Last_id FROM users');
SQLQuery1.open;
if not sqlquery1.IsEmpty then begin
ID := SQLQuery1.FieldByName('my_Last_id').AsInteger;
end;
SQLQuery1.Close;
Forum: Datenbanken
by gemy,
17. Feb 2019
Hallo!
ich werde verrückt. Ich finde den Fehler hier einfach nicht.
Ich habe eine Datenbank erstellt mit SQLiteStudio die folgendermaßen aussieht :
https://www.delphipraxis.net/attachment.php?attachmentid=50707&stc=1&d=1550400520
Nun füge ich mit insert eine Zeile hinzu: