AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Inhalt von Editfeldern zu Accessdatenbank(Tabelle) übergebe
Thema durchsuchen
Ansicht
Themen-Optionen

Inhalt von Editfeldern zu Accessdatenbank(Tabelle) übergebe

Ein Thema von alnourx · begonnen am 10. Dez 2008 · letzter Beitrag vom 12. Dez 2008
Antwort Antwort
Seite 2 von 2     12   
alnourx

Registriert seit: 26. Nov 2008
26 Beiträge
 
#11

Re: Inhalt von Editfeldern zu Accessdatenbank(Tabelle) überg

  Alt 11. Dez 2008, 14:53
Ich habe versucht die Daten zur Accessdatenbanktabelle zu übergeben aber ich habe leider folgendes Problem:

Ich habe den Code so geschrieben:
Delphi-Quellcode:
procedure TForm1.Button7Click(Sender: TObject);
begin
      ars.SQL.Clear ;
      
      ars.SQL.Add('Insert into table1 (Breite) Values ('+QuotedStr(edit1.Text)+')');
       ars.SQL.Add('Insert into table1 (Länge) Values ('+QuotedStr(edit2.Text)+')');
      ars.SQL.Add('Insert into table1 ( Gewicht) Values ('+QuotedStr(edit3.Text)+')');
       ars.SQL.Add('Insert into table1 (Höhe) Values ('+QuotedStr(edit4.Text)+')');
      ars.SQL.Add('Insert into table1 (Menge) Values ('+QuotedStr(edit5.Text)+')');
      ars.SQL.Add('Insert into table1 (Ergebnis1) Values ('+QuotedStr(edit6.Text)+')');
      ars.SQL.Add('Insert into table1 (Ergebnis2) Values ('+QuotedStr(edit7.Text)+')');
      
      ars.ExecSQL;
      ars.Close;
end;
Wenn ich den Inhalt der Editfeldern zur Tabelle übergeben wollte, dann zeigt mit das Programm folgenden Fehler „ Fehlendes Semikolon ( am Ende der SQL-Anweisung.
Ich verstehe das nicht, ich habe schon ein Semikolon am Ende der Anweisung, aber er zeigt den Warnfehler trotzdem.
Ich bitte euch um Vorschläge
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#12

Re: Inhalt von Editfeldern zu Accessdatenbank(Tabelle) überg

  Alt 11. Dez 2008, 15:00
Warum nicht in einem Insert und/oder mit Parametern?
Delphi-Quellcode:
ars.SQL.Text := 'Insert into table1 (Breite, Längem ... ) Values (:laenge, ...);';
...
ars.Parameters.ParamByName('Breite').Value;
...
ars.ExecSQL;
Markus Kinzler
  Mit Zitat antworten Zitat
alnourx

Registriert seit: 26. Nov 2008
26 Beiträge
 
#13

Re: Inhalt von Editfeldern zu Accessdatenbank(Tabelle) überg

  Alt 11. Dez 2008, 15:58
Ich habe den Code so geschrieben, wie du mir vorgeschlagen hast, ich habe eigentlich keinen Warnfehler mehr , aber der Inhalt der Editfeldern wurden nicht zu Accessdatenbanktabelle übergeben

Delphi-Quellcode:
procedure TForm1.Button7Click(Sender: TObject);
begin

ars.SQL.Text := 'Insert into table1 (Breite, Länge, Gewicht, Höhe, Menge, Ergebnis1, Ergebnis2 ) Values (:Breite, :Länge, :Gewicht, :Höhe, :Menge, :Ergebnis1, :Ergebnis2);';
ars.Parameters.ParamByName('Breite').Value;
ars.Parameters.ParamByName('Länge').Value;
ars.Parameters.ParamByName('Gewicht').Value;
ars.Parameters.ParamByName('Höhe').Value;
ars.Parameters.ParamByName('Menge').Value;
ars.Parameters.ParamByName('Ergebnis1').Value;
ars.Parameters.ParamByName('Ergebnis2').Value;

ars.ExecSQL;
sorry, dass ich dich gestört habe.
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#14

Re: Inhalt von Editfeldern zu Accessdatenbank(Tabelle) überg

  Alt 11. Dez 2008, 16:10
Delphi-Quellcode:
procedure TForm1.Button7Click(Sender: TObject);
begin
  ars.SQL.Text := 'Insert into table1 (Breite, Länge, Gewicht, Höhe, Menge, Ergebnis1, Ergebnis2 ) Values (:Breite, :Länge, :Gewicht, :Höhe, :Menge, :Ergebnis1, :Ergebnis2);';
  ars.Parameters.ParamByName('Breite').Value := EditBreite.Text;
  ars.Parameters.ParamByName('Länge').Value := EditLaenge.Text;

  //... usw.
  ars.ExecSQL;
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#15

Re: Inhalt von Editfeldern zu Accessdatenbank(Tabelle) überg

  Alt 11. Dez 2008, 16:12
Da hab ich was vergessen:
ars.Parameters.ParamByName('Breite').Value := edit1.Text; usw.
Markus Kinzler
  Mit Zitat antworten Zitat
alnourx

Registriert seit: 26. Nov 2008
26 Beiträge
 
#16

Re: Inhalt von Editfeldern zu Accessdatenbank(Tabelle) überg

  Alt 12. Dez 2008, 08:21
Ich will mich bedanken für euere Hilfe
das Programm funktioniert jetzt wie ich möchte.
Ich habe vor zwei Monaten mit Delphi angefangen zu lernen, und finde diese Sprache sehr schön, der Anfang ist immer schwer, aber man muss geduld haben
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:13 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz