From 739b98af6f27cb4331644f50ff881b8f7a1aeb93 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Fri, 29 Jan 2016 08:48:04 +0100 Subject: Ausgabe im Erfolgsfall bereinigt --- unit2.pas | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/unit2.pas b/unit2.pas index 454d30a..649b624 100644 --- a/unit2.pas +++ b/unit2.pas @@ -545,10 +545,8 @@ begin break; end; - if result then begin + if result then self.sortenreinAnzeigen(_rs,nil); - _rs.add('alles ok ('+inttostr(random(1000))+')!'); - end; ars.free; acs.free; -- cgit v1.2.3-54-g00ecf