MMRVBDLG.INT 2.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  1. {========================================================================}
  2. {= (c) 1995-98 SwiftSoft Ronald Dittrich =}
  3. {========================================================================}
  4. {= All Rights Reserved =}
  5. {========================================================================}
  6. {= D 01099 Dresden = Tel.: +0351-8012255 =}
  7. {= Loewenstr.7a = info@swiftsoft.de =}
  8. {========================================================================}
  9. {= Actual versions on http://www.swiftsoft.de/mmtools.html =}
  10. {========================================================================}
  11. {= This code is for reference purposes only and may not be copied or =}
  12. {= distributed in any format electronic or otherwise except one copy =}
  13. {= for backup purposes. =}
  14. {= =}
  15. {= No Delphi Component Kit or Component individually or in a collection=}
  16. {= subclassed or otherwise from the code in this unit, or associated =}
  17. {= .pas, .dfm, .dcu, .asm or .obj files may be sold or distributed =}
  18. {= without express permission from SwiftSoft. =}
  19. {= =}
  20. {= For more licence informations please refer to the associated =}
  21. {= HelpFile. =}
  22. {========================================================================}
  23. {= $Date: 20.01.1998 - 18:00:00 $ =}
  24. {========================================================================}
  25. unit MMRvbDlg;
  26. {$I COMPILER.INC}
  27. interface
  28. uses
  29. {$IFDEF WIN32}
  30. Windows,
  31. {$ELSE}
  32. WinTypes,
  33. WinProcs,
  34. {$ENDIF}
  35. SysUtils,
  36. Messages,
  37. Consts,
  38. Classes,
  39. Dialogs,
  40. StdCtrls,
  41. Controls,
  42. ExtCtrls,
  43. Forms,
  44. MMObj,
  45. MMUtils,
  46. MMReverb,
  47. MMLEDS,
  48. MMSpin,
  49. MMSlider,
  50. MMString,
  51. MMEdit;
  52. type
  53. {-- TMMReverbDialog ---------------------------------------------------}
  54. TMMReverbDialog = class(TMMComponent)
  55. public
  56. constructor Create(AOwner: TComponent); override;
  57. function Execute: Boolean;
  58. published
  59. property Preview: Boolean read FPreview write FPreview;
  60. property Source: TMMReverb read FSource write SetSource;
  61. property Title: string read FTitle write FTitle;
  62. end;
  63. implementation