Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
fehler gefunden,
in dem wust hatte sich doch tatsache closefile(datei) noch in die schleife reingeschmuggelt.
viel Lärm um nichts und die Erkenntnis, nächstes mal den Quellcode besser zu ordnen.
Vielen Dank an alle.
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
hat sich zum anfangspost nicht geändert
procedure TForm1.btn_ladeClick(Sender: TObject);
var
daten1: array of string;
s: string ;
datei: textfile;
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
irgendwie habe ich den Eindruck, hier liest keiner was ich schreibe.
"mit append wird die datei ebenfalls geöffnet und um eine '1' erweitert- also wird die schreibsequenz wieder einmal ausgeführt und dann abgebrochen. Ich formartiere das hier gleich neu.....
Also, Datei wird eröffnet und einmal beschrieben - was nun? "
also klappt das Erstellen, Öffnen und Beschreiben. Nur nach einem...
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
Habe ich doch geschrieben und dürfte doch auch aus meinem Quelltext erkenntlich sein...
-Datei erstellen
-Öffnen zum beschreiben/überschreiben
-in einer Schleife Strings schreiben
- Datei schließen
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
mit append wird die datei ebenfalls geöffnet und um eine '1' erweitert- also wird die schreibsequenz wieder einmal ausgeführt und dann abgebrochen. Ich formartiere das hier gleich neu.....
Also, Datei wird eröffnet und einmal beschrieben - was nun?
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
also Schreibrechte habe ich, Datei wird ja erstellt. Es steht auch eine '1' drin, also wird die Schleife einmal durchlaufen und dann bricht er ab.
den Vorschlag von turbopascal habe ich durchgeführt. entweder 103(reset) oder 105(rewrite). siehe weiter oben mein edit.
Bin etwas ratlos, denn normalerweise müßte es ja auch gehen und langsam habe ich auch die Faxen dicke.
Kann doch nicht sein,...
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
habe ich gerade probiert,allerdings mit rewrite *g
geht auch nicht...Fehlercode 103....und immer beim writeln bleibt erhängen..
achso, Festplatte hat noch Platz, habe ich auch schon überprüft
edit: habe bissel probiert
{$I-}
reset(f);
{$I+}
...
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
datei: textfile;
wenn du das meinst ja - oder was meinst du? Habe 'datei' als textfile deklariert.
So wie ich es eigentlich hier an einigen Beispielen gesehen habe.
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
writeln(datei,s); // Hier steigt er aus
das steht zumindest der Cursor nach dem Abbruch
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
dafür war eigentlich die nachfolgende IO-result-anweisung gedacht...
aber selbst wenn ich reset durch rewrite ersetze, klappt es nicht. Oder ist rewrite nicht der richtige Befehl?
Forum: Sonstige Fragen zu Delphi
Delphi
by Kasch,
16. Jul 2006
Hallo Leute,
sollte eigentlich recht einfach sein, aber scheinbar doch nicht:
procedure TForm1.btn_ladeClick(Sender: TObject);
var
daten1: array of string;
s: string ;
datei: textfile;