Thema: Delphi Wie wichtig ist FREE?

Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#8

Re: Wie wichtig ist FREE?

  Alt 14. Jan 2009, 14:24
Primär benötigst du erstmal etwas um diese konkurrierenden Schreibzugriffe zu steuern ... !

Um in eine Textdatei etwas zu speichern verfährst du am besten so:
Delphi-Quellcode:
var
  MeineDatei : Text;
begin
  AssignFile( MeineDatei, 'C:\Daten\MeineDatei.txt' );
  AppendFile( MeineDatei );
  WriteLn( MeineDatei, 'Ich will auch mal' );
  CloseFile( MeineDatei );
end;
Bei so einem Zugriff habe ich nix mit einem Objekt zu tun, also auch nix mit FREE am Hut.
Hier wird jetzt die Datei zum Anhängen geöffnet und nach dem Schreiben sofort wieder geschlossen.

Was noch nicht passiert, ist die Abfrage, ob auf diese Datei überhaupt schreibend zugegriffen werden kann, dieses müsstest du noch einbauen. Wie man das macht, findest du eigentlich auch hier im Forum.

cu

Oliver
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat