-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
LOL
Aber wenn mans ganz genau nimmt, hat niemand gesagt, dass ich die mir durchlesen soll... :p
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
An alle: DANKE!
Jetzt haben wir (zumindest ich) mir den Abend mit so einem blöden Fehler versaut...
@Sir Rufo:
Wo habe ich nicht das gemacht, was Du wolltest?
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Ich muss mich wohl korrigieren, hatte vorhin mal aus Versehen XP als OS geschrieben...gemeint war eigentlich Vista...wie spätestens beim Lesen der folgenden Datei klar wird :oops:
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
@Heiko und hoika:
Das war schon Mal ein Treffer in die richtige Richtung.
Ich habe das jetzt nach deinem HInweis mal wie folgt abgeändert:
begin
ComboBox1.Items.Clear;
i:= 0;
{$i-}
sFileName:=ExtractFilePath(Application.ExeName)+'data\dri\dri.txt';
AssignFile(fahrerliste,sFileName);
try
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
@Aphton:
Meldung kommt: Das System kann die angegebene Datei nicht finden.
Ich hoffe das ist das richtige im Anhang. Die Datei, die ich eigentlich hochladen wollte, durfte ich nicht hochladen.
Wenn Du dir das ansiehst, ignoriere bitte die vielen Buttons, Labels etc, die noch keine Funktion haben. Ich wollte wie gesagt erst das Gerüst bauen und dann nach und nach die Daten einfügen.
Die...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
So gern ich es sagen würde, aber das war leider nicht die Lösung. Ich habe seit Ewigkeiten alles ausprobiert, sowohl mit als auch ohne Backslash. (Ich glaube das hab ich zwischendurch mal irgendwo erwähnt?)
Edit:
Vielleicht hilft es, wenn ich nochmal genau zeige, wo der Fehler kommt?
Bei diesem Code-Schnipsel wird mir die unterste Zeile als Fehlerquelle angezeigt:
...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
AssignFile(fahrerliste,ExtractFilePath(Application.ExeName) + '\data\dri\dri.txt')
if FileExists(ExtractFilePath(Application.ExeName) + '\data\dri\dri.txt') then
ShowMessage('Existiert');
Die Datei namens "dri.txt" liegt im Ordner C:\Users\ich\Desktop\abrechnung\data\dri
Und im Ordner C:\Users\ich\Desktop\abrechnung liegt die .exe die ich benutze.
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Nein, da kommt nichts.
Aber die Datei ist wirklich vorhanden...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
@Chemiker:
Die Datei mit dem Editor zu öffnen geht. Sie ist vorhanden und beinhaltet Daten.
@Aphton:
Das ist so gewollt...zumindest vorerst. Die weiteren Schritte sollen sein, dass ich aus der Datei die Inhalte für die ComboBox auslese. Doch dafür muss ich erst mal die Datei öffnen, und um zu testen dass alles klappt, habe ich einfach ein paar Zeilen in der .txt geschrieben, die dann ja nach...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Windows XP, SP2
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Genau das hatte ich ja schon durchprobiert, in jeder erdenklichen Weise. Die Fehlermeldung ist immer dieselbe "Datei nicht gefunden."
Vielleicht übersehe ich ja etwas:
Die exe steckt in C:\Users\ich\Desktop\abrechnung
Die txt, auf die zugegriffen werden soll, in C:\Users\ich\Desktop\abrechnung\data\dri
Dementsprechend sieht der Befehl analog zu Deiner Beschreibung so aus:...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Bis auf den unteren Teil hatte ich das auch schon ausprobiert.
Mein Problem hier ist jetzt halt, dass ich nicht weiß, wo ich den Dateipfad hinstecken muss.
Und alles in einen Ordner packen wäre ungünstig, weil dann noch viel viel mehr Dateien in ähnlicher Weise eingebunden werden sollen...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Bitte nicht hauen, aber blanco (nach dem Entfernen allen Blödsinns durch Ausprobieren) sieht der entsprechende Bereich jetzt so aus. Wenn ihr mir nur sagt, wo und wie ich jetzt den relativen Dateipfad eingebe, wäre ich glücklich.
Aus der Delphi-Hilfe und diversen Foren werde ich nicht schlau... :(
ComboBox1.Items.Clear;
i:= 0;
ExtractFilePath(Application.ExeName);
...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Danke für eure schnellen Antworten, aber irgendwie stehe ich vollkommen auf dem Schlauch. Egal wie ich es versuche, die Fehlermeldung bleibt dieselbe.
Wenn ich das richtig verstanden habe, muss ich bei AssignFile alles zwischen C:\ und dri.txt rausnehmen? Getan. Darüber ExtractFilePath... eingefügt. Nur egal, auf welche Weise ich versuche zu sagen, dass da noch Unterordner dazwischen sind?...
-
Forum: Object-Pascal / Delphi-Language
by dersunny,
19. Jan 2011
Hallo,
ich schreibe an einem Programm, dass etwas umfangreicher ist.
Nun habe ich es geschafft, durch google-Suche schon einige Probleme zu lösen, auch des Lesens der Bücher bin ich mächtig. Nun habe ich ein Problem, bei dem ich nicht mehr weiterweiß.
var
fahrerliste : TextFile;
s : string;
i : integer;