diff --git a/examples/interfaces/01.create.pas b/examples/interfaces/01.create.pas
index 117c1e2e8e..e7e6340491 100644
--- a/examples/interfaces/01.create.pas
+++ b/examples/interfaces/01.create.pas
@@ -129,6 +129,8 @@ begin
 		att.detach(st);
 		att := nil;
 
+		dpb.dispose;
+		dpb := nil;
 	except
 		on e: FbException do PrintError(e.getStatus);
 	end;