Проблема Помогите? замена стандартных чекбоксов и радиобуттонов

sergy22051988

Пользователь
Доброе времени суток,
Подскажите скрип на замену стандартных чекбоксов и радиобуттонов на свои в формате (bmp)
Заранее огромное спасибо
 
Последнее редактирование:

sergy22051988

Пользователь
Код:
[Files]
Source: "Embedded\BTNImage.bmp"; DestDir: "{tmp}"; Flags: dontcopy nocompression;

[Code]
procedure InitializeWizard;
var
  BTNImage: TBitmapImage;
  BTNImageStream: TMemoryStream;
begin
  BTNImageStream := TMemoryStream.Create;
  ExtractTemporaryFileToStream('BTNImage.bmp', BTNImageStream);
  BTNImageStream.Position := ScaleX(0);

  BTNImage := TBitmapImage.Create(WizardForm);
  BTNImage.Bitmap.LoadFromStream(BTNImageStream);

  with WizardForm.ComponentsList do
  begin
   LoadBtnBmpFromBitmap(BTNImage.Bitmap);
  end;
end;

Дали на другом форуме вот этот скрипт
НОООО у него есть беда со скином, и VCL стилями

Может кто сможет исправит или подправить
 

Вложения

sergy22051988

Пользователь
Сверху