Avatar billede clansite.dk Nybegynder
02. december 2004 - 09:28 Der er 2 kommentarer og
1 løsning

Sæt checkbox til checked

procedure TForm1.FormCreate(Sender: TObject);
var
    myINI : TINIFile;
    res : string;
    inivalue : string;
begin
    myINI := TINIFile.Create(ExtractFilePath(Application.EXEName) + 'Settings.ini');
    res := myINI.ReadString('Settings', 'Autoload', 'Checked');
    inivalue := 'Checked';
    myINI.Free;

    if (res=inivalue) then CheckBox1.Perform(BM_SETCHECK, 1, 0)
    else CheckBox1.Perform(BM_SETCHECK, 0, 0);

end;

-----

Hvordan kan det være at den ikke sætter den til Checked? Inifilen er rigtig

[Settings]
Autoload=Checked
Avatar billede dkn Nybegynder
02. december 2004 - 10:16 #1
Prøv at hold det i samme type, bliver nemmere så.

procedure TForm1.FormCreate(Sender: TObject);
var
    myINI : TINIFile;
begin
    myINI := TINIFile.Create(ExtractFilePath(Application.EXEName) + 'Settings.ini');
    CheckBox1.Checked := myINI.ReadBool('Settings', 'Autoload', False);
    myINI.Free;
end;
Avatar billede tolderlund Nybegynder
02. december 2004 - 10:17 #2
I FormCreate har CheckBox ikke en handle endnu og det skal den have for at det virker.
Gør dette først:
  CheckBox1.HandleNeeded;
Avatar billede clansite.dk Nybegynder
02. december 2004 - 10:58 #3
dkn > Beklager, men det virkede ikke.
tolderlund > Tak :o) Nu virker det.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester