Advanced Inno Setup Example

[DelphiBuilder]

TBitmapImageCreate

FBitmapImage:=BitmapImageCreate(WizardForm, alNone, True, clBtnFace, 'BitmapImage.bmp', '{tmp}\BitmapImage.bmp', False, crDefault, crDrag, dmManual, True, 'BitmapImage Create Hint', True, nil, clNone, clNone, False, False, 0, True, 20, 20, 200, 200, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil);

BitmapImageGetParent(FBitmapImage);
 BitmapImageGetAlign(FBitmapImage);
 BitmapImageGetAutoSize(FBitmapImage);
 BitmapImageGetBackColor(FBitmapImage);
 BitmapImageGetBitmap(FBitmapImage);
 BitmapImageGetCenter(FBitmapImage);
 BitmapImageGetCursor(FBitmapImage);
 BitmapImageGetDragCursor(FBitmapImage);
 BitmapImageGetDragMode(FBitmapImage);
 BitmapImageGetEnabled(FBitmapImage);
 BitmapImageGetHint(FBitmapImage);
 BitmapImageGetParentShowHint(FBitmapImage);
 BitmapImageGetPopupMenu(FBitmapImage);
 BitmapImageGetReplaceColor(FBitmapImage);
 BitmapImageGetReplaceWithColor(FBitmapImage);
 BitmapImageGetShowHint(FBitmapImage);
 BitmapImageGetStretch(FBitmapImage);
 BitmapImageGetTag(FBitmapImage);
 BitmapImageGetVisible(FBitmapImage);
 BitmapImageGetLeft(FBitmapImage);
 BitmapImageGetTop(FBitmapImage);
 BitmapImageGetHeight(FBitmapImage);
 BitmapImageGetWidth(FBitmapImage);
 BitmapImageGetBounds(FBitmapImage);

BitmapImageSetParent(FBitmapImage, WizardForm);
 BitmapImageSetAlign(FBitmapImage, alNone);
 BitmapImageSetAutoSize(FBitmapImage, True);
 BitmapImageSetBackColor(FBitmapImage, clBtnFace);
 ExtractTemporaryFile('BitmapImage.bmp');
 BitmapImageSetBitmap(FBitmapImage, '{tmp}\BitmapImage.bmp');
 BitmapImageSetCenter(FBitmapImage, False);
 BitmapImageSetCursor(FBitmapImage, crDefault);
 BitmapImageSetDragCursor(FBitmapImage, crDrag);
 BitmapImageSetDragMode(FBitmapImage, dmManual);
 BitmapImageSetEnabled(FBitmapImage, True);
 BitmapImageSetHint(FBitmapImage, 'BitmapImage Create Hint');
 BitmapImageSetParentShowHint(FBitmapImage, True);
 BitmapImageSetPopupMenu(FBitmapImage, nil);
 BitmapImageSetReplaceColor(FBitmapImage, clNone);
 BitmapImageSetReplaceWithColor(FBitmapImage, clNone);
 BitmapImageSetShowHint(FBitmapImage, False);
 BitmapImageSetStretch(FBitmapImage, False);
 BitmapImageSetTag(FBitmapImage, 0);
 BitmapImageSetVisible(FBitmapImage, True);
 BitmapImageSetLeft(FBitmapImage, 20);
 BitmapImageSetTop(FBitmapImage, 20);
 BitmapImageSetHeight(FBitmapImage, 200);
 BitmapImageSetWidth(FBitmapImage, 200);
 BitmapImageSetBounds(FBitmapImage, 20, 20, 200, 200);

 BitmapImageSetEvent(FBitmapImage, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil);