xue@0: /*
xue@0:     Harmonic Visualiser
xue@0: 
xue@0:     An audio file viewer and editor.
xue@0:     Centre for Digital Music, Queen Mary, University of London.
xue@0:     This file copyright 2011 Wen Xue.
xue@0: 
xue@0:     This program is free software; you can redistribute it and/or
xue@0:     modify it under the terms of the GNU General Public License as
xue@0:     published by the Free Software Foundation; either version 2 of the
xue@0:     License, or (at your option) any later version. 
xue@0: */
xue@0: //---------------------------------------------------------------------------
xue@0: #ifndef WaveViewH
xue@0: #define WaveViewH
xue@0: //---------------------------------------------------------------------------
xue@0: /*
xue@0:     WaveView.cpp implements a VCL component for visualizing linear PCM
xue@0:     waveform audio contents and user interactions through this GUI.
xue@0: */
xue@0: 
xue@0: 
xue@0: #include "AudioPac.h"
xue@0: #include "QuickSpec.h"
xue@0: #include "fft.h"
xue@0: 
xue@0: #define C4 261.6255653005986346778499935233
xue@0: 
xue@0: #define ITEMXZOOMIN_TAG   11
xue@0: #define ITEMXZOOMOUT_TAG  12
xue@0: #define ITEMXZOOMRESTORE_TAG  13
xue@0: #define ITEMYZOOMIN_TAG   14
xue@0: #define ITEMYZOOMRESTORE_TAG   15
xue@0: 
xue@0: 
xue@0: #define WV2_STRINGS_1   "%s\n\n%s: %d (%.3fsec)\n%s: %d (%.3fsec)\n%s: %d (%.3fsec)\n\n%s: %.1fhz\n%s: %.1fhz\n%s: %.1fhz\n\n%s: %d (%.3fsec)\n\n%s: %d\n%s: %dbit\n"
xue@0: #define WV2_STRINGS_Amplitude_rms  "Amplitude(rms)"
xue@0: #define WV2_STRINGS_Average  "Average"
xue@0: #define WV2_STRINGS_Bits_per_sample   "Bits per sample"
xue@0: #define WV2_STRINGS_Extract  "Extract"
xue@0: #define WV2_STRINGS_Frequency  "Frequency"
xue@0: #define WV2_STRINGS_From  "From"
xue@0: #define WV2_STRINGS_Maximum  "Maximum"
xue@0: #define WV2_STRINGS_Minimum  "Minimum"
xue@0: #define WV2_STRINGS_Play  "Play"
xue@0: #define WV2_STRINGS_Properties  "Properties..."
xue@0: #define WV2_STRINGS_Properties_current_audio   "Properties: current audio"
xue@0: #define WV2_STRINGS_Properties_selection   "Properties: selection"
xue@0: #define WV2_STRINGS_Samples   "Samples"
xue@0: #define WV2_STRINGS_Samples_per_second   "Samples per second"
xue@0: #define WV2_STRINGS_Size   "Size"
xue@0: #define WV2_STRINGS_Stop_playback  "Stop playback"
xue@0: #define WV2_STRINGS_Time  "Time"
xue@0: #define WV2_STRINGS_To  "To"
xue@0: #define WV2_STRINGS_Total_time   "Total time"
xue@0: #define WV2_STRINGS_X_zoom  "X zoom"
xue@0: #define WV2_STRINGS_X_zoom_all  "X zoom all"
xue@0: #define WV2_STRINGS_X_zoom_in  "X zoom in"
xue@0: #define WV2_STRINGS_X_zoom_out  "X zoom out"
xue@0: #define WV2_STRINGS_Y_zoom  "Y zoom"
xue@0: #define WV2_STRINGS_Y_zoom_all  "Y zoom all"
xue@0: #define WV2_STRINGS_Y_zoom_in  "Y zoom in"
xue@0: #define WV2_STRINGS_Y_zoom_out  "Y zoom out"
xue@0: 
xue@0: #define WV2_VSELECT 1
xue@0: #define WV2_HSELECT 2
xue@0: #define WV2_AMP 4
xue@0: #define WV2_LEFT 1
xue@0: #define WV2_TOP 2
xue@0: #define WV2_RIGHT 4
xue@0: #define WV2_BOTTOM 8
xue@0: 
xue@0: #define WV2_MAX_CHANNEL 16
xue@0: #define WV2_MIN_LOG_FREQ 0.0001
xue@0: #define WV2_LOG_FREQ(f) (((f)>=WV2_MIN_LOG_FREQ)?(f):WV2_MIN_LOG_FREQ)
xue@0: 
xue@0: #define wopIdle -1
xue@0: #define wopDrag 0
xue@0: #define wopSelect 1
xue@0: #define wopReselect 2
xue@0: //---------------------------------------------------------------------------
xue@0: typedef void __fastcall (__closure *TWaveViewCustomPaintEvent)(TObject* Sender, bool &Done);
xue@0: typedef void __fastcall (__closure *TWaveViewCustomPropertyEvent)(TObject* Sender, bool ShowPropSel);
xue@0: typedef int __fastcall (__closure *TWaveViewCustomInfoEvent)(TObject* Sender);
xue@0: struct TWaveViewObject;
xue@0: typedef void __fastcall (__closure *TWaveViewDrawObjectEvent)(TObject* Sender, TWaveViewObject& Obj);
xue@0: typedef void __fastcall (__closure *TWaveViewMousePointerEvent)(TObject* Sender, int PaneIndex, int t, double f);
xue@0: typedef void __fastcall (__closure* TWaveViewMouseLocalDataEvent)(TObject* Sender, void* Data0, void* DataP, void* DataN, int Count, int bytespersample, int t, double f, int Down);
xue@0: typedef void __fastcall (__closure* TWaveViewGetIntervalEvent)(TObject* Sender, int& st, int& en, bool option);
xue@0: typedef void __fastcall (__closure* TWaveViewGetOpModeEvent)(TObject* Sender, TShiftState Shift, int& OpMode);
xue@0: 
xue@0: struct TWaveViewRulerSetting
xue@0: {
xue@0:   TColor FrontColor;
xue@0:   TColor BackColor;
xue@0:   TColor UnitTickColor;
xue@0:   TColor TickColor;
xue@0:   TColor GridColor;
xue@0:   int UnitTickSize;
xue@0:   int TickSize;
xue@0:   TFont* UnitFont;
xue@0:   bool pre_drawing;
xue@0: };
xue@0: 
xue@0: struct TWaveViewSelection
xue@0: {
xue@0:   int StartPos;
xue@0:   int EndPos;
xue@0:   double StartDigiFreq;
xue@0:   double EndDigiFreq;
xue@0:   bool __fastcall operator!=(const TWaveViewSelection& WS)
xue@0:   {
xue@0:     return StartPos!=WS.StartPos || EndPos!=WS.EndPos || StartDigiFreq!=WS.StartDigiFreq || EndDigiFreq!=WS.EndDigiFreq;
xue@0:   }
xue@0: };
xue@0: 
xue@0: typedef enum
xue@0: {
xue@0:   selOuter=0,
xue@0:   selLeft=1,
xue@0:   selTopLeft=3,
xue@0:   selTop=2,
xue@0:   selTopRight=6,
xue@0:   selRight=4,
xue@0:   selBottomRight=12,
xue@0:   selBottom=8,
xue@0:   selBottomLeft=9,
xue@0:   selInner=15,
xue@0:   selNone=0
xue@0: } TWaveViewSelHitTest;
xue@0: 
xue@0: typedef enum
xue@0: {
xue@0:   wvfNone,
xue@0:   wvfPass,
xue@0:   wvfStop
xue@0: } TWaveViewPlaybackFilter;
xue@0: 
xue@0: typedef enum
xue@0: {
xue@0:   wvpStereo,
xue@0:   wvpSwap,
xue@0:   wvpLeft,
xue@0:   wvpRight
xue@0: } TWaveViewStereoMode;
xue@0: 
xue@0: typedef enum
xue@0: {
xue@0:   wvtPitchScale,
xue@0:   wvtPlayNote
xue@0: } enumWaveViewTools;
xue@0: 
xue@0: typedef Set <enumWaveViewTools, wvtPitchScale, wvtPlayNote> TWaveViewTools;
xue@0: 
xue@0: /*
xue@0:   TWaveViewObject implement a class to describe visual objects (tags) drawn onto the
xue@0:   visual display of a WaveView. They can respond to keyboard and mouse events.
xue@0: 
xue@0:   Rect
xue@0:   Position of object inside the WaveView. This is automatically updated each time
xue@0:   the contents of the WaveView is drawn. Keyboard and mouse events are enabled when
xue@0:   the mouse pointer falls inside the area spectifies by Rect.
xue@0: 
xue@0:   Id
xue@0:   Identifier.
xue@0: 
xue@0:   Tag[4], ShortTag[8]
xue@0:   Integer descriptors. By default ShortTag[0] describes the type of the tag.
xue@0: 
xue@0:   Buffer
xue@0:   Assiciated binary data.
xue@0: 
xue@0:   Options
xue@0:   Binary options. So far only one option wvoNoMouseFocus is available. Object
xue@0:   with this option set do not capture mouse movements or respond to events.
xue@0: 
xue@0:   DrawObjects
xue@0:   Pointer to method responsible to draw the object and set Rect accordingly.
xue@0: 
xue@0:   OnClick, OnDblClick, OnMouseDown, OnMouseMove, OnMouseUp, OnMouseWheel
xue@0:   Mouse event entries: pointers to methods responding to various mouse events.
xue@0: 
xue@0:   OnKeyDown
xue@0:   Keyboard event entry: pointers to method responding to key-down event.
xue@0: */
xue@0: #define wvoNoMouseFocus 1
xue@0: struct TWaveViewObject
xue@0: {
xue@0:   TRect Rect;
xue@0:   int Id;
xue@0:   union
xue@0:   {
xue@0:     int Tag[4];
xue@0:     __int16 ShortTag[8];
xue@0:   };
xue@0:   void* Buffer;
xue@0:   int Options;
xue@0:   TWaveViewDrawObjectEvent DrawObject;
xue@0:   TNotifyEvent OnClick;
xue@0:   TNotifyEvent OnDblClick;
xue@0:   TMouseEvent OnMouseDown;
xue@0:   TMouseMoveEvent OnMouseMove;
xue@0:   TMouseEvent OnMouseUp;
xue@0:   TMouseWheelEvent OnMouseWheel;
xue@0:   TKeyEvent OnKeyDown; 
xue@0: };
xue@0: 
xue@0: AnsiString SemitoneToPitch(double f);
xue@0: 
xue@0: /*
xue@0:   TWaveViewObjects maintains a list of TWaveViewObject pointers assicated with the
xue@0:   WaveView.
xue@0: */
xue@0: class TWaveViewObjects
xue@0: {
xue@0: public:
xue@0:   int Capacity;
xue@0:   int Count;
xue@0:   TWaveViewObject* Items;
xue@0:   TWaveViewObjects(){Capacity=0; Count=0; Items=0;}
xue@0:   ~TWaveViewObjects(){free(Items);}
xue@0:   void Add(TWaveViewObject AnItem)
xue@0:   {
xue@0:     if (Count==Capacity)
xue@0:     {
xue@0:       Items=(TWaveViewObject*)realloc(Items, sizeof(TWaveViewObject)*(Capacity+50));
xue@0:       Capacity+=50;
xue@0:     }
xue@0:     Items[Count]=AnItem;
xue@0:     Count++;
xue@0:   }
xue@0:   void Delete(int index)
xue@0:   {
xue@0:     memmove(&Items[index], &Items[index+1], sizeof(TWaveViewObject)*(Count-index-1));
xue@0:     Count--;
xue@0:   }
xue@0: };
xue@0: 
xue@0: /*
xue@0:   TWaveViewPanes mains a list of drawing panes the WaveView uses to draw waveforms,
xue@0:   spectrograms, or other contents. The drawing panes are orginized into a matrix
xue@0:   of Y rows and X columns and occupies most of the WaveView. The pane with indices
xue@0:   (x,y) in this matrix is given the pane index y*X+x.
xue@0: 
xue@0: 
xue@0:   public variables/properties
xue@0: 
xue@0:     readwrite FX
xue@0:     Number of columns.
xue@0: 
xue@0:     readonly Channel[i]
xue@0:     Channel index of the i-th pane.
xue@0: 
xue@0:     readonly Count
xue@0:     Number of panes.
xue@0: 
xue@0:     readonly HasFreqAxis[i]
xue@0:     True is the i-th pane has frequency axis (e.g. spectrogram pane), false if not.
xue@0: 
xue@0:     readwrite Margin
xue@0:     Margin between adjacent panes, in pixels.
xue@0: 
xue@0:     readwrite MarginOut
xue@0:     Margins between panes and boundary of client area, i.e. ClientRect, in pixels.
xue@0: 
xue@0:     readonly Type[i]
xue@0:     Pane type (waveform, spectrogram, etc.) of the i-th pane.
xue@0: 
xue@0:     readwrite Rect[i]
xue@0:     The rectangualr area of the i-th pane.
xue@0: 
xue@0:     readwrite Content[i]
xue@0:     The content of the i-th pane, equals Type[i]*WV2_MAX_CHANNEL+Channel[i].
xue@0: 
xue@0:     readwrite YScale[i]
xue@0:     The scale for y-axis of the i-th pane. 0 for linear scale, 1 for log scale.
xue@0: 
xue@0:     readwrite Rulers[i]
xue@0:     The set of axes of the i-th pane. Set WV2_HSELECT for time axis, WV2_VSELECT for
xue@0:     frequency axis, WV2_AMP for magnitude axis.
xue@0: 
xue@0: 
xue@0:   public methods
xue@0: 
xue@0:     WaveViewPanes, ~WaveViewPanes
xue@0:     Default constructor and destructor.
xue@0: 
xue@0:     int CreatePanes(TRect ARect, int X, int Y, bool erase=true)
xue@0:     Set the number of columns to X, number of rows to Y, and client area to ARect.
xue@0:     Clear the current pane contents if erase is set. Returns X*Y is successful, 0
xue@0:     if not.
xue@0: 
xue@0:     bool FreqAxis(int type)
xue@0:     Returns true if the queried pane type has frequency axis, false if not.
xue@0: 
xue@0:     int ResizePanes(TRect ARect)
xue@0:     Resize to client area to ARect. Returns 0.
xue@0: */
xue@0: class TWaveViewPanes
xue@0: {
xue@0:   int FY;
xue@0:   int FCapacity;
xue@0:   int FCount;
xue@0:   int FMargin;
xue@0:   TRect FMarginOut;
xue@0:   TRect ClientRect;
xue@0: protected:
xue@0:   void __fastcall SetMargin(int AMargin);
xue@0:   void __fastcall SetMarginOut(TRect AMarginOut);
xue@0: public:
xue@0:   int FX;
xue@0:   __property int Channel[int index]={read=GetChannel};
xue@0:   __property int Count={read=FCount};
xue@0:   __property bool HasFreqAxis[int index]={read=GetHasFreqAxis};
xue@0:   __property int Margin={read=FMargin, write=SetMargin};
xue@0:   __property TRect MarginOut={read=FMarginOut, write=FMarginOut};
xue@0:   __property int Type[int index]={read=GetType};
xue@0:   TRect* Rect;
xue@0:   int* Content;
xue@0:   int* YScale; //0:linear, 1:log
xue@0:   int* Rulers;
xue@0:   TWaveViewPanes()
xue@0:   {
xue@0:     FCapacity=50;
xue@0:     FCount=0;
xue@0:     Rect=new TRect[FCapacity];
xue@0:     Content=new int[FCapacity];
xue@0:     YScale=new int[FCapacity];
xue@0:     Rulers=new int[FCapacity];
xue@0:     memset(Content, 0xFF, sizeof(int)*FCapacity);
xue@0:     FMargin=4;
xue@0:     FMarginOut=TRect(5, 5, 5, 5);
xue@0:   }
xue@0:   ~TWaveViewPanes()
xue@0:   {
xue@0:     delete[] Rect;
xue@0:     delete[] Content;
xue@0:     delete[] YScale;
xue@0:     delete[] Rulers;
xue@0:   }
xue@0:   int CreatePanes(TRect ARect, int X, int Y, bool erase=true)
xue@0:   {
xue@0:     if (X*Y>FCapacity) return 0;
xue@0:     FCount=X*Y;
xue@0:     if (erase)
xue@0:       memset(Content, 0xFF, sizeof(int)*FCapacity),
xue@0:       memset(YScale, 0, sizeof(int)*FCapacity),
xue@0:       memset(Rulers, 0, sizeof(int)*FCapacity);
xue@0:     else
xue@0:       memset(&Content[FCount], 0xFF, sizeof(int)*(FCapacity-FCount)),
xue@0:       memset(&YScale[FCount], 0, sizeof(int)*(FCapacity-FCount)),
xue@0:       memset(&Rulers[FCount], 0, sizeof(int)*(FCapacity-FCount));
xue@0: 
xue@0:     double XX=(ARect.Width()-FMarginOut.left-FMarginOut.right+FMargin)*1.0/X,
xue@0:            YY=(ARect.Height()-FMarginOut.top-FMarginOut.bottom+FMargin)*1.0/Y;
xue@0:     for (int y=0; y<Y; y++)
xue@0:     {
xue@0:       for (int x=0; x<X; x++)
xue@0:       {
xue@0:         int ind=y*X+x;
xue@0:         Rect[ind].left=ARect.left+MarginOut.left+XX*x;
xue@0:         Rect[ind].right=ARect.left+MarginOut.left+XX*(x+1)-FMargin;
xue@0:         Rect[ind].top=ARect.top+MarginOut.top+YY*y;
xue@0:         Rect[ind].bottom=ARect.top+MarginOut.top+YY*(y+1)-FMargin;
xue@0:       }
xue@0:     }
xue@0:     ClientRect=ARect;
xue@0:     FX=X, FY=Y;
xue@0:     return FCount;
xue@0:   }
xue@0:   static bool __fastcall FreqAxis(int type)
xue@0:   {
xue@0:     if (type==0) return false;
xue@0:     else return true;
xue@0:   }
xue@0: private:
xue@0:   int __fastcall GetChannel(int index)
xue@0:   {
xue@0:     return Content[index]%WV2_MAX_CHANNEL;
xue@0:   }
xue@0:   bool __fastcall GetHasFreqAxis(int index)
xue@0:   {
xue@0:     int AType=Content[index]/WV2_MAX_CHANNEL;
xue@0:     return FreqAxis(AType);
xue@0:   }
xue@0:   int __fastcall GetType(int index)
xue@0:   {
xue@0:     return Content[index]/WV2_MAX_CHANNEL;
xue@0:   }
xue@0: public:
xue@0:   int ResizePanes(TRect ARect)
xue@0:   {
xue@0:     if (FX==0 || FY==0) return 0;
xue@0:     double XX=(ARect.Width()-FMarginOut.left-FMarginOut.right+FMargin)*1.0/FX,
xue@0:            YY=(ARect.Height()-FMarginOut.top-FMarginOut.bottom+FMargin)*1.0/FY;
xue@0:     for (int y=0; y<FY; y++)
xue@0:     {
xue@0:       for (int x=0; x<FX; x++)
xue@0:       {
xue@0:         int ind=y*FX+x;
xue@0:         Rect[ind].left=ARect.left+MarginOut.left+XX*x;
xue@0:         Rect[ind].right=ARect.left+MarginOut.left+XX*(x+1)-FMargin;
xue@0:         Rect[ind].top=ARect.top+MarginOut.top+YY*y;
xue@0:         Rect[ind].bottom=ARect.top+MarginOut.top+YY*(y+1)-FMargin;
xue@0:       }
xue@0:     }
xue@0:     ClientRect=ARect;
xue@0:     return 0;
xue@0:   }
xue@0: };
xue@0: 
xue@0: /*
xue@0:   TWaveViewSelections maintains a list of time-frequency selections (or a binary
xue@0:   T-F mask).
xue@0: 
xue@0: 
xue@0:   public variables and properties
xue@0: 
xue@0:     readwrite Capacity
xue@0:     Number of selections the currently allocated buffer can hold.
xue@0: 
xue@0:     readwrite FCount
xue@0:     readonly Count
xue@0:     Number of selections.
xue@0: 
xue@0:     readwrite Focus
xue@0:     Index to the currently active ("focused") selection.
xue@0: 
xue@0:     readonly StartPos
xue@0:     Start of the duration of the focused selection, in samples.
xue@0: 
xue@0:     readonly EndPos
xue@0:     End of the duration of the focused selection, in samples.
xue@0: 
xue@0:     readonly Length
xue@0:     Duration of the focused selection, in samples.
xue@0: 
xue@0:     readonly StartDigiFreq
xue@0:     Lower frequency bound of the focused selection, 1=sampling frequency.
xue@0: 
xue@0:     readonly EndDigiFreq
xue@0:     Upper frequency bound of the focused selection, 1=sampling frequency.
xue@0: 
xue@0:     readwrite Items
xue@0:     The list of selections.
xue@0: 
xue@0: 
xue@0:   methods
xue@0: 
xue@0:     TWaveViewSelections, ~TWaveViewSelections
xue@0:     Default constructor and destructor.
xue@0: 
xue@0:     void Add(TWaveViewSelection& ASelection)
xue@0:     Adds new selection to list.
xue@0: 
xue@0:     void Clear()
xue@0:     Clears list.
xue@0: 
xue@0:     Delete(int Index)
xue@0:     Delete the index-th selection. Returns 1 if successful, 0 if not.
xue@0: 
xue@0:     operator[i]
xue@0:     Return the i-th selection.
xue@0: 
xue@0: */
xue@0: class TWaveViewSelections
xue@0: {
xue@0: public:
xue@0:   int Capacity;
xue@0:   int FCount;
xue@0:   int Focus;
xue@0:   __property int Count={read=FCount};
xue@0:   __property int StartPos={read=GetStartPos};
xue@0:   __property int EndPos={read=GetEndPos};
xue@0:   __property int Length={read=GetLength};
xue@0:   __property double StartDigiFreq={read=GetStartDigiFreq};
xue@0:   __property double EndDigiFreq={read=GetEndDigiFreq};
xue@0:   TWaveViewSelection* Items;
xue@0:   TWaveViewSelections()
xue@0:   {
xue@0:     Capacity=100;
xue@0:     FCount=0;
xue@0:     Focus=0;
xue@0:     Items=new TWaveViewSelection[Capacity];
xue@0:   }
xue@0:   ~TWaveViewSelections()
xue@0:   {
xue@0:     delete[] Items;
xue@0:   }
xue@0:   void Add(TWaveViewSelection& ASelection)
xue@0:   {
xue@0:     if (FCount==Capacity)
xue@0:     {
xue@0:       int OldCapacity=Capacity;
xue@0:       Capacity+=50;
xue@0:       TWaveViewSelection* NewItems=new TWaveViewSelection[Capacity];
xue@0:       memcpy(NewItems, Items, sizeof(TWaveViewSelection)*OldCapacity);
xue@0:       delete[] Items;
xue@0:       Items=NewItems;
xue@0:     }
xue@0:     Items[FCount]=ASelection;
xue@0:     Focus=FCount;
xue@0:     FCount++;
xue@0:   }
xue@0:   void Clear()
xue@0:   {
xue@0:     FCount=0;
xue@0:     Focus=0;
xue@0:   }
xue@0:   Delete(int Index)
xue@0:   {
xue@0:     if (Index<0 || Index>=FCount)
xue@0:       return 0;
xue@0:     memmove(&Items[Index], &Items[Index+1], sizeof(TWaveViewSelection)*(FCount-1-Index));
xue@0:     FCount--;
xue@0:     if (Focus==Index) Focus=FCount-1;
xue@0:     else if (Focus>Index)
xue@0:       Focus--;
xue@0:     return 1;
xue@0:   }
xue@0:   int __fastcall GetStartPos()
xue@0:   {
xue@0:     if (FCount>0)
xue@0:       return Items[Focus].StartPos;
xue@0:     else return -1;
xue@0:   }
xue@0:   int __fastcall GetEndPos()
xue@0:   {
xue@0:     if (FCount>0)
xue@0:       return Items[Focus].EndPos;
xue@0:     else return -1;
xue@0:   }
xue@0:   int __fastcall GetLength()
xue@0:   {
xue@0:     if (FCount>0)
xue@0:       return Items[Focus].EndPos-Items[Focus].StartPos;
xue@0:     else return -1;
xue@0:   }
xue@0:   double __fastcall GetStartDigiFreq()
xue@0:   {
xue@0:     if (FCount>0)
xue@0:       return Items[Focus].StartDigiFreq;
xue@0:     else return -1;
xue@0:   }
xue@0:   double __fastcall GetEndDigiFreq()
xue@0:   {
xue@0:     if (FCount>0)
xue@0:       return Items[Focus].EndDigiFreq;
xue@0:     else return -1;
xue@0:   }
xue@0:   TWaveViewSelection operator[](int index)
xue@0:   {
xue@0:     if (index>=0 && index<FCount) return Items[index];
xue@0:     else
xue@0:     {
xue@0:       TWaveViewSelection wvs={0, 0, 0, 0};
xue@0:       return wvs;
xue@0:     }
xue@0:   }
xue@0: };
xue@0: 
xue@0: /*
xue@0:     Component TWaveView
xue@0: 
xue@0:       WaveView is a CustomControl used to display waveform audio and handling user
xue@0:       interactions with the display. Use a TWaveView object at design time or create
xue@0:       the object with new keyword.
xue@0: 
xue@0: 
xue@0:     Published Properties:
xue@0: 
xue@0:         readwrite   Align (inherited)
xue@0:         readwrite   Anchors (inherited)
xue@0:         readwrite   AutoExtractMode
xue@0:         readwrite   AutoSpecAmp
xue@0:         readwrite   AxisColor
xue@0:         readwrite   BackColor
xue@0:         readwrite   ClickFocus
xue@0:         readwrite   DefaultPopupMenu
xue@0:         readwrite   DoubleBuffered (inherited)
xue@0:         readwrite   LocalDataTimeGrid
xue@0:         readwrite   MultiSelect
xue@0:         readwrite   PitchScalePart
xue@0:         readwrite   PlaybackFilter
xue@0:         readwrite   PopupMenu (inherited)
xue@0:         readwrite   ProgressCursor
xue@0:         readwrite   SamplesPerSec
xue@0: 	      readwrite   ScrollBar
xue@0:         readwrite   SelectedAreaColorX
xue@0:         readwrite   SelectedFrameColorX
xue@0:         readwrite   SelectingFrameColorX
xue@0:         readwrite   SelectionBorderWidth
xue@0:         readwrite   Tools
xue@0:         readwrite   Visible (inherited)
xue@0:         readwrite   WaveAudio
xue@0:         readwrite   WaveBackColor
xue@0:         readwrite   WaveColor
xue@0: 
xue@0: 
xue@0:         AutoExtractMode
xue@0:         ExtractMode controls what type of zoom (time, frequency, time and frequency)
xue@0:         when a zoom-to-selection operation is invoked. If AutoExtractMode is set,
xue@0:         ExtractMode is automatically linked to SelectMode, i.e. if SelectMode is
xue@0:         time-select, then automatically set ExtractMode to time-zoom.
xue@0: 
xue@0:         AutoSpecAmp
xue@0:         Set to automatically adjust spectrogram brightness so that the brightest
xue@0:         points in display stays at constant brightness.
xue@0: 
xue@0:         AxisColor, BackColor, WaveBackColor and WaveColor
xue@0:         Use these properties to change the colors of the WaveView.
xue@0: 
xue@0:         ClickFocus
xue@0:         Set to pass mouse and keyboard focus to the WaveView whenever it is clicked.
xue@0: 
xue@0:         DefaultPopupMenu and PopupMenu
xue@0:         WaveView provides some basic operations with a default PopupMenu. User can
xue@0:         inspect or play the wave through these operations. Anyway, user may not want
xue@0:         the popupmenu in his design. A DefaultPopupMenu property is used for this
xue@0:         instance.  If DefaultPopupMenu is set to true, the menu is used. If it is
xue@0:         set to false, the default menu is not used, and user can assign another
xue@0:         popupmenu to the WaveView through the PopupMenu property.  The operations
xue@0:         associated with the default popupmenu are also available through a group
xue@0:         of methods that are declared public in TWaveView class.  See Public Methods
xue@0:         for details.
xue@0: 
xue@0:         LocalDataTimeGrid
xue@0:         WaveView invokes MouseLocalData event as the mouse pointer is moved inside
xue@0:         the display panes, supplying the time at mouse pointer as an argument. If
xue@0:         LocalDataTimeGrid is set, the time argument provided is aligned to the
xue@0:         nearest spectrogram frame centre.
xue@0: 
xue@0:         MultiSelect
xue@0:         Set to entre multiple selection mode in which the user can made multiple
xue@0:         time-frequency selections.
xue@0: 
xue@0:         PitchScalePart
xue@0:         WaveView draws a set of harmonic frequency markers aligned to the position
xue@0:         of the mouse pointer if Tools contains wvtPitchScale. PitchScalePart specifies
xue@0:         the partial index associated with the frequency at mouse pointer.
xue@0: 
xue@0:         PlaybackFilter
xue@0:         Specifies the type of filter (pass, stop, none) to use for playback.
xue@0: 
xue@0:         ProgressCursor
xue@0:         Set to show a playback cursor during playback.
xue@0: 
xue@0:         SamplesPerSec
xue@0:         Sampling rate used by the WaveView.
xue@0: 
xue@0:         ScrollBar
xue@0:         WaveView doesn't implement a scrollbar. To provide a WaveView object
xue@0:         with a scrollbar, simply use a normal ScrollBar and assign it to the
xue@0:         WaveView object through the ScrollBar property. The WaveView will use
xue@0:         the scrollbar automatically.
xue@0: 
xue@0:         SelectedAreaColorX, SelectedFrameColorX, SelectingFrameColorX
xue@0:         Use these properties to change the xor colour masks for drawing the
xue@0:         time-frequency selections.
xue@0: 
xue@0:         Tools
xue@0:         Additional tools the WaveView comes with, including wvtPitchScale for drawing
xue@0:         a set of harmonic frequency marks aligned to the position of teh mouse pointer,
xue@0:         and wvtPlayNote for playing a note pitched at the mouse pointer when the
xue@0:         mouse is clicked with Shift key held down.
xue@0: 
xue@0:         WaveAudio
xue@0:         Use this property to associate a WaveAudio object to WaveView. If 0 is
xue@0:         written to WaveAudio property, the WaveView displays nothing.
xue@0: 
xue@0: 
xue@0:     Public Properties
xue@0: 
xue@0:         readonly    A[][]
xue@0:         readwrite   AccessFCaption
xue@0:         readonly    BytesPerSample
xue@0:         readonly    CalculateFrameCount
xue@0:         readonly    Canvas (inherited)
xue@0:         readwrite   Caption (inherited)
xue@0:         readwrite   Channels
xue@0:         readonly    CurrentAmplitude
xue@0:         readonly    CurrentChannel
xue@0:         readonly    CurrentDigiFreq
xue@0:         readonly    CurrentPane
xue@0:         readonly    CurrentRange
xue@0:         readonly    CurrentSample16
xue@0:         readonly    CurrentSampleInPixel
xue@0:         readonly    CurrentTime
xue@0:         readonly    CurrentX
xue@0:         readonly    CurrentY
xue@0:         readwrite   CursorColorBright
xue@0:         readwrite   CursorColorDim
xue@0:         readwrite   Data[]
xue@0:         readonly    Data8[]
xue@0:         readonly    Data16[]
xue@0:         readonly    Data24[]
xue@0:         readwrite   DefaultPropertyItems
xue@0:         readwrite   EndDigiFreq
xue@0:         readwrite   EndPos
xue@0:         readwrite   ExtractMode
xue@0:         readwrite   ForceHamming
xue@0:         readwrite   InfoColor0
xue@0:         readwrite   InfoColor1
xue@0:         readwrite   InfoColor2
xue@0:         readonly    LastX
xue@0:         readonly    LastY
xue@0:         readwrite   Length
xue@0:         readonly    OpMode
xue@0:         readonly    Ph[][]
xue@0:         readonly    Playing
xue@0:         readwrite   PlayNoteInSemitone
xue@0:         readwrite   RulerAlignX
xue@0:         readwrite   RulerAlignY
xue@0:         readwrite   RulerUnitAmp
xue@0:         readwrite   RulerUnitFreq
xue@0:         readwrite   RulerUnitTime
xue@0:         readwrite   SectionEndPos
xue@0:         readwrite   SectionStartPos
xue@0:         readwrite   Selections
xue@0:         readwrite   SelectMode
xue@0:         readwrite   ShowCursotText
xue@0:         readwrite   ShowInfo
xue@0:         readwrite   ShowPaneInfo
xue@0:         readonly    Spec[][]
xue@0:         readwrite   SpecAmp
xue@0:         readwrite   SpecOffst
xue@0:         readwrite   SpecRes
xue@0:         readonly    Spectrogram[]
xue@0:         readwrite   SpecWindowParamD[]
xue@0:         readwrite   SpecWindowType
xue@0:         readwrite   StartDigiFreq
xue@0:         readonly    StartPane
xue@0:         readwrite   StartPos
xue@0:         readonly    StartSel
xue@0:         readonly    StartSelX
xue@0:         readonly    StartSelY
xue@0:         readwrite   StereoMode
xue@0:         readwrite   YZoomRate
xue@0: 
xue@0: 
xue@0:         A[ch][fr]
xue@0:         Amplitude spectrum of channel ch and frame fr.
xue@0: 
xue@0:         AccessFCaption
xue@0:         Provides direct access to FCaption without invoking SetCaption(...).
xue@0: 
xue@0:         BytesPerSample
xue@0:         Bytes used for each waveform sample (8, 16 or 24).
xue@0: 
xue@0:         Channels
xue@0:         Number of channels.
xue@0: 
xue@0:         CurrentAmplitude
xue@0:         Reading on amplitude axis at the mouse pointer in waveform display.
xue@0: 
xue@0:         CurrentChannel
xue@0:         Channel index of data displayed in CurrentPane.
xue@0: 
xue@0:         CurrentDigiFreq
xue@0:         Reading on frequency axis at the mouse pointer in spectrogram display.
xue@0: 
xue@0:         CurrentPane
xue@0:         Index of the display pane that currently containins the mouse pointer.
xue@0: 
xue@0:         CurrentRange
xue@0:         Time-frequency scope of the current display.
xue@0: 
xue@0:         CurrentSample16
xue@0:         Sample value of CurrentChannel at CurrentTime.
xue@0: 
xue@0:         CurrentSampleInPixel
xue@0:         The display Y-coordinate corresponding to CurrentSample16.
xue@0: 
xue@0:         CurrentTime
xue@0:         Reading on time axis at the mouse pointer.
xue@0: 
xue@0:         CurrentX
xue@0:         X-coordinate of mouse pointer.
xue@0: 
xue@0:         CurrentY
xue@0:         Y-coordinate of mouse pointer.
xue@0: 
xue@0:         CursorColorBright
xue@0:         Colour used to draw ruler cursor in on dim background.
xue@0: 
xue@0:         CursorColorDim
xue@0:         Colour used to draw ruler cursor in on bright background.
xue@0: 
xue@0:         Data[ch], Data8[ch], Data16[ch], Data24[ch]
xue@0:         Data buffer of channel ch in void*, __int8*, __int16* and __pint24.
xue@0: 
xue@0:         DefaultPropertyItems
xue@0:         Set to show default list of properties when Properties menu item from the
xue@0:         default popup menu is invoked.
xue@0: 
xue@0:         EndDigiFreq and StartDigiFreq
xue@0:         Upper and lower bounds of the currently displayed frequency range (1=sampling
xue@0:         frequency). Write these properties to change the display range and trigger
xue@0:         an OnPageChange event.
xue@0: 
xue@0:         EndPos and StartPos
xue@0:         End and starting positions of currently displayed duration, in samples.
xue@0:         Write these properties to change the  display range and trigger an OnPageChange
xue@0:         event.
xue@0: 
xue@0:         ExtractMode
xue@0:         Specifies the type of zooming (time, frequency, time and frequency) to
xue@0:         perform when zoom-to-selection operation is invoked.
xue@0: 
xue@0:         ForceHamming
xue@0:         Set to force Hamming windowing for audio playback via playback filter.
xue@0: 
xue@0:         InfoColor0, InfoColor1, InfoColor2
xue@0:         Colours used to draw the internal (info) tags if ShowInfo is set.
xue@0: 
xue@0:         LastX, LastY
xue@0:         The X and Y coordinates recorded at the last mouse down, move and up event.
xue@0:         They are identical to X and Y upon calling MouseMove() and MoveUp(), and
xue@0:         after calling MouseDown().
xue@0: 
xue@0:         Length
xue@0:         Length of the audio content the WaveView currently holds, in samples.
xue@0: 
xue@0:         OpMode
xue@0:         The current operation mode (idle, dragging, selecting, reselecting, or other
xue@0:         user-defined modes).
xue@0: 
xue@0:         Ph[ch][fr]
xue@0:         Phase spectrum of channel ch and frame fr.
xue@0: 
xue@0:         Playing
xue@0:         Set if playback is in progress, cleared if not.
xue@0: 
xue@0:         PlayNoteInSemitone
xue@0:         Set to adjust note playback using wvtPlayNote tool to pitch at the nearst
xue@0:         well-tempered semitone (A4=440Hz) from CurrentDigiFreq.
xue@0: 
xue@0:         RulerAlignX, RulerAlignY
xue@0:         Alignments of X and Y axes.
xue@0: 
xue@0:         RulerUnitAmp
xue@0:         Display unit for amplitude axis. 0=relative(-1 to +1), 1=absolute.
xue@0: 
xue@0:         RulerUnitFreq
xue@0:         Display unit for frequency axis. 0=hz, 1=bin (when using linear frequency
xue@0:         scale) or semitones (when using log frequency scale).
xue@0: 
xue@0:         RulerUnitTime
xue@0:         Display unit for time axis. 0=samples, 1=seconds.
xue@0: 
xue@0:         SectionEndPos, SectionStartPos
xue@0:         End and starting points of the playback duration.
xue@0: 
xue@0:         Selections
xue@0:         Current time-frequency selections.
xue@0: 
xue@0:         SelectMode
xue@0:         Specifies mode (time, frequency or time-and-frequency) for normal selections.
xue@0: 
xue@0:         ShowCursotText
xue@0:         Set to display cursor text.
xue@0: 
xue@0:         ShowInfo
xue@0:         Set to display basic info tags (number of channels, sampling rate, bytes
xue@0:         per sample, duration, display range).
xue@0: 
xue@0:         ShowPaneInfo
xue@0:         Set to display pane info.
xue@0: 
xue@0:         Spec[ch][fr]
xue@0:         Complex spectrum of channel ch at frame fr.
xue@0: 
xue@0:         SpecAmp
xue@0:         Spectral display amplification, for adjusting the spectrogram brightness.
xue@0: 
xue@0:         SpecOffst
xue@0:         Time offst between ajcent frame centres.
xue@0: 
xue@0:         SpecRes
xue@0:         Window size for spectrogram computation.
xue@0: 
xue@0:         Spectrogram[ch]
xue@0:         Spectrogram of channal ch.
xue@0: 
xue@0:         SpecWindowParamD[], SpecWindowType
xue@0:         Window type and optional parameter list of window function.
xue@0: 
xue@0:         StartPane
xue@0:         Index to display pane in which a mouse key was last pressed down in the WaveView.
xue@0: 
xue@0:         StartSel
xue@0:         Reading of time axis the last time a mouse key was pressed down in the WaveView.
xue@0: 
xue@0:         StartSelX, StartSelY
xue@0:         X and Y coordinates that last time a mouse key was pressed down in the WaveView.
xue@0: 
xue@0:         StereoMode
xue@0:         Stereo playback mode (normal, swap-channel, left channel or right channel).
xue@0: 
xue@0:         YZoomRate
xue@0:         Amplitude display amplification.
xue@0: 
xue@0: 
xue@0:     Public variables
xue@0: 
xue@0:         PBPR
xue@0:         Playbuffer pointer. Position from which to load the next playback buffer.
xue@0: 
xue@0:         DisableMouseWheelZoom
xue@0:         Set to disable time and frequency zooming by mouse wheeling.
xue@0: 
xue@0:         maxv_specamp
xue@0:         Product of the maximal spectal amplitude in current display range and SpecAmp.
xue@0:         This is kept constant if AutoSpecAmp is set.
xue@0: 
xue@0:         FSpectrogram[WV2_MAX_CHANNEL]
xue@0:         Spectrograms of the channels.
xue@0: 
xue@0:         FPanes
xue@0:         List of display panes.
xue@0: 
xue@0:         FObjects
xue@0:         List of WaveView objects.
xue@0: 
xue@0:         InfoRectCount, InfoRect[]
xue@0:         Number of info tags, their display areas
xue@0: 
xue@0:         InfoRectAtPointer
xue@0:         Index to the info tag at mouse pointer.
xue@0: 
xue@0:         ObjectAtPointer
xue@0:         Pointer to WaveView object at mouse pointer.
xue@0: 
xue@0:         StartObject
xue@0:         If a mouse key is pressed down with the mouse pointer at a WaveView object
xue@0:         whose OnMouseDown event is set, then StartObject is set to that object
xue@0:         and cleared after the next MouseUp event.
xue@0: 
xue@0:         DefaultRulerSetting[4]
xue@0:         Default settings for drawing the axes.
xue@0: 
xue@0:         DefaultPaneInfoFont
xue@0:         Default font for displaying pane info.
xue@0: 
xue@0:         DefaultInfoFont
xue@0:         Default font for displaying info tags.
xue@0: 
xue@0:         InfoLeft, InfoTop
xue@0:         Top-left coordinates to draw info tags.
xue@0: 
xue@0:         AutoScroll
xue@0:         Set to enable automatic scrolling when playback proceeds beyond current
xue@0:         display range, clear to disable it.
xue@0: 
xue@0:         ForceOLA
xue@0:         When filling the playback buffers, WaveView chooses whether or not using
xue@0:         overlap-add of adjacent frames according to the playback filter. If ForceOLA
xue@0:         is set then overlap-add is unconditionally enforced the next time a block
xue@0:         buffer is filled.
xue@0: 
xue@0:         LoopPlay
xue@0:         Set to enable looped playback, clear to disable it.
xue@0: 
xue@0:         LoopMode
xue@0:         Specifies the loop range in looped playback. 0=no looping, 1=looping the
xue@0:         current display range, 2=looping the current active selection.
xue@0: 
xue@0:         Basic0[WV2_MAX_CHANNEL], Basic1[WV2_MAX_CHANNEL]
xue@0:         Internal bitmaps for storing the raw waveform and spectrogram images.
xue@0: 
xue@0: 
xue@0:     Public Methods
xue@0: 
xue@0:         TWaveView, ~TWaveView()
xue@0:         Default constructor and destructor.
xue@0: 
xue@0:         CheckWaveOutDevCaps
xue@0:         Checks if WaveOut device is ready and enable/disable playback menu accordingly.
xue@0: 
xue@0:         ClearSelections
xue@0:         Empty current list of time-frequency selections.
xue@0: 
xue@0:         ClearSpectrogram, ClearSpectrograms
xue@0:         Free buffered spectrogram data.
xue@0: 
xue@0:         CreatePanes(X, Y)
xue@0:         Creates X columns times Y rows of display panes.
xue@0: 
xue@0:         DefaultShowProperty
xue@0:         Display a message box to show basic properties of the audio content.
xue@0: 
xue@0:         DoExtract, UndoExtract
xue@0:         Zoom-to-selction operation, undo the last zoom-to-selectino operation.
xue@0: 
xue@0:         DrawBitmap(Sender)
xue@0:         Draws a bitmap (TBitmap*)Sender in the WaveView.
xue@0: 
xue@0:         DrawCaption
xue@0:         Draws a caption on the top-right of the WaveView.
xue@0: 
xue@0:         DrawCursor(PaneIndex, X, Y)
xue@0:         Draws the mouse cursors in display pane PaneIndex given pointer coordinates.
xue@0: 
xue@0:         DrawInfo
xue@0:         Draws info tags and update their active areas.
xue@0: 
xue@0:         DrawPane
xue@0:         Draws a display pane.
xue@0: 
xue@0:         DrawPaneInfo
xue@0:         Draws the pane info.
xue@0: 
xue@0:         DrawPanes
xue@0:         Draws display panes.
xue@0: 
xue@0:         DrawPitchScale
xue@0:         Draws a set of harmonic frequency marks aligned to the current mouse pointer.
xue@0: 
xue@0:         DrawPlaybackCursor
xue@0:         Draws the playback cursor which marks the current playback position.
xue@0: 
xue@0:         DrawSelection, DrawSelections
xue@0:         Draw the current time-frequency selections.
xue@0: 
xue@0:         DrawSemitones
xue@0:         Draws a set of frequency grids marking whole well-tempered semitones.
xue@0: 
xue@0:         DrawSpectrogramX
xue@0:         Draws the spectrogram.
xue@0: 
xue@0:         DrawWaveForm
xue@0:         Draws the waveform.
xue@0: 
xue@0:         ExtDataChange
xue@0:         Invoked to notify a change to the data buffer committed by the caller so
xue@0:         that WaveView can update its display.
xue@0: 
xue@0:         FocusSelection
xue@0:         Puts the focus to a specific selection in multiple selection mode.
xue@0: 
xue@0:         FreeData
xue@0:         Frees internal waveform audio buffer(s).
xue@0: 
xue@0:         FreeInternalBitmaps
xue@0:         Frees Basic0[] and Basic1[] which stores raw waveform and spectrogram images.
xue@0: 
xue@0:         FreeSpectrograms
xue@0:         Frees internal spectrogram buffers (unlike ClearSpectrogram, which frees
xue@0:         buffer data held in the buffers).
xue@0: 
xue@0:         FromAmplitudeToPixel, FromPixelToAmplitude, FromDigiFreqToPixel,
xue@0:         FromPixelToDigiFreq, FromPixelToSample, FromSampleToPixel
xue@0:         Conversion routines between screen coordinates and time-amplitude locations
xue@0:         on the displayed waveform of time-frequency locations of the spectrogram.
xue@0: 
xue@0:         GetFMask
xue@0:         Obtain the frequency mask at certain time (snapshot of CurrentSelections).
xue@0: 
xue@0:         GetObjectAtPointer
xue@0:         Obtain the object at given coordinates and set ObjectToPointer variable.
xue@0: 
xue@0:         GetOpMode
xue@0:         Obtain OpMode given specific keyboard and mouse status and set OpMode property.
xue@0: 
xue@0:         InvalidateBasic, InvalidateBasics
xue@0:         Discard stored raw waveform and/or spectrogram images.
xue@0: 
xue@0:         ItemExtractClick, ItemPlayClick, ItemPropertyClick,
xue@0:         ItemXZoomClick, ItemYZoomClick
xue@0:         Calling these methods do the same as clicking on the dufault popupmenu items
xue@0:         excpet for the Sender argument. The Sender argument has its importance in
xue@0:         ItemXZoomClick and ItemYZoomClick methods. If user wishes to use his own
xue@0:         popupmenu, it is recommended to assign these methods to the menu. Before
xue@0:         assigning ItemXZoomClick and ItemYZoomClick, be sure to fill the Tag property
xue@0:         of the Sender. Valid Tag values are: ITEMXZOOMIN_TAG(11), ITEMXZOOMOUT_TAG(12),
xue@0:         ITEMXZOOMRESTORE_TAG(13), ITEMYZOOMIN_TAG(14), and ITEMYZOOMRESTORE_TAG(15).
xue@0: 
xue@0:         PausePlayback, StartPlayback
xue@0:         Stops and starts audio playback.
xue@0: 
xue@0:         Post
xue@0:         Sends local waveform data to the associated WaveAudio object.
xue@0: 
xue@0:         RemoveSelection
xue@0:         Removes a time-frequency selection.
xue@0: 
xue@0:         Retrieve
xue@0:         Read waveform data from the associated WaveAudio object into local buffer.
xue@0: 
xue@0:         SelectionAtPos
xue@0:         Returns index to the time-frequency selection at specified time and frequency.
xue@0: 
xue@0:         SetArea
xue@0:         Sets the four variables specifying the display range in one command.
xue@0: 
xue@0:         SetContent
xue@0:         Specifies what to display in each display pane.
xue@0: 
xue@0:         SetCursorTF
xue@0:         Sends mouse pointer to the position corresponding to given time and frequency.
xue@0: 
xue@0:         SetRulers
xue@0:         Specifies what axes to display in each display pane.
xue@0: 
xue@0:         SetRulerUnit
xue@0:         Specifies the unit used for displaying each axes.
xue@0: 
xue@0:         SetSelection
xue@0:         Make a new time-frequency selection.
xue@0: 
xue@0:         SetStartAndEndDigiFreq, SetStartAndEndPos
xue@0:         Sets the frequency/time range of display.
xue@0: 
xue@0:         SetYScale
xue@0:         Sets the display amplification of waveform amplitude.
xue@0: 
xue@0:         StartDrag
xue@0:         Simulates the start of a mouse dragging operation at specified coordinates.
xue@0: 
xue@0:         TFFilter
xue@0:         Applies time-frequency filtering using a binary mask specified by CurrentSelections.
xue@0: 
xue@0:         UpdateScrollBar
xue@0:         Updates the associated scrollbar.
xue@0: 
xue@0:         Zoom, ZoomF, ZoomY
xue@0:         Time/magnitude/frequeny zooming operations.
xue@0: 
xue@0: 
xue@0:     Events
xue@0: 
xue@0:         CustomCursorText
xue@0:         Triggered before drawing cursor texts for the user to fill in customized texts.
xue@0: 
xue@0:         CustomItemExtractClick
xue@0:         Customized handler of the Extract menu item of the default popup menu.
xue@0: 
xue@0:         CustomInfo
xue@0:         Triggered before drawing into tags for the user to fill in customized texts.
xue@0: 
xue@0:         CustompaneInfo
xue@0:         Triggered before drawing pane into for the user to fill in customized texts.
xue@0: 
xue@0:         CustomProperty
xue@0:         Customized handler of the Properties menu item of the default popup menu.
xue@0: 
xue@0:         CustomXZoomClick, CustomYZoomClick
xue@0:         Customized handlers of the XZoom and YZoom menu items of the default popum menu.
xue@0: 
xue@0:         OnCustomPaint
xue@0:         Customized painting routine of the WaveView.
xue@0: 
xue@0:         OnGetPlaybackStartAndEndPos
xue@0:         Triggered before starting playback to allow user decide what duration to play.
xue@0: 
xue@0:         OnGetOpMode
xue@0:         Triggered when querying operation mode to allow non-default mode settings and
xue@0:         user-defined modes.
xue@0: 
xue@0:         OnInfoDblClick
xue@0:         Triggered when a info tag is double-clicked.
xue@0: 
xue@0:         OnResize (inherited)
xue@0:         OnKeyDown (inherited)
xue@0:         OnKeyPress (inherited)
xue@0:         OnKeyUp (inherited)
xue@0:         OnDblClick (inherited)
xue@0:         OnMouseDown (inherited)
xue@0:         OnMousemove (inherited)
xue@0:         OnMouseUp (inherited)
xue@0:         OnMouseWheel (inherited)
xue@0: 
xue@0:         OnMouseLocalData
xue@0:         Triggered when moving mouse pointer inside display pane, supplying the caller
xue@0:         with the time at mouse pointer and data buffers near the time.
xue@0: 
xue@0:         OnMousePointer
xue@0:         Triggered when pressing left mouse key and when moving mouse pointer with
xue@0:         left mouse key down.
xue@0: 
xue@0:         BeforePlayback
xue@0:         Triggered before playback starts.
xue@0: 
xue@0:         OnPageChange
xue@0:         Triggered when the display duration is changed.
xue@0: 
xue@0:         OnPaint
xue@0:         Triggered after painting the WaveView.
xue@0: 
xue@0:         OnPlaybackDone
xue@0:         Triggered when playback finishes.
xue@0: 
xue@0:         OnPlaybackStart
xue@0:         Triggered when playback starts.
xue@0: 
xue@0:         OnSelectedChange
xue@0:         Triggered when the selection focus switches.
xue@0: 
xue@0:         OnScaleChange
xue@0:         Triggered when YZoomRate changes.
xue@0: 
xue@0:     Current version Wen Xue 2011/7
xue@0:     First version Wen Xue 2003/3
xue@0: */
xue@0: class PACKAGE TWaveView : public TCustomControl
xue@0: {
xue@0: friend void FeedFFTBuffers(int Id, cdouble* &w, cdouble* &x, double* &win, int* &hbi, void* Parent);
xue@0: friend void TFFilter(TWaveView*, int, TWaveViewSelections*, bool, bool);
xue@0: private:
xue@0:   TWaveAudio* FWaveAudio;
xue@0:   TDataAudio* FSection;
xue@0:   TWaveViewSelections* FSelections;
xue@0: 
xue@0:   TPopupMenu* FMenu;
xue@0:   TScrollBar* FScrollBar;
xue@0: 
xue@0:   TNotifyEvent FBeforePlayback;
xue@0:   TNotifyEvent FCustomItemExtractClick;
xue@0:   TNotifyEvent FCustomXZoomClick;
xue@0:   TNotifyEvent FCustomYZoomClick;
xue@0:   TNotifyEvent FOnInfoDblClick;
xue@0:   TNotifyEvent FOnPageChange;
xue@0:   TNotifyEvent FOnPaint;
xue@0:   TNotifyEvent FOnPlaybackDone;
xue@0:   TNotifyEvent FOnPlaybackStart;
xue@0:   TNotifyEvent FOnScaleChange;
xue@0:   TNotifyEvent FOnSelectedChange;
xue@0: 
xue@0:   TWaveViewGetIntervalEvent FOnGetPlaybackStartAndEndPos;
xue@0:   TWaveViewGetOpModeEvent FOnGetOpMode;
xue@0:   TWaveViewMouseLocalDataEvent FOnMouseLocalData;
xue@0:   TWaveViewMousePointerEvent FOnMousePointer;
xue@0: 
xue@0:   TWaveViewCustomInfoEvent FCustomCursorText;
xue@0:   TWaveViewCustomPaintEvent FOnCustomPaint;
xue@0:   TWaveViewCustomInfoEvent FCustomPaneInfo;
xue@0:   TWaveViewCustomInfoEvent FCustomInfo;
xue@0:   TWaveViewCustomPropertyEvent FCustomProperty;
xue@0:   TWaveViewSelHitTest FSelHitTest;
xue@0: 
xue@0:   TColor FAxisColor;
xue@0:   TColor FBackColor;
xue@0:   TColor FCursorColorDim;
xue@0:   TColor FCursorColorBright;
xue@0:   TColor FInfoColor0;
xue@0:   TColor FInfoColor1;
xue@0:   TColor FInfoColor2;
xue@0:   TColor FWaveBackColor;
xue@0:   TColor FWaveColor; TColor FWaveColor2;
xue@0:   TColor FSelectedAreaColorX;
xue@0:   TColor FSelectedFrameColorX;
xue@0:   TColor FSelectingFrameColorX;
xue@0: 
xue@0:   AnsiString FCaption;
xue@0: 
xue@0:   TAlign FRulerAlignX;
xue@0:   TAlign FRulerAlignY;
xue@0: 
xue@0: #define WV2_FONT_NUMBER 6
xue@0:   TFont* FFonts[WV2_FONT_NUMBER];
xue@0: 
xue@0:   bool FAutoCaption;
xue@0:   bool FAutoExtractMode;
xue@0:   bool FAutoSpecAmp;
xue@0:   bool FClickFocus;
xue@0:   bool FDefaultPopupMenu;
xue@0:   bool FDefaultPropertyItems;
xue@0:   bool FForceHamming;
xue@0:   bool FLocalDataOn;
xue@0:   bool FMultiSelect;
xue@0:   bool FPlayNoteInSemitone;
xue@0:   bool FProgressCursor;
xue@0: 
xue@0:   bool FShowCursor;
xue@0:   bool FShowCursorText;
xue@0:   bool FShowInfo;
xue@0:   bool FShowPaneInfo;
xue@0:   bool FLocalDataTimeGrid;
xue@0: 
xue@0:   double FCurrentDigiFreq1;
xue@0:   double FCurrentDigiFreq2;
xue@0:   double FCurrentTime1;
xue@0:   double FCurrentTime2;
xue@0:   double FSpecAmp;
xue@0:   double FEndDigiFreq;
xue@0:   double FStartDigiFreq;
xue@0:   double FVStartSel;
xue@0:   double FVStartSelR;
xue@0:   double FYZoomRate;
xue@0:   double prevk;
xue@0:   TWaveViewSelHitTest FStartSelHitTest;
xue@0: 
xue@0:   double* PlayBuffer0;
xue@0:   double* PlayBuffer1;
xue@0:   int PBPA;
xue@0:   int PBPW;
xue@0: 
xue@0:   int FBlockSize;
xue@0:   int FBytesPerSample;
xue@0:   int FCalculateFrameCount;
xue@0:   int FChannels;
xue@0:   int FCurrentPane;
xue@0:   int FEndPos;
xue@0:   int FExtractMode;
xue@0:   int FLength;
xue@0:   int FOpMode;
xue@0:   int FPitchScalePart;
xue@0:   int FRulerUnitAmp;
xue@0:   int FRulerUnitFreq;
xue@0:   int FRulerUnitTime;
xue@0:   int FSamplesPerSec;
xue@0:   int FSectionBlocks;
xue@0:   int FSectionProgress;
xue@0:   int FSectionStartPos;
xue@0:   int FSectionEndPos;
xue@0:   int FSelectionBorderWidth;
xue@0:   int FSelectMode;
xue@0:   int FSpecOffst;
xue@0:   int FSpecRes;
xue@0:   int FStartPane;
xue@0:   int FStartPos;
xue@0:   int FStartSel;
xue@0:   int FStartSelR;
xue@0:   int FStartSelX;
xue@0:   int FStartSelY;
xue@0:   TWaveViewSelection FStartSelSel;
xue@0:   TWaveViewStereoMode FStereoMode;
xue@0: 
xue@0:   int FLastFocus;
xue@0:   int FX;
xue@0:   int FY;
xue@0:   TShiftState FLastShiftState;
xue@0:   int FLastX;
xue@0:   int FLastY;
xue@0: 
xue@0: 
xue@0:   int FX1;
xue@0:   int FX2;
xue@0: 
xue@0:   //FFT Buffers
xue@0:   cdouble* fw;
xue@0:   cdouble* fx;
xue@0:   //playback windows
xue@0:   double* fw1;
xue@0:   double* fw2;
xue@0:   double* ifw1;
xue@0:   double* fw2_fw1;
xue@0:   //analysis window function
xue@0:   double* fwin;
xue@0:   double* famp;
xue@0:   double* loopframe0;
xue@0:   double* loopframe1;
xue@0:   int* fhbi;
xue@0: 
xue@0:   void* FData[WV2_MAX_CHANNEL];
xue@0: 
xue@0:   WindowType FSpecWindowType;
xue@0:   double FSpecWindowParamD[5];
xue@0:   int FSpecWindowParamI[5];
xue@0: 
xue@0:   TWaveViewPlaybackFilter FPlaybackFilter;
xue@0:   TWaveViewTools FTools;
xue@0: 
xue@0: public:
xue@0:   int PBPR;
xue@0:   bool DisableMouseWheelZoom;
xue@0:   double maxv_specamp;
xue@0: 
xue@0:   TQuickSpectrogram* FSpectrogram[WV2_MAX_CHANNEL];
xue@0:   TWaveViewPanes FPanes;
xue@0:   TWaveViewObjects FObjects;
xue@0:   #define WV2_INFORECTCOUNT 10
xue@0:   int InfoRectCount;
xue@0:   int InfoRectAtPointer;
xue@0:   TRect InfoRect[WV2_INFORECTCOUNT];
xue@0:   TWaveViewObject* ObjectAtPointer;
xue@0:   TWaveViewObject* StartObject;
xue@0: 
xue@0:   TMenuItem* ItemExtract;
xue@0:   TMenuItem* ItemPlay;
xue@0:   TMenuItem* ItemProperty;
xue@0:   TMenuItem* ItemSeparator1;
xue@0:   TMenuItem* ItemSeparator2;
xue@0:   TMenuItem* ItemXZoomRestore;
xue@0:   TMenuItem* ItemYZoomRestore;
xue@0: 
xue@0:   TWaveViewSelection UndoExtractSelection;
xue@0: 
xue@0:   TWaveViewRulerSetting DefaultRulerSetting[4];
xue@0:   TFont* DefaultPaneInfoFont;
xue@0:   TFont* DefaultInfoFont;
xue@0: 
xue@0:   int TimeStamp1;
xue@0:   int TimeStamp2;
xue@0:   int InfoLeft;
xue@0:   int InfoTop;
xue@0:   bool AutoScroll;
xue@0:   bool ForceOLA;
xue@0:   bool LoopPlay;
xue@0:   int LoopMode;
xue@0: 
xue@0:   Graphics::TBitmap* Basic0[WV2_MAX_CHANNEL];
xue@0:   struct sBasic0Settings {int X; int Y; int Start; int End; double YZR;
xue@0:     bool __fastcall operator!=(const sBasic0Settings& BS){return X!=BS.X || Y!=BS.Y || Start!=BS.Start || End!=BS.End || YZR!=BS.YZR;}
xue@0:     } Basic0Settings[WV2_MAX_CHANNEL];
xue@0:   Graphics::TBitmap* Basic1[WV2_MAX_CHANNEL];
xue@0:   struct sBasic1Settings {int X; int Y; TWaveViewSelection Sel; double amp; int yscale; int specstyle;
xue@0:     bool __fastcall operator!=(const sBasic1Settings& BS){return X!=BS.X || Y!=BS.Y || Sel!=BS.Sel || amp!=BS.amp || yscale!=BS.yscale || specstyle!=BS.specstyle;}
xue@0:     } Basic1Settings[WV2_MAX_CHANNEL];
xue@0: 
xue@0: private:
xue@0:   int CalculateSpectrogramX(int channel, double* xx, int dX, bool interpolate);
xue@0:   TCursor __fastcall ControlCursorAtPos(int X, int Y);
xue@0:   int __fastcall FillBlock(void* Block);
xue@0:   void __fastcall FMenuPopup(TObject*);
xue@0:   QSPEC_FORMAT __fastcall SampleSpectrogramX(int channel, Graphics::TBitmap* ABmp, double* xx, double* yy, int dX, int dY, double amp, bool interpolate);
xue@0:   QSPEC_FORMAT __fastcall SamplePeakSpectrogramX(int yscale, int channel, double AStartDigiFreq, double AnEndDigiFreq, Graphics::TBitmap* ABmp, double* xx, int dX, int dY, double amp);
xue@0:   QSPEC_FORMAT __fastcall SampleSinuSpectrogramX(int yscale, int channel, double AStartDigiFreq, double AnEndDigiFreq, Graphics::TBitmap* ABmp, double* xx, int dX, int dY, double amp);
xue@0:   TWaveViewSelHitTest __fastcall SelHitTest(int X, int Y);
xue@0:   void __fastcall SetAutomaticSpecAmp(int channel, double* xx, double AStartDigiFreq, double AnEndDigiFreq, int dX, int dY);
xue@0: 
xue@0: protected:
xue@0:   DYNAMIC void __fastcall Click(void);
xue@0:   DYNAMIC void __fastcall DblClick(void);
xue@0:   virtual QSPEC_FORMAT* __fastcall GetA(int Channel, int fr);
xue@0:   virtual double __fastcall GetCurrentAmplitude();
xue@0:   virtual int __fastcall GetCurrentChannel();
xue@0:   virtual double __fastcall GetCurrentDigiFreq();
xue@0:   virtual __int16 __fastcall GetCurrentSample16();
xue@0:   virtual int __fastcall GetCurrentSampleInPixel();
xue@0:   virtual int __fastcall GetCurrentTimeEx();
xue@0:   virtual TWaveViewSelection __fastcall GetCurrentRange();
xue@0:   virtual void* __fastcall GetData(int Channel);
xue@0:   virtual __int16* __fastcall GetData16(int Channel);
xue@0:   virtual __pint24 __fastcall GetData24(int Channel);
xue@0:   virtual char* __fastcall GetData8(int Channel);
xue@0:   virtual QSPEC_FORMAT* __fastcall GetPh(int Channel, int fr);
xue@0: 	virtual cmplx<QSPEC_FORMAT>* __fastcall GetSpec(int Channel, int fr);
xue@0: 	virtual TQuickSpectrogram* __fastcall GetSpectrogram(int Channel);
xue@0: 	virtual double __fastcall GetSpecWindowParamD(int Index);
xue@0: 	DYNAMIC void __fastcall KeyDown(Word &Key, TShiftState Shift);
xue@0:   DYNAMIC void __fastcall KeyUp(Word &Key, TShiftState Shift);
xue@0:   DYNAMIC void __fastcall MouseCursor(TShiftState Shift, int X, int Y);
xue@0:   DYNAMIC void __fastcall MouseDown(TMouseButton Button, TShiftState Shift, int X, int Y);
xue@0:   DYNAMIC void __fastcall MouseLocalData(int X, int Y, int Down);
xue@0:   DYNAMIC void __fastcall MouseMove(TShiftState Shift, int X, int Y);
xue@0:   DYNAMIC void __fastcall MousePointer(TShiftState Shift, int X, int Y);
xue@0:   DYNAMIC void __fastcall MouseUp(TMouseButton Button, TShiftState Shift, int X, int Y);
xue@0:   DYNAMIC void __fastcall MouseWheelHandler(TMessage& Msg);
xue@0:   virtual void __fastcall Paint();
xue@0:   DYNAMIC void __fastcall Resize();
xue@0: 
xue@0:   virtual void __fastcall PageChange(bool updatescrollbar=true);
xue@0: 
xue@0:   virtual void __fastcall ScrollBarChange(TObject* Sender);
xue@0: 
xue@0:   virtual void __fastcall SetAutoExtractMode(bool AnAutoExtractMode);
xue@0:   virtual void __fastcall SetAutoSpecAmp(bool AnAutoSpecAmp);
xue@0:   virtual void __fastcall SetAxisColor(TColor AnAxisColor);
xue@0:   virtual void __fastcall SetBackColor(TColor ABackColor);
xue@0:   virtual void __fastcall SetCaption(AnsiString ACaption);
xue@0:   virtual void __fastcall SetClickFocus(bool AClickFocus);
xue@0:   virtual void __fastcall SetData(int index, void* AData);
xue@0:   virtual void __fastcall SetDefaultPopupMenu(bool ADefaultPopupMenu);
xue@0:   virtual void __fastcall SetEndPos(int AnEndPos);
xue@0:   virtual void __fastcall SetExtractMode(int AnExtractMode);
xue@0:   virtual void __fastcall SetForceHamming(bool AForceHamming);
xue@0:   virtual void __fastcall SetMultiSelect(bool AMultiSelect);
xue@0:   virtual void __fastcall SetPitchScalePart(int APart);
xue@0:   virtual void __fastcall SetPlaybackFilter(TWaveViewPlaybackFilter APlaybackFilter);
xue@0:   virtual void __fastcall SetSamplesPerSec(int ASamplesPerSec);
xue@0:   virtual void __fastcall SetScrollBar(TScrollBar* AScrollBar);
xue@0:   virtual void __fastcall SetSelectedAreaColorX(TColor ASelectedAreaColorX);
xue@0:   virtual void __fastcall SetSelectedFrameColorX(TColor ASelectedFrameColorX);
xue@0:   virtual void __fastcall SetSelectingFrameColorX(TColor ASelectingFrameColorX);
xue@0:   virtual void __fastcall SetSelectMode(int ASelectMode);
xue@0:   virtual void __fastcall SetSpecOffst(int ASpecOffst);
xue@0:   virtual void __fastcall SetSpecRes(int ASpecRes);
xue@0:   virtual void __fastcall SetSpecWindowParamD(int Index, double AParamD);
xue@0:   virtual void __fastcall SetSpecWindowType(WindowType ASpecWindowType);
xue@0:   virtual void __fastcall SetSpecAmp(double AnAmp);
xue@0:   virtual void __fastcall SetStartPos(int AStartPos);
xue@0:   virtual void __fastcall SetTools(TWaveViewTools ATools);
xue@0:   virtual void __fastcall SetWaveAudio(TWaveAudio* AWaveAudio);
xue@0:   virtual void __fastcall SetWaveBackColor(TColor AWaveBackColor);
xue@0:   virtual void __fastcall SetWaveColor(TColor AWaveColor);
xue@0:   virtual void __fastcall SetYZoomRate(double AYZoomRate);
xue@0: 
xue@0:   virtual void __fastcall WaveViewAudioChange(TObject* Sender);
xue@0:   virtual void __fastcall WaveViewHitTest(int X, int Y);
xue@0:   virtual void __fastcall WaveViewSectionPlaybackDone(TObject* Sender);
xue@0:   virtual void __fastcall WaveViewSectionPlaybackProg(TObject* Sender, double Progress);
xue@0: 
xue@0: public:
xue@0:   __property Canvas;
xue@0: 
xue@0:   __property TWaveViewSelection CurrentRange={read=GetCurrentRange};
xue@0:   __property TWaveViewSelections* Selections={read=FSelections, write=FSelections};
xue@0: 
xue@0:   __property AnsiString AccessFCaption={read=FCaption, write=FCaption};
xue@0:   __property AnsiString Caption={read=FCaption, write=SetCaption};
xue@0: 
xue@0:   __property int CalculateFrameCount={read=FCalculateFrameCount};
xue@0: 
xue@0:   __property bool DefaultPropertyItems={read=FDefaultPropertyItems, write=FDefaultPropertyItems};
xue@0:   __property bool ForceHamming={read=FForceHamming, write=SetForceHamming};
xue@0:   __property bool Playing={read=GetPlaying};
xue@0:   __property bool PlayNoteInSemitone={read=FPlayNoteInSemitone, write=FPlayNoteInSemitone};
xue@0:   __property bool ShowInfo={read=FShowInfo, write=FShowInfo};
xue@0:   __property bool ShowPaneInfo={read=FShowPaneInfo, write=FShowPaneInfo};
xue@0: 
xue@0:   __property void* Data[int Channel]={read=GetData, write=SetData};
xue@0:   __property __int16* Data16[int Channel]={read=GetData16};
xue@0:   __property __pint24 Data24[int Channel]={read=GetData24};
xue@0:   __property char* Data8[int Channel]={read=GetData8};
xue@0: 
xue@0:   __property double CurrentAmplitude={read=GetCurrentAmplitude};
xue@0:   __property int CurrentChannel={read=GetCurrentChannel};
xue@0:   __property double CurrentDigiFreq={read=GetCurrentDigiFreq};
xue@0:   __property int CurrentPane={read=FCurrentPane};
xue@0:   __property __int16 CurrentSample16={read=GetCurrentSample16};
xue@0:   __property int CurrentSampleInPixel={read=GetCurrentSampleInPixel};
xue@0:   __property int CurrentTime={read=GetCurrentTimeEx};
xue@0:   __property int CurrentX={read=FX};
xue@0:   __property int CurrentY={read=FY};
xue@0:   __property double EndDigiFreq={read=FEndDigiFreq, write=FEndDigiFreq};
xue@0:   __property double SpecAmp={read=FSpecAmp, write=SetSpecAmp};
xue@0:   __property double StartDigiFreq={read=FStartDigiFreq, write=FStartDigiFreq};
xue@0:   __property double YZoomRate={read=FYZoomRate,write=SetYZoomRate};
xue@0: 
xue@0:   __property QSPEC_FORMAT* A[int Channel][int fr]={read=GetA};
xue@0:   __property int BytesPerSample={read=FBytesPerSample};
xue@0:   __property int Channels={read=FChannels, write=FChannels};
xue@0:   __property int EndPos={read=FEndPos, write=SetEndPos};
xue@0:   __property int ExtractMode={read=FExtractMode, write=SetExtractMode};
xue@0:   __property int LastX={read=FLastX};
xue@0:   __property int LastY={read=FLastY};
xue@0:   __property int Length={read=FLength, write=FLength};
xue@0:   __property int OpMode={read=FOpMode};
xue@0:   __property QSPEC_FORMAT* Ph[int Channel][int fr]={read=GetPh};
xue@0:   __property TAlign RulerAlignX={read=FRulerAlignX, write=FRulerAlignX};
xue@0:   __property TAlign RulerAlignY={read=FRulerAlignY, write=FRulerAlignY};
xue@0:   __property int RulerUnitAmp={read=FRulerUnitAmp, write=FRulerUnitAmp};
xue@0:   __property int RulerUnitFreq={read=FRulerUnitFreq, write=FRulerUnitFreq};
xue@0:   __property int RulerUnitTime={read=FRulerUnitTime, write=FRulerUnitTime};
xue@0:   __property int SectionEndPos={read=FSectionEndPos, write=FSectionEndPos};
xue@0:   __property int SectionStartPos={read=FSectionStartPos, write=FSectionStartPos};
xue@0:   __property int SelectMode={read=FSelectMode, write=SetSelectMode};
xue@0:   __property bool ShowCursorText={read=FShowCursorText, write=FShowCursorText};
xue@0: 	__property cmplx<QSPEC_FORMAT>* Spec[int Channel][int fr]={read=GetSpec};
xue@0: 	__property TQuickSpectrogram* Spectrogram[int Channel]={read=GetSpectrogram};
xue@0: 	__property int SpecOffst={read=FSpecOffst, write=SetSpecOffst};
xue@0: 	__property int SpecRes={read=FSpecRes, write=SetSpecRes};
xue@0:   __property double SpecWindowParamD[int Index]={read=GetSpecWindowParamD, write=SetSpecWindowParamD};
xue@0:   __property int StartPane={read=FStartPane};
xue@0:   __property int StartPos={read=FStartPos, write=SetStartPos};
xue@0:   __property int StartSel={read=FStartSel};
xue@0:   __property int StartSelX={read=FStartSelX};
xue@0:   __property int StartSelY={read=FStartSelY};
xue@0:   __property TWaveViewStereoMode StereoMode={read=FStereoMode, write=FStereoMode};
xue@0: 
xue@0:   __property TColor CursorColorBright={read=FCursorColorBright, write=FCursorColorBright};
xue@0:   __property TColor CursorColorDim={read=FCursorColorDim, write=FCursorColorDim};
xue@0:   __property TColor InfoColor0={read=FInfoColor0, write=FInfoColor0};
xue@0:   __property TColor InfoColor1={read=FInfoColor1, write=FInfoColor1};
xue@0:   __property TColor InfoColor2={read=FInfoColor2, write=FInfoColor2};
xue@0: 
xue@0:   __property WindowType SpecWindowType={read=FSpecWindowType, write=SetSpecWindowType};
xue@0: 
xue@0: 
xue@0: public:
xue@0:   __fastcall TWaveView(TComponent* Owner, bool usex=false, bool usep=false);
xue@0:   __fastcall ~TWaveView();
xue@0: 
xue@0:   void ClearSpectrogram(int index);
xue@0:   void ClearSpectrograms();
xue@0:   void __fastcall DefaultShowProperty(bool selection);
xue@0:   virtual void __fastcall DoExtract(TObject* Sender);
xue@0:   virtual void __fastcall UndoExtract(TObject* Sender);
xue@0: 
xue@0:   virtual void __fastcall ItemExtractClick(TObject* Sender);
xue@0:   virtual void __fastcall ItemPlayClick(TObject* Sender);
xue@0:   virtual void __fastcall ItemPropertyClick(TObject* Sender);
xue@0:   virtual void __fastcall ItemXZoomClick(TObject* Sender);
xue@0:   virtual void __fastcall ItemYZoomClick(TObject* Sender);
xue@0: 
xue@0:   void __fastcall CheckWaveOutDevCaps(TObject* Sender);
xue@0:   void __fastcall ClearExtra(int AnExtra);
xue@0:   void __fastcall ClearSelections(TObject* Sender);
xue@0:   int __fastcall CreatePanes(int X, int Y);
xue@0:   void __fastcall DrawBitmap(TObject*);
xue@0:   void __fastcall DrawCaption(AnsiString ACaption);
xue@0:   void __fastcall DrawCursor(int PaneIndex, int X, int Y);
xue@0:   void __fastcall DrawInfo();
xue@0:   void __fastcall DrawPane(int Channel, int Type, int YScale, int Rulers, TCanvas* Canv, TRect& Rect);
xue@0:   void __fastcall DrawPaneInfo(int Channel, int Type, int YScale, TCanvas* Canv, TRect& Rect);
xue@0:   void __fastcall DrawPanes(int Type=-1);
xue@0:   void __fastcall DrawPitchScale(int Type, TCanvas* Canv, TRect& Rect, int yscale);
xue@0:   void __fastcall DrawPlaybackCursor(int Position, TCanvas* Canv, TRect& Rect, int PaneType);
xue@0:   void __fastcall DrawSelection(int Type, TCanvas* Canv, TRect& Rect, int yscale, int Index, TColor FrameColorX);
xue@0:   void __fastcall DrawSelections(int Type, TCanvas* Canv, TRect& Rect, int yscale);
xue@0:   void __fastcall DrawSemitones(int start, int end, TCanvas* Canv, TRect& Rect, int yscale);
xue@0:   void __fastcall DrawSpectrogramX(int channel, TWaveViewSelection Sel, int yscale, TCanvas* ACanvas, TRect ARect, double amp=1, bool forceresample=false, bool basic=false, int SpecStyle=1);
xue@0:   void __fastcall DrawWaveForm(int channel, TCanvas* ACanvas, TRect, int, int, double amp=1, bool basic=false);
xue@0:   void __fastcall ExtDataChange(TObject* Sender);
xue@0:   void __fastcall ExtDataChange(TObject* Sender, int Channel, int From, int To);
xue@0:   TRect __fastcall ExtraBounds(int AnExtra);
xue@0:   TRect __fastcall ExtraInvBounds(int AnExtra);
xue@0:   void __fastcall FocusSelection(int Index);
xue@0:   void __fastcall FreeData(int Count);
xue@0:   void __fastcall FreeInternalBitmaps(int Count);
xue@0:   void __fastcall FreeSpectrograms();
xue@0:   double __fastcall FromAmplitudeToPixel(int PaneIndex, double Amplitude);
xue@0:   double __fastcall FromPixelToAmplitude(int PaneIndex, double Y);
xue@0:   double __fastcall FromDigiFreqToPixel(int PaneIndex, double DigiFreq);
xue@0:   double __fastcall FromDigiFreqToPixel(double DigiFreq, double AStartDigiFreq, double AnEndDigiFreq, int Y1, int Y2, int YScale);
xue@0:   double __fastcall FromPixelToDigiFreq(int PaneIndex, double Y);
xue@0:   void __fastcall FromPixelToDigiFreq(int Scale, double* DigiFreq, int Count, double AStartDigiFreq, double AnEndDigiFreq);
xue@0:   double __fastcall FromPixelToSample(int PaneIndex, double X);
xue@0:   void __fastcall FromPixelToSample(double* Sample, int Count, int AStartPos, int AnEndPos);
xue@0:   double __fastcall FromPixelToSample(double X, int AStartPos, int AnEndPos, int X1, int X2);
xue@0:   double __fastcall FromSampleToPixel(int PaneIndex, double Pos);
xue@0:   double __fastcall FromSampleToPixel(double Pos, int X1, int X2);
xue@0: 
xue@0:   double __fastcall GetFMask(double* mask, int t, TWaveViewPlaybackFilter Filter);
xue@0:   virtual void __fastcall GetObjectAtPointer(int X, int Y);
xue@0:   virtual void __fastcall GetOpMode(Word Key, TMouseButton Button, TShiftState Shift);
xue@0:   bool __fastcall GetPlaying();
xue@0:   bool __fastcall GetSpectroCalc(int startpos=-1, int endpos=-1, int Offst=-1, int Res=-1);
xue@0:   void __fastcall InvalidateBasic(int channel, int basic);
xue@0:   void __fastcall InvalidateBasics(int channel);
xue@0:   void __fastcall PausePlayback(TObject* Sender);
xue@0:   void __fastcall Post(int Mode=0);
xue@0:   void __fastcall RemoveSelection(int Index);
xue@0:   void __fastcall RePinExtra(int AnExtra);
xue@0:   void __fastcall Retrieve(int Mode=0, int from=0, int length=0);
xue@0:   int __fastcall SelectionAtPos(int Pos, double DigiFreq);
xue@0:   void __fastcall SetArea(int AStartPos, int AnEndPos, double AStartDigiFreq, double AnEndDigiFreq);
xue@0:   void __fastcall SetContent(int index, int channel, int type);
xue@0:   void __fastcall SetContent(int X, int Y, int channel, int type);
xue@0:   void __fastcall SetCursorTF(int PaneIndex, int t, double digif);
xue@0:   void __fastcall SetRulers(int PaneIndex, int Rulers);
xue@0:   void __fastcall SetRulerUnit(int ARulerUnitTime, int ARulerUnitFreq, int ARulerUnitAmp);
xue@0:   void __fastcall SetSelection(int Start, int End, double VStart, double VEnd);
xue@0:   void __fastcall SetStartAndEndDigiFreq(double AStartDigiFreq, double AnEndDigiFreq);
xue@0:   void __fastcall SetStartAndEndPos(int AStartPos, int AnEndPos);
xue@0:   void __fastcall SetYScale(int index, int yscale);
xue@0:   void StartDrag(int X, int Y);
xue@0:   void __fastcall StartPlayback(TObject* Sender);
xue@0:   void __fastcall TFFilter(int channel, bool pass, bool wholelength=false);
xue@0:   virtual void __fastcall UpdateScrollBar(TObject* Sender);
xue@0:   void __fastcall Zoom(int X, double Rate);
xue@0:   void __fastcall ZoomF(double Y, double Rate, int yscale);
xue@0:   void __fastcall ZoomY(double Rate);
xue@0:   
xue@0: __published:
xue@0:   __property Align;
xue@0:   __property Anchors;
xue@0:   __property bool AutoCaption={read=FAutoCaption, write=FAutoCaption};
xue@0:   __property bool AutoExtractMode={read=FAutoExtractMode, write=SetAutoExtractMode};
xue@0:   __property bool AutoSpecAmp={read=FAutoSpecAmp, write=SetAutoSpecAmp};
xue@0:   __property TColor AxisColor={read=FAxisColor,write=SetAxisColor};
xue@0:   __property TColor BackColor={read=FBackColor,write=SetBackColor};
xue@0:   __property bool ClickFocus={read=FClickFocus, write=SetClickFocus};
xue@0:   __property bool DefaultPopupMenu={read=FDefaultPopupMenu, write=SetDefaultPopupMenu, default=true};
xue@0:   __property DoubleBuffered;
xue@0:   __property bool MultiSelect={read=FMultiSelect, write=SetMultiSelect};
xue@0:   __property OnResize;
xue@0:   __property int PitchScalePart={read=FPitchScalePart, write=SetPitchScalePart};
xue@0:   __property TWaveViewPlaybackFilter PlaybackFilter={read=FPlaybackFilter, write=SetPlaybackFilter};
xue@0:   __property PopupMenu;
xue@0:   __property bool ProgressCursor={read=FProgressCursor, write=FProgressCursor, default=true};
xue@0:   __property int SamplesPerSec={read=FSamplesPerSec, write=SetSamplesPerSec};
xue@0: 	__property TScrollBar* ScrollBar={read=FScrollBar,write=SetScrollBar};
xue@0:   __property TColor SelectedAreaColorX={read=FSelectedAreaColorX, write=SetSelectedAreaColorX};
xue@0:   __property TColor SelectedFrameColorX={read=FSelectedFrameColorX, write=SetSelectedFrameColorX};
xue@0:   __property TColor SelectingFrameColorX={read=FSelectingFrameColorX, write=SetSelectingFrameColorX};
xue@0:   __property int SelectionBorderWidth={read=FSelectionBorderWidth, write=FSelectionBorderWidth};
xue@0:   __property bool LocalDataTimeGrid={read=FLocalDataTimeGrid, write=FLocalDataTimeGrid, default=true};
xue@0:   __property TWaveViewTools Tools={read=FTools, write=SetTools};
xue@0:   __property Visible;
xue@0:   __property TWaveAudio* WaveAudio={read=FWaveAudio, write=SetWaveAudio};
xue@0:   __property TColor WaveBackColor={read=FWaveBackColor, write=SetWaveBackColor};
xue@0:   __property TColor WaveColor={read=FWaveColor,write=SetWaveColor};
xue@0: 
xue@0:   __property TWaveViewCustomInfoEvent CustomCursorText={read=FCustomCursorText, write=FCustomCursorText};
xue@0:   __property TNotifyEvent CustomItemExtractClick={read=FCustomItemExtractClick, write=FCustomItemExtractClick};
xue@0:   __property TWaveViewCustomInfoEvent CustomInfo={read=FCustomInfo, write=FCustomInfo};
xue@0:   __property TWaveViewCustomInfoEvent CustomPaneInfo={read=FCustomPaneInfo, write=FCustomPaneInfo};
xue@0:   __property TWaveViewCustomPropertyEvent CustomProperty={read=FCustomProperty, write=FCustomProperty};
xue@0:   __property TNotifyEvent CustomXZoomClick={read=FCustomXZoomClick, write=FCustomXZoomClick};
xue@0:   __property TNotifyEvent CustomYZoomClick={read=FCustomYZoomClick, write=FCustomYZoomClick};
xue@0:   __property TWaveViewCustomPaintEvent OnCustomPaint={read=FOnCustomPaint, write=FOnCustomPaint};
xue@0:   __property TWaveViewGetIntervalEvent OnGetPlaybackStartAndEndPos={read=FOnGetPlaybackStartAndEndPos, write=FOnGetPlaybackStartAndEndPos};
xue@0:   __property TWaveViewGetOpModeEvent OnGetOpMode={read=FOnGetOpMode, write=FOnGetOpMode};
xue@0:   __property TNotifyEvent OnInfoDblClick={read=FOnInfoDblClick, write=FOnInfoDblClick};
xue@0:   __property OnKeyDown;
xue@0:   __property OnKeyPress;
xue@0:   __property OnKeyUp;
xue@0:   __property OnDblClick;
xue@0:   __property OnMouseDown;
xue@0:   __property OnMouseMove;
xue@0:   __property OnMouseWheel
xue@0:   ;
xue@0:   __property TWaveViewMouseLocalDataEvent OnMouseLocalData={read=FOnMouseLocalData, write=FOnMouseLocalData};
xue@0:   __property TWaveViewMousePointerEvent OnMousePointer={read=FOnMousePointer, write=FOnMousePointer};
xue@0:   __property OnMouseUp;
xue@0:   __property TNotifyEvent BeforePlayback={read=FBeforePlayback, write=FBeforePlayback};
xue@0:   __property TNotifyEvent OnPageChange={read=FOnPageChange,write=FOnPageChange};
xue@0:   __property TNotifyEvent OnPaint={read=FOnPaint, write=FOnPaint};
xue@0:   __property TNotifyEvent OnPlaybackDone={read=FOnPlaybackDone,write=FOnPlaybackDone};
xue@0:   __property TNotifyEvent OnPlaybackStart={read=FOnPlaybackStart, write=FOnPlaybackStart};
xue@0:   __property TNotifyEvent OnSelectedChange={read=FOnSelectedChange,write=FOnSelectedChange};
xue@0:   __property TNotifyEvent OnScaleChange={read=FOnScaleChange,write=FOnScaleChange};
xue@0: };
xue@0: //---------------------------------------------------------------------------
xue@0: #endif