var Pid, command, x, anstdatum: string;
 Telnr: integer;
begin
try
 Pid := textbox1.text;
 Telnr := int32.parse(textbox2.text);
  anstdatum := textbox3.text;
  x := '''';
  Suntripdb.open;
  try
if anstsdatum <> '' then
begin
command:='UPDATE Personal anstdatum='+x+anstdatum+x+'WHERE pid='+x+pid+x';
mittinsert := bdpcommand.create(command, suntripDB);
mittinsert.executenonquery;
end;

if textbox3.text<>'' then
 begin
 command := 'UPDATE Personal SET telefon=' + x + telnr.tostring + x +'WHERE pid=' + x + pid + x;
 mittinsert := bdpcommand.create(command, suntripDB);
 mittinsert.executenonquery;
  end;