AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Paradox Tabelle durchsuchen
Thema durchsuchen
Ansicht
Themen-Optionen

Paradox Tabelle durchsuchen

Ein Thema von redrum · begonnen am 18. Sep 2004 · letzter Beitrag vom 18. Sep 2004
Antwort Antwort
redrum

Registriert seit: 18. Sep 2004
4 Beiträge
 
#1

Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 17:33
Hallo,

ich bin wirklich gerade erst angefangen mit Delphi..
Ich habe es immerhin hinbekommen daten in eine paradox db zu schreiben. (Was auch wohl für einsteiger ok ist )

Es handelt sich um ein Programm, wo man bei einem Wareneingang sn's der ware einscannen kann, und einstellen kann
von wem es gekommen ist.

z.b
SN: 945983489348
VON: Computerblubb Vertrieb

Nun brauch ich eure hilfe..
ICh weiß nicht wie ich es mach..

Also ich habe um später (falls die ware mal zurück kommt) rauszufinden woher die ware gekommen ist
Ich habe also ein Text feld gemacht, mit der db verbunden.. das geht auch (da soll stehen woher es kommt)
Darunter ist ein feld wo man die SN eingeben soll und dann auf den button "suchen" klicken soll..

Wie geht das nun genau ?
Ich habe keine ahnung wie ich delphi dazu bringe das wenn man auf den button klickt die zuvor eingegebne sn in der db gesucht wird und dann ausgegeben..

Könnt ihr mir helfen?

Vielen dank schonmal..
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#2

Re: Paradox Tabelle durchsuchen.........

  Alt 18. Sep 2004, 17:40
Hi und herzlich willkommen in der DP ,

das geht mit einer ganz einfachen SQL-Abfrage:

Delphi-Quellcode:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT Sn, Name FROM <Tabellenname> WHERE (Sn = :snummer)');
Query1.ParamCheck := true;
Query1.ParamByName('snummer').AsInteger := StrToInt(Edit1.Text);
Query1.Open
Sn ist die Spalte in der die Seriennummern drinne stehen.
<Tabellenname> ist der Name deiner Tabelle.

Query1.ParamByName('snummer').AsInteger := StrToInt(Edit1.Text); Wenn dein Feld mit den Seriennummern ein Integerfeld ist, dann kannst du das so lassen wie ich es geschrieben habe, ansonsten musst du es anpassen.

*MFG*

Manu


[edit] Bitte entferne doch die überflüßigen Punkte in der Überschrift. Nutze hierfür die Edit-Funktion in deinem ersten Post [/edit]

[edit2] Begrüßung [/edit2]
  Mit Zitat antworten Zitat
redrum

Registriert seit: 18. Sep 2004
4 Beiträge
 
#3

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 17:49
danke,
Leider weiß ich nicth wie ich das im Zusammenhang mit dem Button einbinde..
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#4

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 17:50
Mach nen Doppelklick auf deinen Button und kopiere meinen Code in die Button-Click-Procedure.


Nimm mich mal im ICQ an.
  Mit Zitat antworten Zitat
redrum

Registriert seit: 18. Sep 2004
4 Beiträge
 
#5

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 18:00
Danke,

irgendwas stimmt noch nicht.
Als anhang ist ein Bild (keine angst das is noch älter.. query etc ist alles drinn.. )
Bei "Vertrieb" soll aus der db halt gelesen werden das die sn xxx vom xxx vertrieb kommt..

(Irgendwie bin ich verwirrt.. )
Miniaturansicht angehängter Grafiken
hmm_198.jpg  
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#6

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 18:02
Hi,

irgendwie versteh ich jetzt nicht, was bei dir nicht geht. Könntest du dein Problem mal konkret beschreiben?
  Mit Zitat antworten Zitat
Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#7

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 19:23
Hallo redrum,

zunächst einmal herzlichen willkommen im Delphi PRAXIS Forum.

Wenn du schon das Feld mit der Tabelle verbunden hast, arbeitest du ja schon mit einem TTable Objekt und ein zusätzliches TQuery Objekt ist gar nicht nötig. TTable kennt die Methode FindKey, um den Datensatz zum aktuellen Datensatz zu machen, der den übergebenen Schlüsselwert hat.

Delphi-Quellcode:
if myTable.FindKey([snummer]) then
  { Satz gefunden und ausgewählt }
else
  { Satz existiert nicht.}
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat
redrum

Registriert seit: 18. Sep 2004
4 Beiträge
 
#8

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 19:46
Danke, Spider hat mir geholfen..
Nun läuft alles wie es soll

Andere frage...

Ich habe 5 Text felder.
In jedem feld stehen daten aus einer db.

Aber leider steht in jedem Feld das selbe..

z.b:
Feld1: Name: Peter Bux
Feld2: Name: Peter Bux
etc

es soll aber so sein das es immer weiter geht, also immer die nächste spalte oder wie das heisst ausgelesen wird
z.b:
Feld1: Name: Peter Bux
Feld2: Name: Hannes Plöd
Feld3: Name: Lila Vomstern

etc..
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#9

Re: Paradox Tabelle durchsuchen

  Alt 18. Sep 2004, 19:58
Zitat von redrum:
....Andere frage...
Hai redrum,

bei uns gibt es denn Grundsatzt: "Pro Frage einen Thread"

Zitat:
Feld1: Name: Peter Bux
Feld2: Name: Hannes Plöd
Feld3: Name: Lila Vomstern
Schaue Dir doch einmal das DBGrid (Registerkarte: Datensteuerung) an.
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Antwort Antwort


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 08:45 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