Name in DB suchen

[Spurius]

Hallo,
wie kann ich einen Namen in einer Paradox 7 Db suchen?
In der Spalte Nachname? Ich hab auch schon hier im Forum gesucht, aber bin nicht weitergekommen. Soviel ich weiss, geht das über ein query mit SQL, aber ich weiss nicht, wie ich das machen soll.
Ein kleines Beispiel mit Code wäre nett.
Thx
Spurius

[MrSpock]

Hallo Spurios,

suche einmal nach Locate, damit kannst du nach jedem beliebigen Feldinhalt suchen. Ist das zu durchsuchende Feld ein Schlüsselfeld, kannst du auch Findkey benutzen.

[Alexander]

Hi,
ich kenne mich zwar nciht mit Datenbanken unter Delphi aus, aber der Query müsste so Aussehen:

SQL-Code:

Select * from tabelle where nachname=deinname

Wenn du nur nach Ähnlichkeiten suchen willst, schau dir LIKE an.

[kiar]

hallo,

SQL-Code:

select * from Deinetabelle where nachname like 'm%'

sucht in deiner tabelle alle nachnamen, die mit m anfangen.

also als erstes ziehst du eine query auf deine form.

Delphi-Quellcode:

  query1.close;
  query1.sqlclear;
  query1.sqladd('dann den sql code rein');
  query1.execsql;

mal so aus dem bauch raus und nicht getestet.

raik

[citybreaker]

Hier stehts wie bei einer Paradox geht.

Url: www.delphi-source.de

[Spurius]

Hallo,
erstmal Danke für die Antworten. Mit locate geht es. Aber mich würde interesssieren, wie es mit SQL geht :-D
Hier mal mein Code:

Delphi-Quellcode:

 query1.Active := false;
 query1.SQL.Clear;
 query1.SQL.Text := 'select * from adressen.db where Vorname=irgendeinName';
 query1.Active := true;

Aber ich bekomm da kein Ergebnis, obwohl es den Name in der DB gibt :?:
Ich hab auf dem Form ein Table, ein Query und ein DataSource.
Gruß
Spurius

[r_kerber]

Sollte so aber im Prinzip funktionieren. Was steht denn in der SQL-Property bevor Du die Query öffnest?
BTW: Ein beliebter Fehler ist, das die DataSource auf die TTable nicht und nicht auf die TQuery! Für ein SQL-Statement benötigst Du keine TTable-Komponente!

[Spurius]

Hallo,
also im SQL-Editor steht nichts am Anfang. Das Table ist weg, die Datasource zeigt auf das query, und das Qeury hat keine DataSource, da sonst irgendsoein Fehler kommt, dass keine zirkulären Datenverbindungen erlaubt sind. Und auf dem Form ist ein DB-Edit, dessen DataSource die DataSource auf dem Form ist und dessen DataField Vorname ist.
Gruß
Spurius

[kiar]

versuche mal statt

SQL-Code:

 query1.SQL.Text := 'select * from adressen.db where Vorname=irgendeinName';

das

SQL-Code:

query1.SQL.Text := 'select * from adressen.db where ''Vorname=irgendeinName''';

raik

[Spurius]

Geht auch nicht.Ich hab das so gemacht:
...vorname = "irgendeinName"; - Allerdings ohne Erfolg!
Kann mir vielleicht jemand ein Bsp.-Prog schicken?
Wäre echt nett.
Thx
Spurius

[r_kerber]

Delphi-Quellcode:

query1.SQL.Text := 'select * from adressen.db where Vorname=' + QuotedStr (sIrgendEinName);

wobei sIrgendEinName eine String-Variable ist. Und die Query sollte auf eine TTable zeigen mit der Du zu einem BDE-Alias verbindest.

[czapie]

Ähm,
ich bin mir nicht ischer aber muß es nicht heißen

Datenbank.Tabelle.Spalte

?

Czapie.

[Spurius]

Also wie jetzt? Doch ein Table? Kann mir nicht einer ein Bsp.-Prog schicken? Nur was einfaches, wo ich seh, wie es funktioniert.
Wäre echt nett von euch!
Gruß
Spurius

[kiar]

hier der quelltext aus der hilfe

Delphi-Quellcode:

Query1.Close;

Query1.SQL.Clear;
Query1.SQL.Add('Delete from Country where Name = ''Argentina''');
Query1.ExecSQL;

für delete setzt du select * from

[Spurius]

Hallo,
ich glaub mein Problem ist weniger der SQL-Code, sondern wie ich das im Programm unterbringe. Z.b. mit oder ohne Table, wer kriegt von wem die DataSource etc. ...
Also, falls mir einer ein Bsp. schicken würde, würde mir das wahrscheinlich sehr helfen.
Meine Mail ist [e-mail]
Gruß
Spurius

[kiar]

du ziehst einfach eine query-komponente auf deine form und schoch hast du alles was du brauchst. wenn die query markiert ist mal f1 drücken und dir wird geholfen.

raik

[Spurius]

Hallo,
es geht!!! :-D
Aber ich finde die einträge nur, wenn die Groß- und Kleinschreibung stimmt. auch mit "like"
werden die Einträge sonst nicht gefunden. Kann ich das irgendwie ändern?
Gruß
Spurius

[MrSpock]

Hallo Spurius,

dafür kannst du Upper benutzen, dass alle Buchstaben in Großbuchstaben umwandelt:

Delphi-Quellcode:

SQL := 'Select * from tabelle where Upper(nachname)='+QuotedStr(UpperCase(deinname));