ClPicker := CTRL_ColorPickerCreate;
ClPicker.Left := 120;
ClPicker.Width := 200;
ClPicker.Height := 15;
ClPicker.Top := YMIN_SIZE - 105;
ClPicker.DlgItemID := ID_CLPICKER;
ClPicker.ColorLabel := SKAERO_COLORLABEL;
SKAERO_SplitColorARGB(SKAERO_AEROCOLOR, Alpha, Red, Green, Blue);
ClPicker.UseColor := SKAERO_RGBtoHEX(
RGB(Red, Green, Blue));
ClPicker.ColorImg := SKAERO_FOLDER + '
color190.bmp';
ClPicker.PipetteCursor := SKAERO_FOLDER + '
pipette.cur';
ClPicker.DropDownImg := SKAERO_FOLDER + '
BTN_DropDown.png';
ClPicker.CreateWindow(hMain);
SKAERO_SetAnchorMode(ClPicker.Handle, ANCHOR_BOTTOM);
SKAERO_SetZorder(ClPicker.Handle, HWND_TOP);