Delphi Aplikacije i SQL upiti?

Napravio sam BP u SQL Server-u 2000. Znaci, ima vise tabela u oviru nje.
Povezao sam bazu sa Delphi Aplikacijom putem ADO tehnologije i to sve lepo radi.
Na osnovu ADO tutorijala sa sajta, resio sam neke probleme.
E, sad, hteo bih da nad tabelama a putem Delphi-ja izvodim SQL upite, tipa:

SELECT *
FROM
WHERE

a kasnije i nesto slozenije.

Kako se to u Delphi okruzenju izvodi? Molim za detaljan odgovor zato sto
nisam nikad radio sa SQL upitima...

P.S. SQL naredbe u okviru samog SQL Server-a 2000 daju mi zeljeno i hteo bih to
isto iz Delphi Aplikacije

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Koristi ado query, pogledaj help u Delphiju

Potpis

ERROR974

Da, znam da postoji ADOQuery ali ne znam kako to sve
da povezem kao sa ADOTable i vrsim obradu?!
Moze neko objasnjenje, detaljnije o tome?
Sta sve treba postaviti na formu, povezati sa dbgrid-om?

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

imas kompletan ADO tutorijal na:
http://delphi.about.com/od/database/a/databasecourse.htm

konkretno, povezivanje ADOQuery-ja sa ostalim komponentama je objasnjeno u chapter 7:
http://delphi.about.com/od/database/l/aa050101a.htm

Hvala, pomoglo mi je da uradim sta sam zeleo!!!

with ADOQuery1 do begin
Close;
SQL.Text := 'SELECT OilName FROM Oils ';
Open;

Ispisao sam ovaj kod i on mi prikaze celu tabelu, e sad ja bi hteo da mi se iz OilName
isfiltrira Ime koje sam uneo u Edit1.Text, probao sam sledece, al nece:


with ADOQuery1 do begin
Close;
SQL.Text := 'SELECT OilName FROM Oils '+ Edit1.Text;
Open;

U cemu je problem?

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

with ADOQuery1 do
begin
Close;
SQL.Text := 'SELECT OilName FROM Oils where OilName ='+ Edit1.Text;
Open;

mozda je umesto znaka jednakosti 'LIKE' ne secam se... tj. koristim mySQL server

Ako ti i dalje ne radi onda zahteva da edit text preneses kao tekst izmedju '' pa onda koristi QuotedStr

Nije mi uspelo:

with ADOQuery1 do
begin
Close;
SQL.Text := 'SELECT OilName FROM Oils where OilName ='+ Edit1.Text;
Open;

Ni sa LIKE?!

Sta si mislio pod:
"Ako ti i dalje ne radi onda zahteva da edit text preneses kao tekst izmedju '' pa onda koristi QuotedStr?!

Dalje, sta mi je interesantno:

Povezao sam Delphi Aplikaciju sa SQL Serverom 2000 i odradio neke upite.
E, sad, pokusao sam da isfiltriram ali ne ide. Kod:

with ADOQuery1 do begin
Close;
SQL.Text := 'SELECT * FROM Ime Tabele WHERE Ime Polja LIKE "%'+deo_reci+'%"';
Open;
end;

Ovo je sve ok ali nesto nije u redu sa sintaksom, odnosno "%'+deo_reci+'%" ovo deo_reci
uvek bude greska, sve ovo je plave boje ali deo_reci je crne?!
Sta je problem?

Drugo, hteo bih postaviti jedan Edit1.Text i da se u njega unese jedno slovo i da se
isfiltriraju sva imena na to slovo (koja pocinju na to slovo)?

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

ili



Evo ovako sam ja to nekada negde uradio!!!

Sada koristim parametrizirane upite. Tebi ce ovo biti dovoljno!

Citav problem je da znacina apostrofima tj. chr(39)


sto se tice ' (koja pocinju na to slovo)?' koristio sam

Uneo sam ovaj kod:

procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Add('SELECT OilName, LatinName');
ADOQuery1.SQL.Add('FROM Oils');
ADOQuery1.SQL.Add('WHERE OilName LIKE ' + chr(39) + Form1.Edit1.Text +'%' + chr(39));
ADOQuery1.Open;
end;

I nista, samo prikaze DBGrid1 sa poljima tabele ali prazno?!

Druga procedura:

procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery1.SQL.Add('SELECT OilName, LatinName');
ADOQuery1.SQL.Add('FROM Oils');
ADOQuery1.SQL.Add('WHERE (OilName ="' + Form1.Edit1.Text + '")');

end;


I nista, samo prikaze DBGrid1 sa poljima tabele ali prazno?!

Da li to ima neke veze kako su polja indeksirana u SQL Serveru 2000? ( primarni index je OilID,
a ostala dva indexa su OilName i LatinName)

Procedura pokazuje kao da taj podatak koji je unet u bazu ne postoji zato je DBGrid prazan, a u stvari je tu
ili nije polje dobro indeksirano pa ne moze vrsiti pretragu po tom polju?!
Probao sam i sa OilID koji je indeksiran kao primarni i opet isto?!

Kod za OilID(primarni kljuc):

procedure TForm1.Button3Click(Sender: TObject);
begin
ADOQuery1.SQL.Add('SELECT OilID, OilName, LatinName');
ADOQuery1.SQL.Add('FROM Oils');
ADOQuery1.SQL.Add('WHERE (OilID ="' + Form1.Edit1.Text + '")');

end;

A kad ubacim jos i ADOQuery1.Open, kod:

ADOQuery1.SQL.Add('SELECT OilName, LatinName');
ADOQuery1.SQL.Add('FROM Oils');
ADOQuery1.SQL.Add('WHERE (OilName ="' + Form1.Edit1.Text + '")');
ADOQuery1.Open;

izbaci gresku : Invalid Column Name 'neki naziv'?! - a "neki naziv" je upisan
u tu kolonu.

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Proveri setovanja za SQL server u ODBC. Mislim da bi trebalo da cekiras opciju use Ansi quoted strings.

Potpis

ERROR974

Mozes li malo da mi pojasnis ovo sto si napisao, odnosno da mi objasnis kako to
da izvedem?

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Pa svugde moras da uneses ADOQuery1.Open;

Unesem ali ni tad nece da funkcionise?!



Znaci u Edit1.Text je unesena neka vrednost iz polja OilName, znaci ta vrednost postoji u kolono OilName,
i pritiskom na dugme (OnClick) izbaci se greska:

"Invalid column name "trazena_vrednost""

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Zar je moguce da mi niko ne moze pomoci resiti problem?!

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

pa mozes i sam da zakljucis u cemu je problem
"Invalid column name "trazena_vrednost""!!!!!!!!!!!!!!
Verovatno imam u komponenti ADOQuery1 u SQL vec unesen neki upit tako da ti on pokusava odraditi i taj upit i onaj koji ti iz coda dodas zato je potrebno da ga predhodno ocistis

Ista greska : "Invalid column name 'naziv'"!?
Da li treba ADOQuery1 da se stavi u insert mode ili edit mode?!
Ili tako neka caka!?
Polje po kojem ovde zelim vrsiti pretragu je indeksirano i kad
koristim:



i sve lepo odradi?! Gde gresim u Query?

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

Ljudi, moze li neko?

Potpis

Someone's sitting in the shade today because someone planted a tree a long time ago.

with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT OilName');
SQL.Add('FROM Oils');
SQL.Add('WHERE (OilName =' + QuotedStr(Edit1.Text) + ')');
Open;
end

Potpis

Marcha
-----------------------------------
Pretpostavka je majka zajeba.