用CreateWindow来Create：TButton对象错误。。。(5)

在FORM上创建一个BUTTON1,然后：procedure TForm1.Button1Click(Sender: TObject);var wp : TWNDCLASSEX ;begin wp.cbSize := sizeof(wp2); if ( GetClassInfoEx(HInstance,'TButton',wp) ) then CreateWindow('TButton','AButton',WS_BORDER or WS_VISIBLE or WS_CHILD,100,100,80,25, Form1.Handle,0,HInstance,0);end;如果将'TButton'改成windows标准的Button就没有错误，但TButton应该已经注册了，还是不能直接用CreateWindow创建？请大家帮忙看看。

用Application.CreateForm试试？

主要是要找到直接用CreateWindow创建TButton等类的方法。用TButton对象自己的方法或Application等应该是没问题的。不知有人做过类似的工作没有。....

CreateWindow是创建一个窗体，其中的第一个参数要是窗体数据结构，tbutton还像没有该数据结构

貌似 VCL 对 TButton 进行了子类化，不能直接用 CreateWindow...

TButton -> CButton