View Single Post
  #1  
Old 23-12-2022, 22:04
DelphiBuilder's Avatar
DelphiBuilder DelphiBuilder is offline
Registered User
 
Join Date: Dec 2022
Location: From Nowhere
Posts: 25
Thanks: 6
Thanked 41 Times in 19 Posts
DelphiBuilder is on a distinguished road
Post TBitmapImageCreate

TBitmapImageCreate

Code:
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);
Code:
  • 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);
Code:
  • 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);
Code:
 BitmapImageSetEvent(FBitmapImage, @OnClick, nil, nil, nil, nil, nil, nil, nil, nil, nil);
Attached Images
File Type: png BitmapImage Create.png (32.7 KB, 131 views)
Attached Files
File Type: 7z BitmapImage Create.7z (616.6 KB, 5 views)

Last edited by DelphiBuilder; 24-12-2022 at 13:18.
Reply With Quote
The Following User Says Thank You to DelphiBuilder For This Useful Post:
Gehrman (23-12-2022)
Sponsored Links