summaryrefslogtreecommitdiff
path: root/unit1.pas
diff options
context:
space:
mode:
Diffstat (limited to 'unit1.pas')
-rw-r--r--unit1.pas5
1 files changed, 1 insertions, 4 deletions
diff --git a/unit1.pas b/unit1.pas
index 71311ff..90f3173 100644
--- a/unit1.pas
+++ b/unit1.pas
@@ -82,10 +82,7 @@ end;
procedure tForm1.button1Click(sender: tObject);
begin
if openDialog1.execute then
- if d.loadFromFile(openDialog1.fileName) then
- messageDlg('Erfolg! '+inttostr(length(d.gpx)),mtInformation,[mbOk],0)
- else
- messageDlg('Misserfolg!',mtInformation,[mbOk],0);
+ d.loadFromFile(openDialog1.fileName);
zeichneGpxs;
end;