Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Datei bei Programmstart laden


dsJena - Mi 27.12.06 14:43
Titel: Datei bei Programmstart laden
Sorry, als Titel ist mir auf Anhieb nichts besseres eingefallen. :oops:

Mein Problem: Ich habe einen Texteditor programmiert, mit Richtext-Unterstützung, speichern, laden, drucken, alles schön. Nun möchte ich den Editor ins System eingliedern, das heißt als Standardeditor für Text- und .rtf-Datein festlegen. Klappt auch alles schön. Jetzt fehlt nur noch, dass ich, wenn ich auf die Textdatei (z.B. im Explorer) doppelklicke, der Text in meine Memo-Komponente geladen wird; bisher wird nur das Programm aufgerufen - man muss ja irgendwie den Dateinamen von Windows erhalten, oder so - ich weiß echt nicht, wie es machen soll - bitte helft mir!!!.

Und noch eine Frage: Wie kann man den Speicherndialog unterbinden, also einen Button erstellen, mit dem man dann direkt speichern kann?

Vielen Dank!


jakobwenzel - Mi 27.12.06 14:49

Suche in: Delphi-Forum, Delphi-Library PARAMSTR


elundril - Mi 27.12.06 14:50

weil ich so nett bin hab ich dir da was gesucht:http://www.delphi-forum.de/viewtopic.php?t=67025&highlight=parameter+%F6ffnen

und nen dein topic um. zb in datei bei programmstart laden.

lg el


dsJena - Mi 27.12.06 14:55

Danke, für die Hilfe, ich bin ja noch neu hier. :wink:

Vielleicht noch zu meiner 2.Frage, mit dem Nur-Speichern - wie mache ich das?


elundril - Mi 27.12.06 15:04

dazu brauchst du eine Variable in dem du den Filename speicherst.
natürlich muss die variable global definiert sein. am besten im privat -declarations teil vom Form.

Delphi-Quelltext
1:
2:
3:
4:
if savedialog1.execute then begin
  Dateiname:=savedialog1.filename;
  Memo1.lines.savetofile(Dateiname)
end;


Dann überprüfst du ob dein Dateiname existiert.

Delphi-Quelltext
1:
2:
3:
4:
if length(Dateiname)>0 then
  Memo1.lines.savetofile(dateiname)
else
  Speichernohnedateiname;


beim "Neu" klicken muss man dann natürlich dem Dateinamen einen Leerstring zuweisen:

Delphi-Quelltext
1:
Dateiname:='';                    


lg el

PS. darf ich dabei auf meinen Textus verweisen?? http://www.delphi-forum.de/viewtopic.php?t=59299&highlight=


dsJena - Mi 27.12.06 15:07

Danke, danke, danke, genau was ich gesucht habe!!!