🚀 go-pugleaf

G'day Guy,
I think you need to close the query before changing the parameter the
second and subsequent iterations. Also you could move the
                Form1->TADOQuery1->SQL->Clear();
                Form1->TADOQuery1->SQL->Add("insert into Table1 values
...
out of the loop.

Guy wrote in message <3b4efb1d_1@dnews>...
>Hi, I tried to write a function that reads some data from a
TStringList
>Object and inserts it to DB Table dynamicly using a loop.
>This is our source code:  (
>
>        TStringList *Labels=new TStringList;
>        Labels->LoadFromFile("Labels.txt");
>        Form1->TADOQuery1->Parameters->ParamByName("v_Name")->Value =
Name;
>
>        for (int i=0; i<Labels->Count; i++)
>        {
>                String Label=Labels->Strings[i];
>
Form1->TADOQuery1->Parameters->ParamByName("v_Label")->Value
>= Label;
>                Form1->TADOQuery1->SQL->Clear();
>                Form1->TADOQuery1->SQL->Add("insert into Table1
values
>(:v_Name, :v_Label)");
>                Form1->TADOQuery1->ExecSQL();
>        }
>
>
>It works propertly only in the first iteration. Then (during the
second
>iteration) it stucks on the ExecSQL line.