ingen fejl meddelse

try

except

end

Hvad er forskellen på

try og except ?

try
  //Her skriver du den kode som du vil afvikle
except
  //Her skriver du den kode som skal afvikles hvis der er fejl i koden
  ovenover, ønsker du at undgå en fejlmeddelelse skriver du ingen kode
end;

Cool nok Morten

Takker

Velbekommen
Må jeg henlede opmærksomheden på

try
  //Her skriver du den kode som du vil afvikle
finally
  //Her skriver du den kode som skal afvikles uanset om ovenstående går godt
    eller skidt.
end;

Eksempel på test af nummerisk værdi, som viser at try og except skal bruges sammen:

try wnum := strtoint(Kundenr.text)    {her testes om feltet er nummerisk }
  except                              {dette var ikke tilfældet, så set focus}
    begin                            {på feltet og udskriv fejlmeddelelse}
      Kundenr.setfocus;
      MessageDlg('Skal være nummerisk', mtInformation,[mbOK],0);
      exit;
    end;
  end;

Mvh Pjotre