[Delphi] record in db aanpassen

[Verwijderd]

Ik wil een record in mijn database aanpassen. Dit doe ik op de volgende manier.

Delphi:

with DataModule1.tDevice do
begin
  Edit;
  FieldByName('alarm_level').AsInteger := StrToInt(cbAlarmLevel.Text);
  if (cbCustomPage.Checked) then
    FieldByName('custom_page').AsInteger := 1
  else
    FieldByName('custom_page').AsInteger := 0;
  FieldByName('custom_page_link').AsString := LowerCase(Trim(eCustomPageLink.Text));
  if (cbAltijdPiepen.Checked) then
    FieldByName('altijd_piepen').AsInteger := 1
  else
    FieldByName('altijd_piepen').AsInteger := 0;
  Post;
end;

Deze code wordt uitgevoerd (zonder foutmeldingen) maar wanneer ik dan in de database kijk zie ik tot mijn verbazing dat het record niet aangepast is. Kan iemand mij vertellen waarom?

[ProgrammerX]

Kun je wat meer informatie geven, zoals welke database je gebruikt, de manier hoe je verbinding maakt (BDE, ADO, ODBC), welke delphi versie enz.

Waarschijnlijk als de BDE gebruikt en bijvoorbeeld paradox/dbase tabellen kun je eens kijken naar 'autocommit' of die op true staat (kun je controleren met je bde administrator bij je alias ff kijken).

[Sjnirk]

Heb je wel het goede record te pakken, de code op zich lijkt me wel ok.

Trouwens wat gebruik je, paradox?

[Verwijderd]

Ik gebruik ADO componenten om connectie te maken met een MSSQL server en ik gebruik Delphi 6 om het geheel te maken.

Ik ga inderdaad eens ff kijken of ik wel het juiste record te pakken heb, want volgens mij zou dit wel eens het probleem kunnen zijn.

[UPDATE]

Dit was dus ook het probleem. Bedankt voor het brainstormen.

[ Voor 22% gewijzigd door Verwijderd op 17-01-2003 13:25 ]