[窗体设计专家] 增加转换组件到代码的功能，未完善。
1.没有对TStrings支持。
2.没有对TCollection支持。
3.英文界面乱码。

是还没完善，你说的这仨东西都还没做呢。  

测试积极性真高，鼓励一下。

呵呵。。。

4.BCB下面：
  //btn1
  btn1 = TButton->Create(this);
  btn1->Name = 'btn1';
  btn1->Parent = this;
  btn1->Left = 8;
  btn1->Top = 8;
  btn1->Width = 75;
  btn1->Height = 25;
  btn1->Caption = "btn1";
  btn1->TabOrder = 0;
最好改为：
  btn1 = new TButton(this);

啊对，可以的。

289完善了对Strings和Collection的支持，测测看看？

void __fastcall TForm1::CreateComponents()
{
  TButton* btn1;
  TDBGrid* dbgrd1;
  TMemo* mmo1;

  btn1 = new TButton(this);

  //dbgrd1
  dbgrd1 = new TDBGrid(this);

  //mmo1
  mmo1 = new TMemo(this);

  btn1->Name = 'btn1';
  btn1->Parent = this;
  btn1->Left = 8;
  btn1->Top = 8;
  btn1->Width = 75;
  btn1->Height = 25;
  btn1->Caption = "btn1";
  btn1->TabOrder = 0;

  //dbgrd1
  dbgrd1->Name = 'dbgrd1';
  dbgrd1->Parent = this;
  dbgrd1->Left = 16;
  dbgrd1->Top = 56;
  dbgrd1->Width = 320;
  dbgrd1->Height = 120;
  dbgrd1->TabOrder = 1;
  dbgrd1->TitleFont->Charset = DEFAULT_CHARSET;
  dbgrd1->TitleFont->Color = clWindowText;
  dbgrd1->TitleFont->Height = -11;
  dbgrd1->TitleFont->Name = "MS Sans Serif";
  dbgrd1->TitleFont->Style = TFontStyles();

  {
  TColumn* Item = dbgrd1->Columns->Add();
    Item->Expanded = false;
    Item->Visible = true;
  }

  {
  {
    Item->Expanded = false;
    Item->Visible = true;
  }

  {
  {
    Item->Expanded = false;
    Item->Visible = true;
  }

  //mmo1
  mmo1->Name = 'mmo1';
  mmo1->Parent = this;
  mmo1->Left = 16;
  mmo1->Top = 184;
  mmo1->Width = 185;
  mmo1->Height = 89;

  mmo1->Lines->Clear();
  mmo1->Lines->Add("mmo1");
  mmo1->Lines->Add("fh");

  mmo1->TabOrder = 2;
}
问题1，第一个组件前面没有注释。
问题2，对TCollection支持好像存在问题。{}有问题，代码排列不整齐。

Delphi好些，不过第一个问题也有。
还有就是乱码界面，BCB下不会，不过英文时显示的是简体的～～
又发现一个问题，BCB下面新增Application，把窗口通过F12切换到前面，启动这个专家（此时没有选择组件？所以没有代码），CPU100％，看看Deliphi的。。。

最后的问题Delphi一样。。。

乱码是多语引起的，等界面定下来后，把多语加上去就好了。
没选择组件时此功能会转当前form的所有东西。
看来BCB下还有点问题，回去继续改。

290完善了一点点，但对于未选择的情况，还没出现100％的CPU这个问题。请问你的BCB是什么版本？

Delphi下面也会啊～～
BCB6、Delphi7

怪事，能否写一下详细步骤？我如果直接在空form时打开Comp to code，则就出现了Form的代码，一切正常。

1.启动IDE。
2.如果此时源码编辑界面在前面，F12（切换到设计窗口）。
3.执行转换成代码。
4.Waiting for 100%...

试一试291?要是还有这个问题，麻烦用反馈向导生成一份错误报告贴来吧？看看是不是有什么其他东西在影响。

我估計與環境沒有關係，我在公司兩部電腦和家裡一部電腦隨便試一下都出來這個問題。

有部電腦可以說是新裝的環境。

CnPack IDE Wizards 錯誤報告。

描述:
組件轉換成代碼問題

錯誤細節:
  該錯誤有 100% 的概率可重現。

步驟:
1. 從開始功能表中啟動 Delphi 7
2. 一個默認的空工程被創建
3. 如設計窗口不在活動狀態，按<F12>讓設計窗口進入活動狀態，在主功能表中，選擇【轉換成代碼】
4. 出現CPU佔用100%，IDE無法操作

設置:
  OS: Windows 5.2 (Build 3790: Service Pack 1)
  CnWizards: CnWizards_D7.dll Ver: 0.8.2.291_Unstable Build 2007.02.06
  IDE: ideD71 CSS
  ComCtl32: 5.82.3790.2778

已安裝的專家:
  F:\Borland\Experts\CnPack\CnWizards\CnWizards_D7.dll = CnWizards_D7

已安裝的包:
  (Untitled) = $(DELPHI)\Bin\dclite70.bpl
  (Untitled) = $(DELPHI)\Bin\dclindy70.bpl
  (Untitled) = $(DELPHI)\Bin\dclnet70.bpl
  (Untitled) = $(DELPHI)\Bin\dclmcn70.bpl
  (Untitled) = $(DELPHI)\Bin\dclsoap70.bpl
  (Untitled) = $(DELPHI)\Bin\dclocx70.bpl
  (Untitled) = $(DELPHI)\Bin\dcldbx70.bpl
  (Untitled) = $(DELPHI)\Bin\dcldbxcds70.bpl
  (Untitled) = $(DELPHI)\Bin\DBWEBXPRT.BPL
  (Untitled) = $(DELPHI)\Bin\dclwbm70.bpl
  (Untitled) = $(DELPHI)\Bin\dclie70.bpl
  (Untitled) = $(DELPHI)\Bin\dclwebsnap70.bpl
  (Untitled) = $(DELPHI)\Bin\dclado70.bpl
  (Untitled) = $(DELPHI)\Bin\dclbde70.bpl
  (Untitled) = $(DELPHI)\Bin\dcldb70.bpl
  (Untitled) = $(DELPHI)\Bin\DCLIB70.bpl
  (Untitled) = $(DELPHI)\Bin\dcltee70.bpl
  (Untitled) = $(DELPHI)\Bin\dcldss70.bpl
  (Untitled) = $(DELPHI)\Bin\dclclxdb70.bpl
  (Untitled) = $(DELPHI)\Bin\dclmid70.bpl
  (Untitled) = $(DELPHI)\Bin\dclsmpedit70.bpl
  (Untitled) = $(DELPHI)\Bin\applet70.bpl
  (Untitled) = $(DELPHI)\Bin\dclclxstd70.bpl
  (Untitled) = $(DELPHI)\Bin\dclemacsedit70.bpl
  (Untitled) = $(DELPHI)\Bin\dclact70.bpl
  (Untitled) = $(DELPHI)\Bin\dclmlwiz70.bpl
  (Untitled) = $(DELPHI)\Bin\dclstd70.bpl
  (Untitled) = $(DELPHI)\Bin\dcl31w70.bpl
  (Untitled) = $(DELPHI)\Bin\dcloffice2k70.bpl

已安裝的 IDE 包:
  (Untitled) = $(DELPHI)\Bin\htmlide70.bpl
  (Untitled) = $(DELPHI)\Bin\stride70.bpl
  (Untitled) = $(DELPHI)\Bin\proide70.bpl
  (Untitled) = $(DELPHI)\Bin\delphipro70.bpl
  (Untitled) = $(DELPHI)\Bin\delphide70.bpl
  (Untitled) = $(DELPHI)\Bin\designdgm70.bpl
  (Untitled) = $(DELPHI)\Bin\delphient70.bpl
  (Untitled) = $(DELPHI)\Bin\delphiclxide70.bpl
  (Untitled) = $(DELPHI)\Bin\direct70.bpl
  (Untitled) = $(DELPHI)\Bin\delphivclide70.bpl
  (Untitled) = $(DELPHI)\Bin\MsgInfo70.bpl

CnPack IDE 專家啟用狀態:
  1 = CnAlignSizeWizard
  1 = CnMessageBoxWizard
  1 = CnComponentSelector
  1 = CnTabOrderWizard
  1 = CnBookmarkWizard
  1 = CnSrcTemplate
  1 = CnEditorWizard
  1 = CnMsdnWizard
  1 = CnPas2HtmlWizard
  1 = CnReplaceWizard
  1 = CnSourceDiffWizard
  1 = CnStatWizard
  1 = CnPrefixWizard
  1 = CnCorPropWizard
  1 = CnProjectExtWizard
  1 = CnCommentCropperWizard
  1 = CnRepositoryMenuWizard
  1 = CnExplorerWizard
  1 = CnFilesSnapshotWizard
  1 = CnProcListWizard
  1 = CnUsesCleaner
  1 = CnIdeEnhanceMenuWizard
  1 = CnIdeBRWizard
  1 = CnScriptWizard
  1 = CnFastCodeWizard
  1 = CnFormEnhanceWizard
  1 = CnSrcEditorEnhance
  1 = CnPaletteEnhanceWizard
  1 = CnCpuWinEnhanceWizard
  1 = CnWinTopRoller
  1 = CnInputHelper
  1 = CnSourceHighlight
  1 = CnVerEnhanceWizard
  1 = CnDUnitWizard
  1 = CnIniFilerWizard
  1 = CnMemProfWizard

CnPack IDE 專家創建狀態:
  1 = TCnFastCodeWizard
  1 = TCnFormEnhanceWizard
  1 = TCnAlignSizeWizard
  1 = TCnMessageBoxWizard
  1 = TCnComponentSelector
  1 = TCnTabOrderWizard
  1 = TCnBookmarkWizard
  1 = TCnSrcTemplate
  1 = TCnEditorWizard
  1 = TCnMsdnWizard
  1 = TCnPas2HtmlWizard
  1 = TCnReplaceWizard
  1 = TCnSourceDiffWizard
  1 = TCnStatWizard
  1 = TCnPrefixWizard
  1 = TCnSrcEditorEnhance
  1 = TCnPaletteEnhanceWizard
  1 = TCnCorPropWizard
  1 = TCnProjectExtWizard
  1 = TCnCommentCropperWizard
  1 = TCnCpuWinEnhanceWizard
  1 = TCnRepositoryMenuWizard
  1 = TCnDUnitWizard
  1 = TCnIniFilerWizard
  1 = TCnMemProfWizard
  1 = TCnExplorerWizard
  1 = TCnFilesSnapshotWizard
  1 = TCnWinTopRoller
  1 = TCnInputHelper
  1 = TCnSourceHighlight
  1 = TCnProcListWizard
  1 = TCnVerEnhanceWizard
  1 = TCnUsesCleaner
  1 = TCnIdeEnhanceMenuWizard
  1 = TCnIdeBRWizard
  1 = TCnScriptWizard

CPU:
  # Processors: 2
  Type: Intel 586 model 4 Stepping 7
  Speed: 2790.60 MHz

鍵盤:
  Type 0: IBM enhanced (101- or 102-key) keyboard with OEM FKeys
  Layout: Chinese (Traditional) - US Keyboard (ch) in KBDUS.DLL

本地化資訊:
  Number of Digits: '2'
  Leading Zero: '0'
  List Separators: ','
  Grouping: '3;0'
  Decimal Separator: '.'
  Group Separator: ','
  Monetary Grouping: '3;0'
  Monetary Decimal Separator: '.'
  Monetary Group Separator: ','

其他人都不会出问题？

天啊，没人会出现这个？