Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5

[Ask] Cara nambahin efect color Hue di project?

#1
Question 
Ajarin ane dong Mbah gimana cara nambahin efect color hue di project ?


Contoh SS:
uzo_sick, proud to be a member of ForNesia Family since May 2014.
#2
(08-07-2014, 01:36 AM)uzo_sick Wrote: Ajarin ane dong Mbah gimana cara nambahin efect color hue di project ?


Contoh SS:

Pake ini mbah

Code:
procedure TForm3.sTrackBar1Change(Sender: TObject);
begin
if (sSkinManager1.HueOffset <> sTrackBar1.Position) then begin
    sSkinManager1.BeginUpdate;
    sSkinManager1.HueOffset := sTrackBar1.Position;
    sSkinManager1.EndUpdate(True, False);
  end;
end;

procedure TForm3.sTrackBar2Change(Sender: TObject);
begin
if (sSkinManager1.Saturation <> sTrackBar2.Position)
    sSkinManager1.BeginUpdate;
    sSkinManager1.Saturation := sTrackBar2.Position;
    sSkinManager1.EndUpdate(True, False);
  end;
end;
wiebie2012, proud to be a member of ForNesia Family since Jun 2014.
#3
(08-09-2014, 01:56 PM)wiebie2012 Wrote:
(08-07-2014, 01:36 AM)uzo_sick Wrote: Ajarin ane dong Mbah gimana cara nambahin efect color hue di project ?


Contoh SS:

Pake ini mbah

Code:
procedure TForm3.sTrackBar1Change(Sender: TObject);
begin
if (sSkinManager1.HueOffset <> sTrackBar1.Position) then begin
    sSkinManager1.BeginUpdate;
    sSkinManager1.HueOffset := sTrackBar1.Position;
    sSkinManager1.EndUpdate(True, False);
  end;
end;

procedure TForm3.sTrackBar2Change(Sender: TObject);
begin
if (sSkinManager1.Saturation <> sTrackBar2.Position)
    sSkinManager1.BeginUpdate;
    sSkinManager1.Saturation := sTrackBar2.Position;
    sSkinManager1.EndUpdate(True, False);
  end;
end;

makasih mbah @wiebie2012 atas pencerahan'a.... wah:
uzo_sick, proud to be a member of ForNesia Family since May 2014.
#4
closed:

Solved siaga:
  


Possibly Related Threads…
Thread Author Replies Views Last Post
  [ASK] Error Open Delphi Project zeph 2 1,422 09-01-2015, 04:46 AM
Last Post: RechmandM
  [ASK] tidak dapat membuka project bidadari.seksi 5 1,948 02-27-2015, 06:52 AM
Last Post: bidadari.seksi