Nästa: Programpaket för grafik Upp: Fördeklarerade procedurer och funktioner Förra: Stränghantering

Filhantering

För att skriva på och läsa från en fil använder man procedurerna Rewrite respektive Reset. För mer avancerad filassociering rekommenderas proceduren Open.

En fil öppnas för läsning med Reset(VAR file:filtyp ; filename:strängtyp ) och för skrivning med Rewrite(VAR file:filtyp ; filename:strängtyp ). Parametern file är en variabel av typen Text eller FILE OF typ . Parametern filename kan utelämnas. file associeras först med filen filename och öppnas därefter. Efter anrop till proceduren Open ska filename-parametern utelämnas.

Solarispascal stänger automatiskt alla öppna filer innan programmet avslutas.

Proceduren Open(VAR file:filtyp ; pathname,history:strängtyp ; VAR error:Integer) associerar ett filnamn med en filpekare. Parametern file är en filvariabel av typen Text eller FILE OF typ . Parametern history är någon av textsträngskonstanterna 'new', 'old' eller 'unknown'. error-argumentet kan utelämnas. Open associerar file med filnamnet pathname beroende på history på följande sätt:

'new'

Kontrollerar att det inte redan finns en fil som heter pathname och skapar därefter en. Om det redan finns genereras ett fel.

'old'

Kontrollerar att det redan finns en fil som heter pathname. Om det inte finns det genereras ett fel.

'unknown'

Om det redan finns en fil som heter pathname associeras den med filpekaren file. I annat fall skapas en ny fil.

Filnamnet pathname kan också vara på formen '^n ' där n är ett heltal mellan 1 och 9. Med detta avses det n:te argumentet som skickades vid programanropet. Eventuella fel som uppkommer vid anrop av Open dokumenteras i variabeln error enligt följande tabell:

error-värde Beskrivning Allt gick bra och felfritt.

1 Filen var inte specificerad på kommandoraden. Exempel: anropet Open(infile,'^1','new',error); har gjorts fast användaren inte skickade med något argument när han startade programmet.

2 Filen gick inte att öppna.

3 history-strängen var felaktig.

Observera att proceduren Open inte öppnar filen utan bara associerar den med filpekaren.

Nästa: Programpaket för grafik Upp: Fördeklarerade procedurer och funktioner Förra: Stränghantering