0

私はdelphi(またはその問題に関するコーディング)が初めてで、先週SQLを学んでいますが、Msaccessデータベースからレコードを見つけて削除するために使用しようとしたこのコードは機能しません。実行してもエラーは発生しません。ボタンをクリックしても何もしません。メッセージは表示されますが、テーブルからレコードは削除されません。私はこのコードを使用しています:

begin
ADOQuery1.SQL.Text := 'SELECT * FROM Admins WHERE Name = '''+Edtname.text+'''';
ADOQuery1.Open;
if ADOQuery1.IsEmpty then
ShowMessage('User not found')
else
begin
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'DELETE FROM Admins WHERE Name = '''+EdtName.Text+'''';
ADOQuery1.ExecSQL;
ShowMessage('Information was Deleted');
end;
ADOquery1.Free;
end;

データベースに関する情報:

Collumns     Type
========     ====
Name         Text
Surname      Text
Dateadded    Date/time
Password     Text
Adminnumber  Number

このエラーが発生した理由についてできるだけ多くの情報を提供してください。私はまだ学習中であり、事前に感謝します:)

4

2 に答える 2

0

ADOQuery の接続文字列を設定しましたか? ADOQuery1.ExecSQLに整数を割り当てることで、クエリの影響を受ける行数を確認できます。

メッセージが表示されていると言うとき、どのメッセージですか? エラーの詳細はありますか?

于 2013-09-05T11:59:36.920 に答える