while løkke i C++ og borlandbuilder 5.0

i skal til at starte med vide hvad betingelsen er for at gemme/ikke gemme data

hvordan skal de gemmes? tekstfiler eller database?

De skal gemmes i en database,
koden til funktionen kommer lige, har skrevet hvor den skal spørge:

Form1->Query1->Close();
    Form1->Query2->Close();
    Form1->Query1->SQL->Clear();
    Form1->Query1->SQL->Add(\"select tindkøb.indkøbsnr, tleverandør.levnr, tleverandør.navn, tleverandør.adresse, tleverandør.telefonnr from tindkøb, tleverandør where tindkøb.levnr = tleverandør.levnr and tindkøb.forslag\");
    Form1->Query1->Open();
        while (!Form1->Query1->Eof)
        {
                Form1->EIndkobnr->Text = Form1->Query1->FieldByName(\"indkøbsnr\")->AsString;
                Form1->ELevnr->Text = Form1->Query1->FieldByName(\"levnr\")->AsString;
                Form1->ELevnavn->Text = Form1->Query1->FieldByName(\"navn\")->AsString;
                Form1->ELevadr->Text = Form1->Query1->FieldByName(\"adresse\")->AsString;
                Form1->ELevtlf->Text = Form1->Query1->FieldByName(\"telefonnr\")->AsString;

                Form1->Query2->SQL->Clear();
                  Form1->Query2->SQL->Add(\"select tindkøbslinie.varenr, tvare.beskrivelse, tindkøbslinie.antal, tindkøbslinie.pris from tindkøbslinie, tvare where tindkøbslinie.indkøbsnr = \"+Form1->Query1->FieldByName(\"indkøbsnr\")->Value+\" and tindkøbslinie.varenr = tvare.varenr \");
            Form1->Query2->Open();
                  while (!Form1->Query2->Eof)
                {
                        Form1->CLB1->Items->Add(Form1->Query2->FieldByName(\"varenr\")->AsString + \" \" + Form1->Query2->FieldByName(\"beskrivelse\")->AsString + \" \" + Form1->Query2->FieldByName(\"antal\")->AsString + \" \" + Form1->Query2->FieldByName(\"pris\")->AsString);
                        Form1->Query2->Next();
                }

      // Her skal den spørge inden den går videre
                Form1->Query1->Next();
        }
   

er klaret