code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| DataModule9->Bestel->First();
if (!DataModule9->Bestel->Eof)
{
do
{
DBNavigator10->BtnClick(nbInsert);
DataModule9->SubArt->FieldByName("HoofdArt")->AsInteger = DataModule9->Artikelen->FieldByName("RecNo")->AsInteger;
DataModule9->SubArt->FieldByName("Art_ID")->AsInteger = DataModule9->Bestel->FieldByName("Artikel_ID")->AsInteger;
DataModule9->SubArt->FieldByName("Percentage")->AsString = DataModule9->Bestel->FieldByName("Aantal")->AsString;
DBNavigator10->BtnClick(nbPost);
DataModule9->Bestel->Next();
}
while(!DataModule9->Bestel->Eof);
}
Close(); |
De Navigator10 die ik heb ingesteld staat op de dataset van DataModule9->SubArt te verwijzen.
Dit heb ik ook al gedaan rechtstreeks dus met DataModule9->SubArt->State = dsInsert;
Wat is het probleem: Er komt een foutmelding als de tabel in insert modus wil zetten. Dan staat er dus nog niets in de tabel en ik heb de tabel al wel getest of ik in de DataBase Desktop iets in de tabel kan zetten en dit is wel mogelijk.
Met vriendelijk groet
Jan-Willem