| adjes26 | maandag 10 oktober 2005 @ 18:39 |
Ik ben bezig met het maken van een database in pascal/delphi. Mijn probleem is dat ik niet weet hoe ik bij het einde van een file kom als het bestand al gegevens bevat. De gegevens moeten dus worden toegevoegd en niet worden overschreven. Hieronder staat een gedeelte van mijn programma.. :
readln(Bestandsnaam);
assign(Bestand, BestandsNaam);
{$I-} Reset(Bestand); {$I+}
IORes:=IOResult;
writeln(IOres);
If IORes = 0 then
begin
writeln('Bestand ',BestandsNaam,' is geopend.');
writeln('Druk op ENTER om verder te gaan.');
ReadLn;
Open:=true
end
else begin
rewrite(Bestand);
writeln('Bestand ',BestandsNaam,' bestaat niet en wordt nu aangemaakt.');
writeln('Druk op ENTER om verder te gaan.');
readln;
Open:=true;
end;
Kan iemand me helpen!??? |
| MaxPowered | maandag 10 oktober 2005 @ 19:01 |
Stel je vraag eens op www.nldelphi.com (HET Delphi Forum).
Daar nemen ze je aan de hand mee! |
| rekenwonder | maandag 10 oktober 2005 @ 21:52 |
Gebruik Append() i.p.v. Reset(). Met Eof() kun je overigens bepalen of je het einde van het bestand bereikt hebt.
Waarom gebruik je niet het stoerdere TFileStream? |
| Vulture | woensdag 12 oktober 2005 @ 10:55 |
Dit lijkt overigens meer op tekstfile bewerking dan op database programmeren. Er zijn zat componenten beschikbaar om verschillende databases via Delphi te benaderen. Tip: ADO. 
En inderdaad, check www.nldelphi.com - superforum voor dit soort vragen!  |