🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.pascal.borland
Article #617

Re: Random function - PASCAL

#617
From: Ars�ne von Wyss
Date: Fri, 10 Dec 1999 00:00
17 lines
1776 bytes
Hermann Kraus <hnkraus@be-ne.de> schrieb in im Newsbeitrag:
385107DE.9C386932@be-ne.de...
> Arno Fleck schrieb:

> > And here's another possibility: ;-)
> > WHILE True DO DoSomething;
>
> But how to stop then programm?

Using Halt (terminate program), Exit (terminate current procedure/function)
or Break (exit loop) in the "infinite" loop.

--
Ars�ne von Wyss - avonwyss@gmx.net
 Pascal, Delphi & Personal stuff: http://bsn.ch/avonwyss
 Programming Contest Problems Archive: http://bsn.ch/contest
 Webmaster von Roger's Equine Pages: http://bsn.ch/pferde
Technical Details
Message-ID: <38515400@news.datacomm.ch>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at> <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com> <384C5638.D278469F@gmx.at> <acuo4s8gc4lgbud1t3dehbaeq5oq8fl5nu@4ax.com> <384DC718.F5C9C609@t-online.de> <384E9F78.E9E9946@gmx.de> <385107DE.9C386932@be-ne.de>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII
X-Google-Thread: fd1d1,22f85d6fecf732ec
X-Google-Attributes: gidfd1d1,public
X-Google-Thread: 111659,22f85d6fecf732ec
X-Google-Attributes: gid111659,public
X-Google-Thread: 10261c,22f85d6fecf732ec
X-Google-Attributes: gid10261c,public
X-Google-Thread: 102601,22f85d6fecf732ec
X-Google-Attributes: gid102601,public
From: "Ars�ne von Wyss" <avonwyss@gmx.net>
Subject: Re: Random function - PASCAL
Date: 1999/12/10
Message-ID: <38515400@news.datacomm.ch>
X-Deja-AN: 559111250
Content-Transfer-Encoding: 8bit
References: <384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at> <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com> <384C5638.D278469F@gmx.at> <acuo4s8gc4lgbud1t3dehbaeq5oq8fl5nu@4ax.com> <384DC718.F5C9C609@t-online.de> <384E9F78.E9E9946@gmx.de> <385107DE.9C386932@be-ne.de>
X-Trace: 10 Dec 1999 20:26:56 +0100, line189-zuerich-st.datacomm.ch
Organization: DataComm (Schweiz) AG
X-MSMail-Priority: Normal
X-Priority: 3
Content-Type: text/plain; charset="iso-8859-1"
MIME-Version: 1.0
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,ctdl.lang.pascal,de.comp.lang.pascal