Brug af writeln vedr. consol application

Har du mange filer åbent samtidigt ?

Er det en multithreaded app ?

Det er ikke en multithreaded app.
Filer åbent samtidig? Jeg har kun én indput og én outfil 'åben', outputfilen 'assign'es direkte mens indputfilen indlæses vha. nogte stream objekte. Hele indput indlæses i et objekte hierarki (og lukkes igen) inden der arbejdes på objekterne.
Hvis fejlen opstår bliver den ved til jeg har genstartet Delphi (5).

PS. Er først tilbage (her) igen i morgen!

'Fejlen' er ikke vital da det er min eget testprogram, men det er da trals!! (-;

Er der ikke noget med at man kan skrive
writeln(con, ......);
for at få det til "consolen" ? Tror det er en defineret standard.

I/O Error 103: File not open.

tjek evt. om du har en procedure der lukker outputfilen før tid ...

writeln(output,'noget');

svarer til:

writeln('noget');

i standard Pascal (ved ikke med Delphi).

Du mener om han laver en:

Close(output);

?

ja sådan noget lignende ...

writeln(con, ....); - jeg vil mene dette ville virke logisk men det virker ikke og jeg har ikke lige fundet noget om dette!

I/O Error 103: Problemet er at jeg med den linie der trigger denne fejlbesked, mener writeln til consolen og ikke filen. Så det burde være lige meget og filen er lukket eller ej.

Faktisk kommer fejlen inden filen overhovedet skal åbnes idet jeg ønsker en cdonsol.writeln inden da.

Fejlen opstår allerede i programmets 2. linie:

if (ParamCount <> 4) then
begin
  writeln(, 'DllTest er et lille program til automatisk dll tests af XXX''s filer.'+#13#10);
  ::

tastefejl - selvfølgelig:
writeln('DllTest er et lille program til automatisk dll tests af XXX''s filer.'+#13#10);

Kan det tænkes at du streamer en EOF-karakter der lukker din fil? Den næste skrivning til filen vil returnere en 103'er.

>hrc: Tror ikke du har læst spørgsmålet (-; ovenstående writeln er til consolen og ikke en fil ... så der 'skal' ikke være en åben fil.

Næh. Du har ret, jeg havde ikke læst spg. ordentligt, men kan det alligevel ikke tænkes at du streamer noget skidt til con?

Må vi se mere af din kode?

Jaah - lidt - det er somsagt en del af et større projekt så det er begrænset hvor meget jeg kan vise. Men 'projektfilen' kan nu ses her: http://www.mortenrasmussen.net/d5/dlltest.txt

Noget af det kan sikkert ikke forstås men det skulle være den nederste begin-end der er interesant og den er (forhåbentlig (-;) forståelig!?

Det er somnævnt 2. linie der 'driller' skal vi sige 1 ud af 10 gange!!! Mystisk fejl synes jeg.

Der kom ingen yderligere kommentarer så spørgtsmålet lukkes!