---

Med Add to Repository er der oprette en form ved navn "FontOpsestning"

I Form1Create forsøger jeg, at ændringerne i fmFontOpsestning
skal kunne ændre f.eks Font.Name i Memo1 som befinder sig på Form1

Men får fejlmeddelsen: Se www.sunwind.dk/error.jpg

Kodeeksempel:

procedure TForm1.FormCreate(Sender: TObject);
begin
fmFontOpsestning.Edit1.Text := MyINI.ReadString('Font opsætning', 'FontName', 'Ikke fundet');
fmFontOpsestning.Edit1.Font.Name:= fmFontOpsestning.Edit1.Text;
Form1.Memo1.Font.Name := fmFontOpsestning.Edit1.Text;
end;

Har du et forslag til hvordan dette på en enkelt måde kan lade sig gører?
Gene ændre koderne.

Med venlig hilsen
Monie Jacobsen

---

Kære Monie,
Er lige gået igang med at kigge på vores tidligere aftale, så dit indlæg som jeg også lige
kaster et blik på.
Tænk på et font name ikke er tekst men en link som hvis ikke er eksistent vil være nil.
Mvh Torben

---

Hej Oldwiking
Det lyder meget spænde du kikker på vores projekt. Bare du ikke falder om på kuldet af grin. Jeg er selvlært og ikke god til English.

Selv om jeg tilføjer Arial kommer fejlen aligevel.
fmFontOpsestning.Edit1.Text := MyINI.ReadString('Font opsætning', 'FontName', 'Arial');
fmFontOpsestning.Edit1.Font.Name:= fmFontOpsestning.Edit1.Text;

Men Oldwiking udtrykker jeg mig klart nok til du kan se hvad jeg ønsker med spørgsmålet. Det er nemlig ikke ledt.

Med venlig hilsen
Monie Jacobsen

---

Hej

Prøv evt. at kigge på følgende... Der er en INI/Registry komponent der kan gemme Font'en i .ini filen.

LMD-Tools Freeware Edition

http://www.ceberus.com/lmd/download/index.php3#LMD-Tools%20Special%20Edition

---

Til jrossing
Har hente LMD-Tools Freeware Edition vil sen nærmer på denne LMD-Tools

Mvh
Monie Jacobsen

---

Tak for svaret jrossing.
                        

Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.