unit mixer; {$mode objfpc}{$H+} interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ComCtrls, StdCtrls; type { TfrmMixer } TfrmMixer = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; tbMasterVol: TTrackBar; TrackBar1: TTrackBar; TrackBar2: TTrackBar; TrackBar3: TTrackBar; private public end; var frmMixer: TfrmMixer; implementation {$R *.lfm} end.