Interface Debugging

Methods and utilities to debug interfaces. These are disabled by default, to enable them you must define the following compiler directive:

{$DEFINE WL_DEBUG_INTERFACES}

Button.Draw

procedure TButton.Draw(img: TImage; color: Integer = $00FFFF);

Draws the current TButton on the img passed in.

Example:

{$I WaspLib/main.simba}
var
  img: TImage;
begin
  img := Target.GetImage();
  Bank.Buttons[EBankButtons.MENU].Draw(img);
  img.Show();
end;

ButtonArray.Draw

procedure TButtonArray.Draw(img: TImage; color: Integer = $00FFFF);

Draws the current TButtonArray on the img passed in.

Example:

{$I WaspLib/main.simba}
var
  img: TImage;
begin
  img := Target.GetImage();
  Bank.Buttons.Draw(img);
  img.Show();
end;

ScrollBar.Draw

procedure TScrollBar.Draw(img: TImage);

Draws the current TScrollBar type on the img passed in.

Example:

{$I WaspLib/main.simba}
var
  img: TImage;
begin
  img := Target.GetImage();
  Bank.Scroll.Draw(img);
  img.Show();
end;


Interface.Draw

procedure TInterface.Draw(img: TImage);
procedure TGameTabs.Draw(img: TImage);
procedure TChat.Draw(img: TImage);
procedure TMake.Draw(img: TImage);
procedure TBank.Draw(img: TImage);
procedure TBankPin.Draw(img: TImage);
procedure TCollectionBox.Draw(img: TImage);
procedure TDepositBox.Draw(img: TImage);
procedure TShop.Draw(img: TImage);
procedure TGoldScreen.Draw(img: TImage);
procedure TSilverScreen.Draw(img: TImage);
procedure TLamp.Draw(img: TImage);

Draws several parts of the interface on a TImage

Example:

{$I WaspLib/main.simba}
var
  img: TImage;
begin
  img := Target.GetImage();
  GoldScreen.Draw(img);
  img.Show();
end;