Delphi- ερωτημα SQL με TADOQuery

[Μέλας Κύων]

Δουλέυω με Delphi 2007 και πάνω σε ADO αντικειμενα. Σε Β.Δ. MS-ACCESS έχω πχ ενα πινακα ονοματι ΜyTable kαι απο αυτον θελω με ερωτημα SQL μεσω TADOQuery να εξαγω συγκεκριμενα αποτελεσματα εγγραφών πατωντας ενα κουμπι.

Γραφω τον παρακατω κωδικα :

***************************************************************

procedure TForm1.BtnQueryClick(Sender: TObject);

begin

ADOQuery1.Close;

ADOQuery1.SQL.Clear;

 

ADOQuery1.SQL.add('SELECT *');

ADOQuery1.SQL.add('FROM ΜyTable');

ADOQuery1.SQL.add('WHERE oneField = oneWord');

 

ADOQuery1.Open;

end;

****************************************************************

.. αλλα παιρνω μηνυμα λαθους "η παραμετρος 'oneWord' δεν εχει προεπιλεγμενη τιμή".

Τι μπορει να συμβαινει?

Το παραξενο ειναι ότι δουλευει για την εντολή "SELECT * FROM ΜyTable" ενω δε δουλευει οταν προσθετω 'WHERE oneField = oneWord'

[sgoll]

ΦΙΛΕ ΛΟΙΠΟΝ ΤΑ ΠΡΑΓΜΑΤΑ ΕΙΝΑΙ ΠΙΟ ΕΥΚΟΛΑ...

 

procedure TForm1.BtnQueryClick(Sender: TObject);

var sqltext,FilterValue : string;

begin

// ΟΠΟΥ FILTERVALUE BAZEIS TIN TIMI ΠΟΥ ΨΑΧΝΕΙΣ

FilterValue := '';

sqltext := 'select * from mytable where onefield = %s';

sqltext := Format(sqltext,[FilterValue]);

 

ADOQuery1.Close;

ADOQuery1.SQL.ΤΕΧΤ.Clear;

ADOQuery1.SQL.ΤΕΧΤ :=sqltext;

ADOQuery1.Open;

end;