Einzelnen Beitrag anzeigen

Benutzerbild von smallsmoker
smallsmoker

Registriert seit: 12. Nov 2007
Ort: Duisburg
283 Beiträge
 
#4

Re: Checkbox-wert aus INI lesen und form schliessen geht nic

  Alt 2. Jun 2008, 17:07
Delphi-Quellcode:
program intro2;

uses
  Forms,
  main in 'main.pas{frmMain},
  frmIntro in 'frmIntro.pas{frmMeldung},
  inifiles;

{$R *.res}

var ini:tinifile;

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TfrmMeldung, frmMeldung);

try
ini := TiniFile.Create(meinVerzeichnis + '\config.ini');
if ini.readbool('Intro','State',false) then frmMeldung.show;
//bzw if (not ini.readbool('Intro','State',false)) then frmMeldung.show;
finally
ini.free
end;

Application.Run;
end.
  Mit Zitat antworten Zitat