, Delphi, SQL . SQL , , , . .
, : , , , . :
client_query.Sort:='Date_query';
client_query TDBTable, Sort .
, :
//sql-
//
ADOQuery1.Active:= false;
ADOQuery1.SQL.Clear;
//
with adoquery1 do begin
parameters[0].Value:=tx_fio.Text;
parameters[1].Value:=tx_product.Text;
parameters[2].Value:=strtoint(tx_value.Text);
parameters[3].Value:=d_qu.Date;
end;
//
ADOQuery1.SQL.Text:= 'INSERT INTO client_query_table (FIO_client, Product_name, Date_query, Query_value) VALUES (:fio,:product,:date_q,:p_value)';
ADOQuery1.ExecSQL;
//
form1.client_query.Active:=false;
form1.client_query.Active:=true;
, . TADOQuery1 TADOQuery SQL -. , , .
TParameters , . , .Text.
, , .
TEdit, , , TMonthCalendar. TMonthCalendar.Date .
TADOQuery.SQL. , , SQL . , TADOQuery TADOQuery.SQL. Text . SQL, Delphi SQL .
, INSERT INTO. INTO , , ( , , , ). ? , . SQL 4- , 5-, VALUES , , . .
|
|
ExecSQL TADOQuery SQL. , TADOQuery. Parameters ( ), SQL .
SQL:
, ( ) SQL
SQL :
(Data Definition Language, DDL)
CREATE ( , , , . .)
ALTER
DROP
(Data Manipulation Language, DML)
SELECT ,
INSERT
UPDATE
DELETE
(Data Control Language, DCL)
GRANT ()
REVOKE
DENY ,
(Transaction Control Language, TCL)
COMMIT .
ROLLBACK , .
SAVEPOINT .
SQL.Text, SQL.Add. , , ExecSQL, SQL.Text.
SQL : value, if ( : , ), .
腻 . Pascal.