dataset not edit or insert mode hatası (çözüldü)

[tecnic]

aşağıdaki kodu bi butonun içine ekledim ve dataset not in edit or insert mode hatası alıyorum db yazma ve okumaya ayarlanmış durumda aynı database'e kayıt yapabiliyorum ama düzenlemek için yazdığım bu kodlarla düzenleme yapamıyorum ilk satırda hemen hata veriyor. acaba nerde yanlış yapıyorum

procedure TForm1.Button8Click(Sender: TObject);
begin
ADOTable1.Open;
ADOTable1.First;
ADOTable1.Edit;
while not ADOTable1.Eof do
begin
if ADOTable1ogrno.Text = ogrno then
begin
ADOTable1tckimlikno.Value := edit17.Text;
ADOTable1ad.Value := edit18.Text;
ADOTable1soyad.Value := edit19.Text;
ADOTable1dgmtar.Value := DateTimePicker5.Date;
ADOTable1dgmyeri.Value := edit20.Text;
ADOTable1babaadi.Value := edit21.Text;
ADOTable1veliad.Value := edit27.Text;
ADOTable1velisoyad.Value := edit22.Text;
ADOTable1kadro.Value := edit23.Text;
ADOTable1sicil.Value := edit24.Text;
ADOTable1veliadres.Value := edit25.Text;
ADOTable1telefon.Value := edit26.Text;
ADOTable1okulu.Value := edit32.Text;
ADOTable1kangrubu.Value := edit28.Text;
ADOTable1daireno.Value := edit29.Text;
ADOTable1oda.Value := edit30.Text;
ADOTable1not.Value := edit31.Text;
ADOTable1grstar.Value := DateTimePicker6.Date;
ADOTable1ckstar.Value := DateTimePicker7.Date;
ADOTable1ogrno.Text := edit38.Text;
end;
adotable1.Next;
end;
adotable1.Refresh;
adotable1.Close;
end;

[ibrahimcoban]

procedure TForm1.Button8Click(Sender: TObject);
begin
ADOTable1.Open;
ADOTable1.First;
//ADOTable1.Edit;

while not ADOTable1.Eof do
begin
if ADOTable1ogrno.Text = ogrno then
begin
ADOTable1.Edit; //BURAYA
ADOTable1tckimlikno.Value := edit17.Text;
ADOTable1ad.Value := edit18.Text;
ADOTable1soyad.Value := edit19.Text;
ADOTable1dgmtar.Value := DateTimePicker5.Date;
ADOTable1dgmyeri.Value := edit20.Text;
ADOTable1babaadi.Value := edit21.Text;
ADOTable1veliad.Value := edit27.Text;
ADOTable1velisoyad.Value := edit22.Text;
ADOTable1kadro.Value := edit23.Text;
ADOTable1sicil.Value := edit24.Text;
ADOTable1veliadres.Value := edit25.Text;
ADOTable1telefon.Value := edit26.Text;
ADOTable1okulu.Value := edit32.Text;
ADOTable1kangrubu.Value := edit28.Text;
ADOTable1daireno.Value := edit29.Text;
ADOTable1oda.Value := edit30.Text;
ADOTable1not.Value := edit31.Text;
ADOTable1grstar.Value := DateTimePicker6.Date;
ADOTable1ckstar.Value := DateTimePicker7.Date;
ADOTable1ogrno.Text := edit38.Text;
ADOTable1.POST;

end;
adotable1.Next;
end;
adotable1.Refresh;
adotable1.Close;
end;

[tecnic]

bu yukarıda söylediğiniz ben denemiştim siz söyledikten sonra tekrar denedim fakat değişen birşey olmadı ne yaıkki

[tecnic]

burada adotable değilde adodataset kullandığımda sorun ortadan kalktı acaba bunun neden kaynakladığını bilen arkadaşlar varsa yazarsa çok sevinirim

[baypipox]

adtablelarında tablo alanlarını ekledikden sonra veritabanında bir değişiklik yaptuysan, yeniden alanlarını güncelemek gerekeyo, yani sen table yerine dataset koyduysan bir güncelleme söz konusu, bundan olabir.
bu ihtimallerden bir tanesi