webForumDet fria alternativet

Spara till textfil

5 svar · 274 visningar · startad av taper lawyer

taper lawyerMedlem sedan jan. 2004155 inlägg
#1

Hur gör man för att spara texten från t ex en TEdit till en textfil? Har försökt lite men får bara massa felmeddelanden.

akkeakkerMedlem sedan jan. 200327 inlägg
#2

Prova något i stil med:

var F:TextFile;
begin
    AssignFile(F, 'minfil.txt');
    // Eller Reset alt. Append om minfil.txt redan finns
    ReWrite(F);
    try
      // här skriver du det som ska skrivas till filen.
      Write(F,Edit1.Caption);
    finally
      CloseFile(F)
    end;
end;
taper lawyerMedlem sedan jan. 2004155 inlägg
#3

Tack så mycket!
Det fungerade efter jag ändrade Edit1.Caption till Edit1.Text. Men nu har jag lite frågor om koden (började med Delphi idag ;) );
Vad gör 'ReWrite(F)', vad gör 'try' och vad gör 'finally' för något? Sen förstod jag inte riktigt kommentaren:

Eller Reset alt. Append om minfil.txt redan finns

Tack än en gång! :)

Alpha IIMedlem sedan maj 20002 993 inlägg
#4

ReWrite gör att du skriver om filen ifrån början. Try och finally har med felhantering att göra. Om du ska göra saker som inte alltid fungerar kan du använda try.

taper lawyerMedlem sedan jan. 2004155 inlägg
#5

Och ifall man skriver Append(F) istället för ReWrite(F) så skriver den i slutet på filen istället för att skriva om?
Tack för svaren!

taper lawyerMedlem sedan jan. 2004155 inlägg
#6

Skulle behöva hjälp med att komma på något litet enkelt att programmera. Jag kommer inte på en enda liten applikation man kan knacka fram.

267 ms totalt · 3 externa anrop · v20260731065814-full.30151723
138 ms — hämta forumlista (db)
126 ms — hämta statistik (db)
125 ms — hämta tråd, inlägg och bilagor (db)