Display an image when a task is selected

Viewed 407

I want the tasks display a different image when one of them is checked.

For example, if I have three different tasks:

Task 1: Standard version
Task 2: Lite version
Task 3: Pro version
  • when Task 1 is checked must display an image.
  • when Task 2 is checked must hide Task 1 image and display Task 2 image.
  • When Task 3 is checked must hide others below tasks image and show Task 3 image.

Here some code

[Code]
{ RedesignWizardFormBegin } { Don't remove this line! }
{ Don't modify this section. It is generated automatically. }
var
  BitmapImage1: TBitmapImage;

procedure RedesignWizardForm;
begin
  { BitmapImage1 }
  BitmapImage1 := TBitmapImage.Create(WizardForm);
  with BitmapImage1 do
  begin
    Parent := WizardForm.SelectTasksPage;
    Left := ScaleX(320);
    Top := ScaleY(88);
    Width := ScaleX(57);
    Height := ScaleY(57);
    ExtractTemporaryFile('WizardForm.BitmapImage1.bmp');
    Bitmap.LoadFromFile(ExpandConstant('{tmp}\WizardForm.BitmapImage1.bmp'));
  end;

  with WizardForm.TasksList do
  begin
    Width := ScaleX(257);
    Height := ScaleY(200);
    Visible := False;
  end;
end;
2 Answers
Related