OnGroupEntered Script

07/04/2008 - 12:35 von Norbert Melzer | Report spam
Hi!

Vor kurzem (in den letzten 4 Monaten :-) ) hat einer in der Newsgroup mal
sein OGE Script gezeigt, daß einige Dinge tut die mir auch gefallen, also
habe ich es ersteinmal kopiert. Jetzt wo ich wieder eine dauerhafte
Internetverbindung habe habe ich auch mal das GetNewHeadersUsw wieder
aktiviert (war vorher auskommentiert). Das Script habe ich der
Vollstàndigkeit halber noch einmal hier her kopiert. Jetzt würde mich bei
einigen Zeilen interessieren was sie bewirken (Markiert mit // ***) und
ausserdem würde mich interessieren ob es eine möglichkeit gibt neue Header
und Artikel nur in Abonnierten Gruppen zu hohlen?


-8<-
program OnGroupEntered;

procedure OnGroupEntered(Groupname: string);
begin
lockdisplay;
try
ADo('Catchup WithSelectedGroups'); // ***
ADo('PurgeSelectedGroups'); // ***
ADo('CollapseAllThreads');
ADo('RefreshView');
//ADo('ArticlePane'); // *** War im original auch
// auskommentiert, also gleich ein Fragezeichen mehr :-)
ADo('GetNewHeadersInSelectedGroups');
finally
unlockdisplay;
end;
end;

begin
end.
->8-

TIA
Norbert
 

Lesen sie die antworten

#1 Reinhard Irmer
07/04/2008 - 12:53 | Warnen spam
On 7 Apr., 12:35, Norbert Melzer wrote:

[...]

Jetzt würde mich bei
einigen Zeilen interessieren was sie bewirken



http://bertel.lundhansen.dk/?page=d...st&m=C

hth

gruss
Reinhard

Ähnliche fragen