With qry1 do
The begin
The close;
SQL. The Clear;
Edtrenddate. Text:=FormatDateTime (' YYYY - - DD hh: MM nn: ss ', Now);
SQL. Text:='insert into dbo. Tb_users (account, PWD, type, authorities, owner, recorder, name, card_type, card_id, phone, mail, province, city, country, regex_name, regex_phone, erp_ip, erp_port, registdate, enddate, last_online, last_ip,) values (' +
QuotedStr (edtaccount. Text) + ', '+
QuotedStr (edtpsw. Text) + ', '+
QuotedStr (edttype1. Text) + ', '+
QuotedStr (edtauthority. Text) + ', '+
QuotedStr (edtonwer. Text) + ', '+
QuotedStr (edtrecorder. Text) + ', '+
QuotedStr (edtname. Text) + ', '+
QuotedStr (cbb_cardtype. Text) + ', '+
QuotedStr (edt_id. Text) + ', '+
QuotedStr (edtphone. Text) + ', '+
QuotedStr (edtmail. Text) + ', '+
QuotedStr (cbbprovince. Text) + ', '+
QuotedStr (cbbcity. Text) + ', '+
QuotedStr (cbbcountry. Text) + ', '+
QuotedStr (edt_regexname. Text) + ', '+
QuotedStr (edt_regexphone. Text) + ', '+
QuotedStr (edterpip. Text) + ', '+
QuotedStr (edterppoint. Text) + ', '+
QuotedStr (edtregistdate. Text) + ', '+
QuotedStr (edtrenddate. Text) + ', '+
QuotedStr (edtlastdate. Text) + ', '+
QuotedStr (edtlastip. Text) + ');
ExecSQL;
The Close;
SQL. Text:='select * from dbo. Tb_users';
The Open;
end;
Images using image; Corresponding database is face,
Picture part of the code for how to write?

CodePudding user response:

1, the local database, a graphics file data is converted into a binary number system, then save,
2, for the three-tier database, graphic files to convert guest types of data to the server, and then converted to binary numeration system, preservation,