Void __fastcall TForm6: : Button1Click (TObject * Sender)
{
Int iIdx;

IIdx=StringGrid1 - & gt; RowCount - 1;
StringGrid1 - & gt; Cells [0] [iIdx]=StrToInt (Edit1 - & gt; The Text);
StringGrid1 - & gt; Cells [1] [iIdx]=StrToInt (Edit2 - & gt; The Text);

Edit2 - & gt; Text="";//to empty "quantity in
"StringGrid1 - & gt; RowCount + +;//StringGrid increase line
}
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
Void __fastcall TForm6: : Button2Click (TObject * Sender)
{
AnsiString sSQLSentence;
int i;
TQuery * Query1=new TQuery (NULL);
Query1 - & gt; DatabaseName="dblib";
Query1 - & gt; Close ();
Query1 - & gt; SQL - & gt; The Clear ();

SSQLSentence="insert into library (readers number, Numbers, lending date) values (' + StringGrid1 - & gt;" " Cells [0] [I] + "', '" + StringGrid1 - & gt; Cells [1] [I] + "', '" + DateTimePicker1 - & gt; DateTime. DateString () + "')";

Query1 - & gt; SQL - & gt; Add (sSQLSentence);
Query1 - & gt; ExecSQL ();

}
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --


Where is there a problem? The runtime always prompt syntax errors

CodePudding user response:

CodePudding user response:

Your table, readers number and book number is a numeric field?

 sSQLSentence=String (). Sprintf (
"Insert into library (readers number, Numbers, lending date) values (% s, % s, '% s')", 
StringGrid1 - & gt; Cells [0] [I], StringGrid1 - & gt; Cells [1], [I] 
DateTimePicker1 - & gt; DateTime. DateString ()); 

CodePudding user response:

changed after that shows this again

CodePudding user response:

Few words said, please post your complete code

CodePudding user response:

//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 

#include  
# pragma hdrstop 

# include "borrownew. H" 
#include  
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
# pragma package (smart_init) 
# pragma resource "*. DFM 
"TForm6 * Form6; 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
__fastcall TForm6: : TForm6 (TComponent * Owner) 
: TForm (the Owner) 
{
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
Void __fastcall TForm6: : FormClose (TObject * Sender, TCloseAction & amp; The Action) 
{
Action=caFree; 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
Void __fastcall TForm6: : FormCreate (TObject * Sender) 
{
StringGrid1 - & gt; Cells [0] [0]="readers number"; 
StringGrid1 - & gt; Cells [1] [0]="Numbers"; 

DateTimePicker1 - & gt; The Date=the Date (); 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
Void __fastcall TForm6: : Button1Click (TObject * Sender) 
{
Int iIdx; 

IIdx=StringGrid1 - & gt; RowCount - 1; 
StringGrid1 - & gt; Cells [0] [iIdx]=StrToInt (Edit1 - & gt; The Text); 
StringGrid1 - & gt; Cells [1] [iIdx]=StrToInt (Edit2 - & gt; The Text); 

Edit2 - & gt; Text="";//to empty "quantity in 
"StringGrid1 - & gt; RowCount + +;//StringGrid increase line 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
Void __fastcall TForm6: : Button2Click (TObject * Sender) 
{
AnsiString sSQLSentence; 
int i; 
TQuery * Query1=new TQuery (NULL); 
Query1 - & gt; DatabaseName="dblib"; 
Query1 - & gt; Close (); 
Query1 - & gt; SQL - & gt; The Clear (); 

SSQLSentence=String (). Sprintf (" insert into library (readers number, Numbers, lending date) values (% s, % s, '% s') ", StringGrid1 - & gt; Cells [0] [I], StringGrid1 - & gt; Cells [1], [I] DateTimePicker1 - & gt; DateTime. DateString ()); 

//sSQLSentence="insert into library (readers number, Numbers, lending date) values (' + StringGrid1 - & gt;" " Cells [0] [I] + "', '" + StringGrid1 - & gt; Cells [1] [I] + "', '" + DateTimePicker1 - & gt; DateTime. DateString () + "')"); 


Query1 - & gt; ExecSQL (); 

} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 

CodePudding user response:

That want to realize the function of the second floor

CodePudding user response:

In the code of your, I didn't value assignment