Hejsa ved kontakt til database
Jeg har et problem jeg ikke kan se...Når man starte programmet så kommer den med denne fejl: (List Index out of bounds[5])...
Hvorfor kommer denne fejl.
Query12->SQL->Clear(); // Nustil Query12
Query12->SQL->Add("Select * from firmaoplysning where firmaoplysningID = '1'");
Query12->Open(); // Send infomation til mySQL.
if(Query12->RecordCount > 0) // check om hvor mange afdeling der findes
{
firmanavn->Text = Query12->Fields->Fields[1]->AsString;
adresse1->Text = Query12->Fields->Fields[2]->AsString;
adresse2->Text = Query12->Fields->Fields[3]->AsString;
postnr->Text = Query12->Fields->Fields[4]->AsString;
bynavn->Text = Query12->Fields->Fields[5]->AsString;
land->Text = Query12->Fields->Fields[6]->AsString;
telefon->Text = Query12->Fields->Fields[7]->AsString;
telefax->Text = Query12->Fields->Fields[8]->AsString;
regnr_bank->Text = Query12->Fields->Fields[9]->AsString;
kontonr_bank->Text = Query12->Fields->Fields[10]->AsString;
girokonto->Text = Query12->Fields->Fields[11]->AsString;
secvrnr->Text = Query12->Fields->Fields[12]->AsString;
REGnr->Text = Query12->Fields->Fields[13]->AsString;
};
Har er script til at oprette database med:
create table firmaoplysning
(
firmaoplysningID INT NOT NULL auto_increment,
firmanavn varchar(200),
adresse1 varchar(250),
adresse2 varchar(250),
postnr varchar(10),
bynavn varchar(250),
land varchar(200),
telefon varchar(100),
telefax varchar(100),
bankregnr varchar(100),
konto varchar(100),
giro varchar(100),
secvr varchar(100),
regnr varchar(100)
PRIMARY KEY(firmaoplysningID)
);