Datei in Memo laden

[Ratte]

@r_kerber: Wenn ich das Programm ohne die "" aufrufe passiert garnichts. Außerdem wird in der Titelzeile der Name ohne "" angezeigt!

@eddy: Neue Datei erstellt, Parameter geändert: Nichts!

Delphi-Quellcode:

Form1.Caption:='Programm - '+Dateiname;
    memo1.lines.loadfromfile(Dateiname);

funktioniert mit vorherigem Aufruf eines FileOpen-Dialogs perfekt.

Ratte :gruebel: :gruebel: :gruebel:

[r_kerber]

*ratlosdreinschau*
Lass Dir doch mal anzeigen was in Dateiname steht!

[Basic-Master]

Zitat:

Zitat von Ratte

@r_kerber: Wenn ich das Programm ohne die "" aufrufe passiert garnichts. Außerdem wird in der Titelzeile der Name ohne "" angezeigt!

@eddy: Neue Datei erstellt, Parameter geändert: Nichts!

Delphi-Quellcode:

Form1.Caption:='Programm - '+Dateiname;
    memo1.lines.loadfromfile(Dateiname);

funktioniert mit vorherigem Aufruf eines FileOpen-Dialogs perfekt.

Ratte :gruebel: :gruebel: :gruebel:

haste schon mal ne datei auf dein programm gezogen :?: vllt liegts daran, dass in deinem paramstr am anfang n "-" ist, klemm das ma dazwischen:

Delphi-Quellcode:

if paramstr(1)[1] = '-' then
dateiname := copy(paramstr(1), 2, length(paramstr(1))
else 
dateiname := paramstr(1);

[eddy]

Hallo Ratte,

typischer Fall von: Das kann doch gar nicht sein.

Ich hab' Dir mal mein TestMemo mit allen Dateien und meiner 2.txt gepackt und angefügt.

Probier' mal, ob das bei Dir läuft.

mfg
eddy

[Ratte]

Hi,

Problem gelöst!!!! Normalerweise Steht am Anfang in einer Memo doch der Name der Memo. Also hatte ich in FormActivate das Memo gelöscht. Aber FormCreate wird doch davor ausgeführt! Also habe ich die Datei in das Memo geschrieben und gleich wieder gelöscht.:wall::wall::wall::wall::wall::wall:
Trotzdem noch mal danke für eure Bemühungen!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!