Eigener Dateientyp -> Datei leer

[citybreaker]

Hallo,
ich habe mithilfe von Swissdelphicenter einen eigenen Dateientyp regestiert.
Doch wenn ich jetzt auf die Datei doppelklicke bleibt meine memo leer, obwohl
in der textdatei etwas drinne steht. Kann mir jemand sagen was ich jetzt noch
zusätzlich ändern muss?

Hier ist die Source die ich verwendet habe. --> http://www.swissdelphicenter.ch/de/showcode.php?id=178

[Sprint]

Zitat von citybreaker:

Doch wenn ich jetzt auf die Datei doppelklicke bleibt meine memo leer, obwohl
in der textdatei etwas drinne steht.

Von selber geht der Text aus der Datei nicht ins Memo.

[Meflin]

Zitat von Sprint:

Zitat von citybreaker:

Doch wenn ich jetzt auf die Datei doppelklicke bleibt meine memo leer, obwohl
in der textdatei etwas drinne steht.

Von selber geht der Text aus der Datei nicht ins Memo.

oder anders gesagt du musst den parameter der deiner anwendung beimn öffnen durch die datei übergeben wird auslesen (das ist der dateiname) und den text ins memo laden

[citybreaker]

Wie finde ich herraus welche Datei geöffnet wird?!

[Meflin]

ins onCreate deiner form:

Delphi-Quellcode:

if ParamCount > 0 then begin
dateiname := ParamStr(1);
memo1.lines.loadfromfile(dateiname);
end;

[Sprint]

Zitat von citybreaker:

Wie finde ich herraus welche Datei geöffnet wird?!

Es wird keine Datei geöffnet. Windows startet dein Programm und schickt den Dateinamen gleich mit. Diesen kannst du mit ParamStr ermitteln und mit der Funktion LoadFromFile kannst du dann die Datei in dein Memo laden.