小编azr*_*l11的帖子

我下载了AlphaSkins Lite的新测试版(7.44).我卸载了我遇到问题的旧版本...我打开了"acntD7_R.dpk"并编译了.然后我打开"acntD7.dpk"并收到编译错误:

[Fatal Error] acntD7.dpk(47): Unit sInternalSkins was compiled with a different version  of sButton.TsButton 

我试图手动擦除BPL文件并再次尝试,但再次收到相同的错误消息.

请问我做错了什么？

我使用以下代码在过程中创建备忘录:

  Global_MemoIni := TMemo.Create(Conf);
  Global_MemoIni.Parent := Conf;
  Global_MemoIni.Visible := False;
  Global_MemoIni.Align := alClient;
  Global_MemoIni.WordWrap := False;

当我再次调用该过程时,它再次创建global_memoini.
我如何知道组件是否已创建,因此我不需要再次调用它？

更新:我可以使用Global_MemoIni.Free上面的创建代码,以便下次创建Global_memoini一次...但我想知道这是否创建...

谢谢

我有这种类型

type
 TMain = class(TForm)

 panel1: Tpanel;
 panel2: Tpanel;
 panel3: Tpanel;
 panel4: Tpanel;
 panel5: Tpanel;
 panel6: Tpanel;
 panel7: Tpanel;
 panel8: Tpanel;
 ......
 panel45: Tpanel;

 label1: TLabel;
 label2: TLabel;
 label3: TLabel;
 label4: TLabel;
 label5: TLabel;
 label6: TLabel;
 label7: TLabel;
 ...........
 label109: TLabel;

如何在一行中调用这些组件...在类型内？

谢谢 ...

更新....

我得到并接受了它的基础,当我拥有所有这些组件并且从主窗体中执行类似button1.click的操作时,它工作得很好...

但我用来制作单位的动作......所以

当我点击一个按钮我很棒的程序DoMaths(发件人:TObject);

procedure Tform1.DoMaths(Sender: TObject);
  begin
    if TButton1(Sender).hint := 'Make the standard Package' then
      do_Maths_standard_package;
  end;

do_Maths_standard_package位于ComplexMaths单元中.

是do_Maths_standard_package表单单元ComplexMaths它调用Form1的一些组件...就像Form1.label1等...

因此,当我调用RegisterClass(TLabel)并从类型中删除Tlabel时,它会给出一个错误,它无法找到Label1 ...

请有人帮助我,所以不要从一开始就做洞程序......

再次感谢你...

我在这里问一个问题如何在OmniXML中创建简单的XML,我得到了Gavin Watkinson的答案.

我创建单位:

interface

uses
 OmniXML, OmniXMLProperties;

type
 TRow = class(TGpXMLData)
 public
  constructor Create(Node: IXMLNode); override;

  property Id: integer index 0 read GetXMLPropInt write SetXMLPropInt;
  property Name: WideString index 1 read GetXMLPropWide write SetXMLPropWide;
  property Surname: WideString index 2 read GetXMLPropWide write SetXMLPropWide;
  property Time: WideString index 3 read GetXMLPropWide write SetXMLPropWide;
  property Old: WideString index 4 read GetXMLPropWide write SetXMLPropWide;
  property Subject: WideString index 5 read GetXMLPropWide write SetXMLPropWide;
end;

TRows = class(TGpXMLList)
protected
  function GetRow(Value: integer): …

我创建了一个名为glyfs.rc的png资源文件
GLYF_CONFEDITOR RCDATA confeditor.png
GLYF_EXTRAFE RCDATA extrafe.png
.......

我在我的项目中添加它.
放一个TsBitBtn(它是一个alphaskin组件类)并尝试sbitbtn1.Glyph.LoadFromResourceName(HInstance,'GLYF_CONFEDITOR');
在运行时从资源文件加载 glyf我得到名称为'GLYF_CONFEDITOR'的错误资源文件未找到.

我究竟做错了什么？

我用于png的3方工具是从这里下载
的pngdelphi但是sbitbtn加载原生的png文件...