Index: freexp/xp3o.inc =================================================================== RCS file: /server/cvs/freexp/xp3o.inc,v retrieving revision 1.48 retrieving revision 1.49 diff -u -r1.48 -r1.49 --- freexp/xp3o.inc 31 Jan 2006 14:32:36 -0000 1.48 +++ freexp/xp3o.inc 19 Mar 2006 11:07:52 -0000 1.49 @@ -8,7 +8,7 @@ { Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der } { Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. } { --------------------------------------------------------------- } -{ $Id: xp3o.inc,v 1.48 2006/01/31 14:32:36 mw Exp $ } +{ $Id: xp3o.inc,v 1.49 2006/03/19 11:07:52 mw Exp $ } procedure readpuffer; @@ -133,7 +133,7 @@ if MsgCount mod 10=0 then begin moff; - write(MsgCount:6,#8#8#8#8#8#8); + write(MsgCount:9,#8#8#8#8#8#8#8#8#8); mon; end; seek(f,adr); @@ -141,7 +141,7 @@ inc(adr,hdsize+hdp^.groesse); until not ok or (adr>=fs-3); { Der Puffer kann maximal 3 zusätzliche } moff; - if MsgCount>1 then writeln(MsgCount:6) { Zeichen enthalten, die } + if MsgCount>1 then writeln(MsgCount:9) { Zeichen enthalten, die } else writeln; { weggeschluckt werden. } mon; puffer_ok:=ok and (adr<=fs+8); @@ -1279,6 +1279,10 @@ end; { $Log: xp3o.inc,v $ + Revision 1.49 2006/03/19 11:07:52 mw + MW: - Beseitigung eines Anzeigefehlers beim Einlesen von sehr vielen + Nachrichten. + Revision 1.48 2006/01/31 14:32:36 mw MW: - Kleine Optimierung der Cancel/Supersedes-Prüfroutine als Vorsichtsmaßnahme gegen Performace-Probleme Index: freexp/Trial/newsnap.asc =================================================================== RCS file: /server/cvs/freexp/Trial/newsnap.asc,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- freexp/Trial/newsnap.asc 13 Mar 2006 08:27:08 -0000 1.4 +++ freexp/Trial/newsnap.asc 19 Mar 2006 11:10:06 -0000 1.5 @@ -252,3 +252,9 @@ MW: - Beseitigung eines Anzeigefehlers beim Reorg, bei sehr großem Datenbestand (mehr als 2 GB Gesamtgröße aller MPUFFER). XP4O.PAS, XP4O.INC + +19.03.2006: + +MW: - Beseitigung eines Anzeigefehlers beim Einlesen von sehr vielen + Nachrichten. + XP3O.INC
------------------------------------------------------------------------ FreeXP CVS-Mailingliste CVS-List@freexp.de http://www.freexp.de/cgi-bin/mailman/listinfo/cvs-list