W jaki sposób zapisać do pliku ini wartosci stylu uzytych fontow w programie (chodzi mi o fsBold,fsUnderline, itp.) prosze o przykład
0
0
zapis:
var
INI : TINIFile;
begin
INI := TINIFile.Create('c:\plik.INI');
try
INI.WriteInteger('Sekcja','Foncik', Byte(Font.Style));
finally
INI.Free;
end;
end;
odczyt:
var
INI : TINIFile;
begin
INI := TINIFile.Create('c:\plik.INI');
try
Font.Style := TFontStyles(Byte(INI.ReadInteger('Sekcja','Foncik', 0)));
finally
INI.Free;
end;
end;
---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-