Вопрос Как убрать фон у чекбоксов?

[Ekspoint]

Какие есть варианты что бы убрать фон чекбоксов если на фоне используешь картинку и скин?

 

[андрей81]

Сфармулируй вопрос по точнее, ты имеешь в веду как убрать задний фон у чекбоксов?

 

[Ekspoint]

Сфармулируй вопрос по точнее, ты имеешь в веду как убрать задний фон у чекбоксов?

Да, про фон

 

[Shegorat]

Да, про фон

Как вариант обрабатывать сообщение WM_CTLCOLOR и создавать текстурную кисть. Где-то был пример.
Может остальные подскажут больше, а я пока занят.

 

[Ekspoint]

Как вариант обрабатывать сообщение WM_CTLCOLOR и создавать текстурную кисть. Где-то был пример.
Может остальные подскажут больше, а я пока занят.

А можно примерчик?

 

[AtotIK]

Я "костыляю" вот таким образом:

var
  ClearModsDir: TCheckBox;

procedure ClearModsDirOnClick(Sender: TObject);
begin
  ClearModsDir.Checked:=Not(ClearModsDir.Checked);
end;

procedure CreateCustomCheckBox();
begin
  ClearModsDir:=TCheckBox.Create(WizardForm);
  with ClearModsDir do
  begin
    Parent:=WizardForm;
    SetBounds(165, 337, 13, 13);
    Checked:=False;
  end;

  ClearModsLabel:=CreateLabel(WizardForm, 185, 336, 0, 0, ExpandConstant('{cm:ClearModsLabel}'), True);
  LabelSetFont(ClearModsLabel, 8, 'Tahoma', $FFFFFF, [fsBold]);
  ClearModsLabel.Alignment:=taLeftJustify;
  ClearModsLabel.OnClick:=@ClearModsDirOnClick;
end;

Создание лейбла править уже не стал, по коду сам поймёшь как дальше.

 

[Ekspoint]

Я "костыляю" вот таким образом:

var
  ClearModsDir: TCheckBox;

procedure ClearModsDirOnClick(Sender: TObject);
begin
  ClearModsDir.Checked:=Not(ClearModsDir.Checked);
end;

procedure CreateCustomCheckBox();
begin
  ClearModsDir:=TCheckBox.Create(WizardForm);
  with ClearModsDir do
  begin
    Parent:=WizardForm;
    SetBounds(165, 337, 13, 13);
    Checked:=False;
  end;

  ClearModsLabel:=CreateLabel(WizardForm, 185, 336, 0, 0, ExpandConstant('{cm:ClearModsLabel}'), True);
  LabelSetFont(ClearModsLabel, 8, 'Tahoma', $FFFFFF, [fsBold]);
  ClearModsLabel.Alignment:=taLeftJustify;
  ClearModsLabel.OnClick:=@ClearModsDirOnClick;
end;

Создание лейбла править уже не стал, по коду сам поймёшь как дальше.

спасиб