Einzelnen Beitrag anzeigen

Christian123

Registriert seit: 13. Jan 2005
18 Beiträge
 
#1

Update,Insert,Delete mit TQuery und TTable??

  Alt 6. Apr 2005, 13:20
Hallo Leute!
Ich schreib grad an einem kleinen Programm und bin delphi anfänger.

um Werte zu ändern mache ich folgendes:
Delphi-Quellcode:
strquery :='Update Adressen set name ="' + form1.Edit1.Text +
           '",vorname ="' + form1.Edit2.Text +
           '",strasse ="' + form1.edit3.Text +
           '",wohnort ="' + form1.Edit14.Text +
           '",telefon="' + form1.edit4.Text +
           '",email="' + form1.edit5.Text +
           '",gebdat="'+ form1.Edit13.Text +
           '" where id ="' + list.Strings[i]
           +'";';
form1.Query1.SQL.Clear;
form1.Query1.SQL.Add(strquery);
form1.Query1.ExecSQL;
Um neue Werte einzufügen:
Delphi-Quellcode:
  With form1.Table1 Do
    Begin
      Edit;
      Append;
      FieldByName('Name').AsString:= form1.edit1.Text;
      FieldByName('Vorname').AsString := form1.edit2.Text;
      FieldByName('Strasse').AsString:= form1.edit3.Text;
      FieldByName('Wohnort').AsString:= form1.edit14.Text;
      FieldByName('Telefon').AsString:= form1.edit4.Text;
      FieldByName('Email').AsString:= form1.edit5.Text;
      dat := StrToDateTime(form1.Edit13.Text);
      formatdatetime('dd.mm.yy',dat);
      FieldByName('GebDat').AsDateTime:= dat;
      Post;
   end;
Ich benutze TQuery Und TTable-Komponennten.
Das Problem ist nur,dass die Daten oftmals, wenn ich mein Programm kompiliere und rumteste und dann Delphi schließe, beim darauffolgenden Öffnen oder Öffnen des projekts am nächsten tag die aktualisierten Daten nicht mehr drin stehen,sondern noch die alten.

Nun die Frage:
Wie fügt man mit TQuery oder TTable korrekt Daten in eine Paradox(!!)-Tabelle ein und wie löscht man diese? Wie bleiben die Daten in den Tabellen? Wie sieht ein allgemeiner Ablauf aus? IN etwa so?
Delphi-Quellcode:
form1.Query1.SQL.Clear;
form1.Query1.SQL.Add(strquery);
form1.Query1.ExecSQL;
Gibt es zu diesem Bereich vielleicht hier im Forum ein kurzes Tutorial, weil es ja Grundlage ist?

Vielen Dank für Die Antworten und für die Hilfe.

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]
  Mit Zitat antworten Zitat