ADOQuary1->SQL->Clear();
ADOQuary1->SQL->Add("SELECT aaa FROM bbb");
ADOQuary1->Active = true;
while(!ADOQuary1->Eof){
ListBox1->Items->Add(ADOQuary1->FieldByName("aaa")->Value);
ADOQuery1->Next();
}
using ADOQuery
Thank you very much...
Thank you very much...[/QUOTE]
В данном форуме в качестве языка общения принят русский. Придерживайтесь пожалуйста этого правила.
Код:
Bolshoje spasibo.
Код:
const AnsiString cSQL_String = "SELECT * FROM tbl WHERE (id = :pID)";
...
TForm1::Selection (int id)
{
AQ->Close();
AQ->SQL->Text = sSQL_String;
AQ->Parameters->ParamByName ("pID").Value = id; //Не помню точное написание присвоения значения параметру :(
AQ->Open(); Будет выполнен запрос, в котором pID замененится указанным значением id
}
...
TForm1::Selection (int id)
{
AQ->Close();
AQ->SQL->Text = sSQL_String;
AQ->Parameters->ParamByName ("pID").Value = id; //Не помню точное написание присвоения значения параметру :(
AQ->Open(); Будет выполнен запрос, в котором pID замененится указанным значением id
}
Количество параметров определяется автоматически при вводе текста запроса.
Существует множество способов обращения к параметрам: по имени, по номеру, через свойства, через методы... В общем, читайте хелп.