wizardmenuwizard.dfm

Delphi下用于编写向导的组件

object MenuWizardRepository: TMenuWizardRepository
  OldCreateOrder = False
  IDString = 'TOndrej.MenuWizardRepository'
  WizardName = 'Menu wizard'
  Author = 'TOndrej'
  Comment = 'Menu wizard'
  Icon.Data = {
    0000010001002020000000000000A80800001600000028000000200000004000
    0000010008000000000080040000000000000000000000010000000000000000
    0000800080008000000080800000008000000080800000008000C0C0C000C0DC
    C000F0CAA60080808000FF00FF00FF000000FFFF000000FF000000FFFF000000
    FF00FFFFFF00F0FBFF00A4A0A000D4F0FF00B1E2FF008ED4FF006BC6FF0048B8
    FF0025AAFF0000AAFF000092DC00007AB90000629600004A730000325000D4E3
    FF00B1C7FF008EABFF006B8FFF004873FF002557FF000055FF000049DC00003D
    B900003196000025730000195000D4D4FF00B1B1FF008E8EFF006B6BFF004848
    FF002525FF000000FF000000DC000000B900000096000000730000005000E3D4
    FF00C7B1FF00AB8EFF008F6BFF007348FF005725FF005500FF004900DC003D00
    B900310096002500730019005000F0D4FF00E2B1FF00D48EFF00C66BFF00B848
    FF00AA25FF00AA00FF009200DC007A00B900620096004A00730032005000FFD4
    FF00FFB1FF00FF8EFF00FF6BFF00FF48FF00FF25FF00FF00FF00DC00DC00B900
    B900960096007300730050005000FFD4F000FFB1E200FF8ED400FF6BC600FF48
    B800FF25AA00FF00AA00DC009200B9007A009600620073004A0050003200FFD4
    E300FFB1C700FF8EAB00FF6B8F00FF487300FF255700FF005500DC004900B900
    3D00960031007300250050001900FFD4D400FFB1B100FF8E8E00FF6B6B00FF48
    4800FF252500FF000000DC000000B9000000960000007300000050000000FFE3
    D400FFC7B100FFAB8E00FF8F6B00FF734800FF572500FF550000DC490000B93D
    0000963100007325000050190000FFF0D400FFE2B100FFD48E00FFC66B00FFB8
    4800FFAA2500FFAA0000DC920000B97A000096620000734A000050320000FFFF
    D400FFFFB100FFFF8E00FFFF6B00FFFF4800FFFF2500FFFF0000DCDC0000B9B9
    0000969600007373000050500000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF
    4800AAFF2500AAFF000092DC00007AB90000629600004A73000032500000E3FF
    D400C7FFB100ABFF8E008FFF6B0073FF480057FF250055FF000049DC00003DB9
    0000319600002573000019500000D4FFD400B1FFB1008EFF8E006BFF6B0048FF
    480025FF250000FF000000DC000000B90000009600000073000000500000D4FF
    E300B1FFC7008EFFAB006BFF8F0048FF730025FF570000FF550000DC490000B9
    3D00009631000073250000501900D4FFF000B1FFE2008EFFD4006BFFC60048FF
    B80025FFAA0000FFAA0000DC920000B97A000096620000734A0000503200D4FF
    FF00B1FFFF008EFFFF006BFFFF0048FFFF0025FFFF0000FFFF0000DCDC0000B9
    B900009696000073730000505000F2F2F200E6E6E600DADADA00CECECE00C2C2
    C200B6B6B600AAAAAA009E9E9E0092929200868686007A7A7A006E6E6E006262
    6200565656004A4A4A003E3E3E0032323200262626001A1A1A000E0E0E000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000020200000000000000
    0000000000000000000000000000000000000000000002020202000000000000
    0000000000000000000000000000000000000000000202020202000000000000
    0000000000000000000000000000000000000000020202020200000000000000
    0000000000000000000000000000000000000002020202020000000000000000
    0000000000000000000000000000000000000202020202000000000000000000
    0000000000000000000000000000000000020202020200000000000000000000
    0000000000000000000000000000000002020202020000000000000000000000
    00F6000000000000000000000000000202020202000000000000000000000000
    00F6EEEEEEEEEEEEEEEEEE000000020202020200000000000000000000000000
    00F6EE02020202EEEEEEEE000002020202020000000000000000000000000000
    00F6EEEEEEEEEEEEEEEEEE000202020202000000000000000000000000000000
    00F6020202020202020202020202020200000000000000000000000000000000
    00F6EEEEEEEEEEEEEEEE02020202020000000000000000000000000000000000
    00F6EE0202020202020202020202000000000000000000000000000000000000
    00F6EEEEEEEEEEEE020202020200000000000000000000000000000000000000
    00F6EE02020202000F0F02020000000000000000000000000000000000000000
    00F6EEEEEEEE000F0F0F0200000000000A000000000A00000000000000000000
    00F6EE0202000F0F0F00EE000000000A100A00000A100A000000000000000000
    00F6EEEE000F0F0F00EEEE00000000000A000000000A00000000000000000000
    F6F6F6F60A0A0F00F6F6F6F6000000000000F600000000000000000000000000
    F6EE02020A0A00EEEEEEEE0AEEEEEEEE0AEEF600000000000000000000000000
    F6EE02EEEEEE02EE02020A100A02020A100AF600000000000000000000000000
    F6EE0202020202EEEEEEEE0AEEEEEEEE0AEEEEF6000000000000000000000000
    F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFF9FFFFFFF0FFFFFFE0FFFFFFC1FFFFFF83FFFFFF07FFFFFE0FFFFFF
    C1FFE00383FFE00307FFE0020FFFE0001FFFE0003FFFE0007FFFE000FFFFE001
    FFFFE003FFFFE003DEFFE0038C7FE003DEFFC00007FFC00007FFC00003FFC000
    03FFC00003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  Page = 'Wizards'
  Left = 200
  Top = 100
  Height = 200
  Width = 300
  object ModuleCreator: TModuleCreator
    AncestorName = 'MenuWizardModule'
    SourceForm.Strings = (
      'object %1:s: T%1:s'
      '  OldCreateOrder = False'
      'end')
    SourceImpl.Strings = (
      'unit %0:s;'
      ''
      'interface'
      ''
      'uses'
      
        '  Windows, Messages, SysUtils, Classes, Graphics, Controls, Form' +
        's, Dialogs,'
      '  ToolsAPI,'
      '  DMMenuWizard;'
      ''
      'type'
      '  T%1:s = class(TMenuWizardModule)'
      '  private'
      '  protected'
      '    procedure Execute; override;'
      '  public'
      '  end;'
      ''
      'procedure Register;'
      ''
      'implementation'
      ''
      'uses'
      '  WizardUtils;'
      ''
      '{$R *.DFM}'
      ''
      
        '//--------------------------------------------------------------' +
        '--------------------------------------------------------'
      ''
      'procedure Register;'
      ''
      'begin'
      '  RegisterPackageWizard(T%1:s.CreateInterfaced);'
      'end;'
      ''
      
        '//--------------------------------------------------------------' +
        '--------------------------------------------------------'
      ''
      '{ T%1:s protected }'
      ''
      
        '//--------------------------------------------------------------' +
        '--------------------------------------------------------'
      ''
      'procedure T%1:s.Execute;'
      ''
      'begin'
      '  inherited Execute;'
      '  // your code here'
      'end;'
      ''
      
        '//--------------------------------------------------------------' +
        '--------------------------------------------------------'
      ''
      'end.')
    Left = 48
    Top = 16
  end
end