Einzelnen Beitrag anzeigen

Benutzerbild von implementation
implementation

Registriert seit: 5. Mai 2008
940 Beiträge
 
FreePascal / Lazarus
 
#8

Re: Problem mit IniFile

  Alt 5. Jan 2009, 10:42
Geht immer noch nicht.
Delphi-Quellcode:
unit Windesk.ConfigReadWrite;

interface

implementation

uses IniFiles, Windesk.Colors, SysUtils,Forms;

var INI : TIniFile; Vari: Variant;

initialization
  INI := TIniFile.Create(ExtractFileDir(Application.Exename)+'Config.ini');
  Workspace := INI.ReadInteger('Colors','Workspace',PaintGreen);
finalization
  INI.WriteInteger('Colors','Workspace',Workspace);
  INI.Free;
end.
Marvin
  Mit Zitat antworten Zitat