Avatar billede geek1011 Nybegynder
24. februar 2002 - 21:29 Der er 2 løsninger

TP 7.0

Er der nogen her, der ved hvordan man gemmer en tekstreng til en fil i TP 7.0 og loader den igen?
Altså, hvis jeg nu siger:
var s : string
begin
writeln('Indtast noget:');
readln(s);
end;

hvordan gemmer jeg så den tekst der nu står i varablen S, til en fil?
Og hvordan loader jeg den igen?
Jeg har før fået noget kode til at gøre dette, men hver gang jeg kører EXE filen ude i DOS, altså RIGTIG DOS, Genstart computeren i MS-DOS tilstand, og kører EXE filen, så siger den, at den kræver Win32.
Så derfor skal jeg bruge noget kode, som virker i TP 7.0

Avatar billede Marting Forsker
25. februar 2002 - 07:35 #1
Hej

har måske lidt du kan brug???

har bliver det gem, det du skrive i en Edit1.text;


procedure TForm1.GemClick(Sender: TObject);

Var
  F: textfile;
  S: String;
Begin
 
  AssignFile(F,'C:\et fil navn');
  Rewrite(F);
  S := Edit1.text;
  WriteLn(F,S);
  CloseFile(F);
End

Martin
Avatar billede hreiff Nybegynder
25. februar 2002 - 09:02 #2
Det hedder kun Assign og Close i TP (ikke assignfile og closefile)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester