Делфи 7 бағдарламасы туралы....

Question

Саламатсыздар ма, маған Делфи 7 бағдарламасында бір код жазуға көмектесіңіздерші.

Мынадай етіп жаздым:

procedure TForm2.SpeedButton2Click(Sender: TObject);
begin
if form1.ADOTable1.Modified then
  begin
     Form1.ADOTable1.Post;
     Form2.Close;
  end else ShowMessage ('Сіз өзгеріс енгізген жоқсыз');
end;

Енді осы код базаны толық толтырған кезде жақсы жұмыс жасайды, ал мен тек өзгерту батырмасын басып тек ғана бір бағанды өзгертсем, онда Сіз өзгеріс енгізген жоқсыз деп сақтамай отыр. Неге? Көмектесіңіздерші.

Answer 1

ADOQuery.SQL.Clear; ADOQuery.SQL.Text = 'insert into predmeti (ID, Sabak, Zhattau, Pan) Values (:ID, :Sabak, :Zhattau, :Pan)'; ADOQuery.Parameters.ParamByName(''ID'').Value := Сөз; ADOQuery.Parameters.ParamByName(''Sabak'').Value := Сөз; ADOQuery.Parameters.ParamByName(''Zhattau'').Value := Сөз; ADOQuery.Parameters.ParamByName(''Pan'').Value := Сөз; ADOQuery.ExecSQL;

Comments

Мен ADOQuery қолданып көргем жоқ, оны қалай екенінде білмеймін де.

Abikon 16.07.2015 пікір

---

abikon delphi ді пайдаланбайақ қой c plus plus ты қолдан

a123asw 16.07.2015 пікір

---

C++ мүлдем білмеимін, тек аздап Делфи 7 білемін. Тек мен кішігірім мектептің қызметкерлерін тіркейтін бағдарлама жасап қояйын деп едім ғой. Бірақ кішкене тығырықтардан өте алмай жатырмын:(

Abikon 16.07.2015 пікір