PickColor

Definition

procedure PickColor(out Color, X, Y: Integer);

Availability

SCAR Divi 3.00 > Current

Description

Activates the color picker tool to allow the user to pick a color. The color is returned in Color and the picked coordinate in X and Y.

Example

var
  c, x, y: Integer;
begin
  PickColor(c, x, y);
  WriteLn('Color ' + IntToStr(c) + ' at (' + IntToStr(x) + ', ' + IntToStr(y) + ')');
end.

See Also

• GetColor