TTimer und TFilestream

Arne · Beiträge: 26

Moin zusammen,

ich habe Code, der mittels einer TTimer Komponente in Delphi 2007 periodisch (einmal je Sekunde) aufgerufen wird. Dieser Code simuliert eine Maschine mit ihren Aktorstellungen (on/off). Nun möchte ich diese Aktorstellungen sekündlich in eine CSV Datei schieben. Und hier fängt das Problem an: im Debugger springt er mir über meine Zeile zum Wegschreiben einfach drüber - führt sie nicht aus.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

var
  myFileData : String;
begin
  if myFileStream <> nil then begin
    myFileData := ...
    myFileStream.WriteBuffer(PChar(myFileData)^, Length(myFileData)); { diese Zeile überspringt der Debugger einfach und geht direkt zum letztn end! }
  end;
end;

Packe ich Code zum Öffnen und testweise Beschreiben mit einer Zeile in Form.Create() (also bevor TTimer gestartet wurde), so schreibt er in die Datei. Schreibe ich aus der OnTimer Routine in die Datei, so landet nichts im File, bzw. er springt mir über die Write() Zeile. Geöffnet wird die Datei ebenfalls im OnTimer-Code. Das myFilestream.Free passiert auch in OnTimer-Code. Auch nach Ausführen des Free wird die Datei nicht einmal angelegt.

Darf ich aus der OnTimer Routine nicht in TFilestreams schreiben?

thanx, Arne

Ehemaliges Mitglied Erhaltene Danke: 1

Und wo ist der Konstruktor vom myFilestream?

Arne · Beiträge: 26

Wenn ich im Konstruktor einen festen Pfad vorgebe

markieren

Delphi-Quelltext

1:	myFileStream.TFileStream.Create('D:\actors.csv', fmCreate);

dann funktioniert es.
Aber mit

markieren

Delphi-Quelltext

1:	myFileStream.TFileStream.Create('actors.csv', fmCreate);

oder

markieren

Delphi-Quelltext

1:	myFileStream.TFileStream.Create('.\actors.csv', fmCreate);

funktioniert es nicht.

Ehemaliges Mitglied Erhaltene Danke: 1

Argh!!! Wie oft wird hier gepredigt absolute Pfade zu verwenden? Bestimmt bei jedem Thread, in dem es um das Lesen oder Schreiben von Dateien geht. Spricht sich dass denn nie mal rum?

Martok · Verfasst: Mo 22.11.10 14:50

Luckie hat folgendes geschrieben :

Argh!!! Wie oft wird hier gepredigt absolute Pfade zu verwenden? Bestimmt bei jedem Thread, in dem es um das Lesen oder Schreiben von Dateien geht. Spricht sich dass denn nie mal rum?

Wie oft wird hier gepredigt, kein GOTO zu verwenden?
Wie oft wird hier gepredigt, dass man nicht auf true (oder false) vergleicht?

Siehst, worauf ich hinaus will? :roll:

_________________
"The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."

elundril · Verfasst: Mo 22.11.10 14:59

Martok hat folgendes geschrieben :

Luckie hat folgendes geschrieben :

Argh!!! Wie oft wird hier gepredigt absolute Pfade zu verwenden? Bestimmt bei jedem Thread, in dem es um das Lesen oder Schreiben von Dateien geht. Spricht sich dass denn nie mal rum?

Wie oft wird hier gepredigt, kein GOTO zu verwenden?
Wie oft wird hier gepredigt, dass man nicht auf true (oder false) vergleicht?

Siehst, worauf ich hinaus will? :roll:

Auf die Wiedereinführung der Prügelstrafe?

_________________

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

matze · Verfasst: Mo 22.11.10 16:33

mal abgesehen davon ist der gepostete Code doch eh falsch.
Was sollen die vielen Punkte? Müssten da nicht eher := hin?

_________________
In the beginning was the word.
And the word was content-type: text/plain.

Ehemaliges Mitglied Erhaltene Danke: 1

Das sollen wohl Auslassungszeichen sein.

jaenicke · Verfasst: Mo 22.11.10 16:44

Arne hat folgendes geschrieben :

Wenn ich im Konstruktor einen festen Pfad vorgebe

Statt eines festen Pfades wäre wie schon gesagt ein absoluter sinnvoll:
www.delphi-library.d...ewtopic.php?p=499701

@ user profile icon

Luckie: er meint die:

Arne hat folgendes geschrieben :

markieren

Delphi-Quelltext

1:	myFileStream.TFileStream.Create('D:\actors.csv', fmCreate);

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme