Speichern von Einstellungen

[r4d]

Bin n00b, schreib grad mal mein erstes Notepad :D und hab da jetzt 1 Problem:
Gibt es die Möglichkeit, die Eigenschaften einzelner Objekte (z.B. Memos) in eine Datei (mit Savetofile?) zu speichern?

Ich hab z.B. "Memo1.Font.Name.savetofile('c:\blabla\blablabla\gnaa.txt')" probiert... Fehlermeldung: "Record, object or class type required" ...

Thx 4 help im Vorraus... :)

[D4N73]

Jo.. dies ist kein Problem ;)


So LÄDST du eine datei... deren Namen du festgesetzt z.B (C:\Datei.txt) hast:

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.LoadFromFile('C:\Datei.txt');
end;

So SPEICHERST du den Inhalt der memo...

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.SaveToFile('C:\Datei.txt');
end;

...Das ganze geht auch noch in verbindung mit dem Open/Save -dialog
vorher musst du den Open und/oder den Save dialog auf deinem projekt erstellen

SPEICHERN DER MEMO:

procedure TForm1.Button1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
Memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;

LADEN EINER TEXTDATEI INS MEMOFELD

procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
Memo1.Lines.LoadFromFile(Opendialog1.FileName);
end;

am besten schreibst du da noch eine else routine rein... d.h wenn der OPENDIALOG aufpoppt und die datei net existiert oder du
auf "abbrechen" klickst ... kein Fehler auftritt...
hoffe dies hilft dir weiter ;)

D4N73

visit: http://elite.to/elitecorps

[Messiah_of_Death]

des hast du falsch verstanden

er meint nicht die getippten Zeilen, sondern die Einstellungen ( Font, Font-Size, Font-Color etc.)

..das kannst du a. mit INI-Files machen oder b. mit der Registry

da machst du für jedes Teil das du speichern willst in der Ini/Registry nen Eintrag

sieht dann so z.B. aus:

[Schrift-Einstellung]

Groesse=10pt
Name=Arial
Farbe=Rot

^-^

[xOOn]

waere schoen wenn das so gehen wuerde

Memo1.Font.Name.savetofile('c:\blabla\blablabla\gnaa.txt'

nur leider gibt es savetofile fuer TFont nicht also, du musst dir jede eigenschaft selbst saven, zb mit TIniFile

TIniFile ist easy zu benutzen, ich glaube, dass das keiner weiteren beschreibung bedarf :)

[r4d]

hmmm, doch :rolleyes:
*nixplan*

ich mein, was ini files sind, ist mir wohl bekannt... ;)
aber wie schreib ich z.b. alle eigenschaften eines memos (per button.click etc.) in eine ini-datei und les diese dann bei jedem form.create wieder aus?

was ich eigentlich erreichen will:
einen texteditor basteln, der sich merkt, welche schriftgröße, -farbe, hintergrundfarbe etc. ich beim letzten schliessen eingestellt hatte... =)

[Felix Kaiser]

Memo macht sich ungünstig, da es viele Zeilen sind bzw. in der Eigenschaft Text auch CRLF enthalten sind, Möglichkeit:

var
ini: TIniFile;
i: integer;
begin
ini:= TIniFile.Create(ChangeFileExt(ParamStr(0),'.ini'));
ini.WriteInteger('Memo1','LineCount',Memo1.Lines.Count);
for i:= 1 to Memo1.Lines.Count do
ini.WriteString('Memo1','Line'+IntToStr(i),Memo1.Lines[i-1]);
ini.Destroy;
end;

Zum Speichern des Inhalts von Memo1 in einer dem Programm gleichnamigen INI. Wie du das wieder einlesen kannst solltest du schon selber sehen, ich kau dir hier nicht alles vor
:p

[xOOn]

@r4d

also das hat delphi nicht integeriert also musst du hand anlegen, wie, und zwar so, wie du oben selbst geschrieben hast