SynEdit TFontStyles aus INI lesen?

[Muetze1]

Oh, ja, richtig, ein Fehler in meinem Code. Luckie hat es ja richtig korrigiert.

Aber eins würde mich noch interessieren: Wer ist Motzi?

[Deathman]

Hi Leute

Also ich hab jetzt die Daten inner INI gespeichert. hat alles super geklappt.

Problem ist dass ich die Daten jetzt abrufen wollte und mein Programm sich aufhängt.

Delphi-Quellcode:

procedure TNotdienstanzeige.FormActivate(Sender: TObject);
var Ini:TInifile;
begin
Ini.Create(Extractfilepath(Paramstr(0))+'ablauf.ini');
Label3.Font.Color:=StringToColor(Ini.ReadString('schrift','farbe','$00336600'));
Label3.Font.Name:=ini.ReadString('schrift','art','Arial');
Label3.Font.Size:=ini.ReadInteger('schrift','größe',10);
Label3.Font.Style:=EinStellung.IntToFontStyle(ini.ReadInteger('schrift','Style',0));
ini.Free;
end;

[bigg]

Was hat dein Problem noch mit Synedit zu tun?
Wenn du Probleme mit der Klasse "TINI" hast, erstelle einen neuen Thread.

[Muetze1]

Wenn das Schreiben in die INI funktioniert, dann wette ich mir dir um ein Ü-Ei, dass die Instanziierung beim Schreiben der Werte deutlich anders aussah als diese Zeile beim Einlesen:

Ini.Create(Extractfilepath(Paramstr(0))+'ablauf.ini'); Delphi Grundlagen lernen!

Empfehlung: Resourcen-Schutzblock aus Try/Finally rumbauen.

[Deathman]

1. Sorry dass ich erst jetzt antworte
2. sorry dass ich hier gepostet habe aber es ging halt um das schreiben und lesen von fontStyle Eigenschaftem

3. die Zeile sa so aus da ich nur eine INI aus Übersichtsgründen verwende.

Der Fehler taucht auf wenn ich die Form aktiviere also sobald er die Procedur ausführt.

THX

[Muetze1]

Zitat von Deathman:

3. die Zeile sa so aus da ich nur eine INI aus Übersichtsgründen verwende.

Wenn du sie so wie du es dort oben gepostet hast, auch in deinem Quellcode hast, dann ist der Absturz komplett erklärbar. Auch die Lösung sollte schon vorhanden sein, da ich geschrieben habe, wo diese findest.

Mein Hinweis auf die OOP/Delphi Grundlagen erklären den Fehler gleichermassen und sollten ebenso auf den korrekten Code führen.

[Deathman]

Tut mir Leid habs echt net gesehn als ich deinen post gelesen hatte und den Quelltext nochmal angeguckt hab war es mir dann auch klar.

[Muetze1]

Sehr schön - wenn man es selber findet lernt man eh mehr als wenn ich dir einfach nur die Lösung geschrieben hätte.