freepascal


How do i edit a specific part of a text file in free pascal?


Just as what the title says, how do i do this? I know that the append command adds text to the end of the file but i don't want to do that nor rewrite the entire text file. I just want to edit a specific part of a text file.
Here's my scenario:
I have different lines of data in a text file, what i'm trying to do is to edit a specific line into a user input. What i already have coded down is finding the line to be edited, and then a user input with the data to change on the line and everything works all fine without problems, however i am completely stumped on what i do to change the data from the text file to user input.
Edit: After frustratingly playing around for a while here's what i've come up to, but it doesn't work, error 106.
If s = 'N' Then
Begin
Writeln();
Writeln('Please enter the correct data');
Append(sf);
Readln(sData);
Writeln(sf, sData);
Close(sf);
End;
Also to note, i do not have the file close before this block of code but i do have an EOF to stop the previous code from having unneeded looping before breaking, i close the file at the end of this code and again in another block. Either way the file closes but i only get the error with those block.
Thanks for the comments, using the TStringList procedure my program works the way i want it to.
What i did was load the file with TStringList.LoadFile, and because the data i'm searching through it has a fixed pattern so i was able to search through and indexing through the file with a fixed index (i.e. Index = Index + 3), removed the indexed line in the data file and inserted the new data.

Related Links

How to eliminate Free Pascal 'not recognized' compile error on TFileStream?
Pascal Graph unit - detecting window close
Open a document with Data Point Click or Mark Double Click Lazarus
SQLTransaction2 : Operation cannot be performed on an active transaction FreePascal - Code Typhon
DBGrid doesn't reflect the current dataset status with Zeos components in Lazarus
Lazarus Custom Component - how to return Mouse X,Y to label [closed]
FreePascal: how do I change the colour of a TPaint object on Mouseover
How to get GO32 Unit file of freepascal
Erro code 201 in pascal
Load new scene in GLScene
FreePascal: Identifier not found “MEMW”
How to fix run-time error 201
Exited with exitcode 201 - how to fix this?
Is there a way to Compile Pascal program without having the compiler to print its info?
TEventLog does not write to systemlog
FreePascal : ValueListEditor manipulation

Categories

HOME
paypal
crystal-reports
symfony
mql4
nlp
angular-cli
command
rocketmq
iis-7.5
triggers
goutte
desktop
android-viewpager
ipfs
xamarin-studio
glpk
riak
google-openid
chocolatey
ip-camera
pycrypto
esql
jquery-form-validator
iup
source-maps
myob
hanami
jenkins-job-dsl
continuous-deployment
branch
rhmap
kong
hash-collision
vcard
websauna
superscript
red-black-tree
smart-mobile-studio
phpspreadsheet
pace
mmdrawercontroller
nlb
android-download-manager
visualstudio.testtools
alchemy.js
tic-tac-toe
infusionsoft
floating-accuracy
pdftk
asmx
rdw
gauss
workflow-foundation-4.5
emoticons
libtiff.net
coremidi
software-product-lines
slam-algorithm
uiprogressview
boost-hana
nssplitview
asp.net-mvc-partialview
asp.net-mvc-2
magento-1.4
servlet-3.0
anythingslider
self-hosting
p-np
oai
textkit
calibration
castle-windsor-3
on-duplicate-key
lines-of-code
uptodate
robocode
line-numbers
temp-tables
collabnet
firebug-lite
proxies
spdy
delphi-xe3
json-patch
exiv2
.net-cf-3.5
sql-server-2012-web
stagefright
mstsc
dwolla
tridion2009
lync-server-2010
pitch
vim-powerline
icefaces-3
opengl-es-lighting
dcpu-16
phpcrawl
ets
gethashcode
nt4
outlook-form
associativity

Resources

Mobile Apps Dev
Database Users
javascript
java
csharp
php
android
MS Developer
developer works
python
ios
c
html
jquery
RDBMS discuss
Cloud Virtualization
Database Dev&Adm
javascript
java
csharp
php
python
android
jquery
ruby
ios
html
Mobile App
Mobile App
Mobile App