20090323202

3 Dokonaj modyfikacji formatki do wprowadzania danych do tabeli Obroty analogicznie jak dla tabeli Katalog

Inaczej zapisz procedurę wprowadzającą dane do tabeli. W tym przypadku wprowadź wszystkie pola do tabeli a do wykrywanie błędów zastosuj obsługę wyjątków w postaci:

Tablel Edit, Tablel Append; Try

// Ustalenie trybu edycji tabeli // Dopisanie nowego rekordu

Tablel ['Rodzaj_tr']:=editl.Text); //Wpisanie znaku oznaczającego rodzaj transakcj^; Tablel [*Data’l =edit2.text;

except

messagedlgfNicpoptawnc d*ne\nttElTOr.(mbOK],0),