Entwickler-Ecke :: Thema anzeigen

Robby - Sa 05.11.05 13:17
Titel: InputQuery Abfrage

Hallo zusammen,
Ich brauche Hilfe
Ich habe 2 Datenbänke zusammengefasst, nun möchte ich mit einer InputQuery abfrage mein letzter Filter setzen Stuecklisten.Znr = InputQuery ich bekomme immer eine Fehlermeldung.
„Merkmal nicht verfügbar“

Und wie kann ich die Query Datenbank in den Editier Modus bringen um Daten ändern zu können
Ich Freue mich schon auf eure Hilfe
Robby
Hier mein Code

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

var
stName,text_t:string;
begin
stName:='';
 text_t:='Bitte Stücklistennummer  eingeben';
if InputQuery(text_t,'',stName)then

Query.sql.Text:='Select lager.* From stueckliste inner join lager on stueckliste.pos = lager.pos and stueckliste.znr =  Quotedstr(stName)';
Query.active:=true;
end;

Moderiert von raziel: Delphi-Tags hinzugefügt.

smiegel - Mo 07.11.05 09:21

Hallo,

so wie es aussieht, ist Deine Query nicht ganz korrekt. Folgendes sollte funktionieren:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

  if InputQuery(text_t, '', stName) then  
  begin
    Query.SQL.Text:=
      'SELECT lager.* FROM stueckliste inner join lager on stueckliste.pos = lager.pos'+#13#10+
      Format('WHERE (stueckliste.znr=%s)', [Quotedstr(stName)]);  
    Query.Open;
  end else ShowMessage('Keine Nummer angegeben!`);

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!