ok hab meinen code geändert:
Delphi-Quellcode:
unit test;
interface
uses
Windows, Messages, SysUtils, Classes, QControls, QStdCtrls;
type
Ttest =
class(tlabel)
private
{ Private declarations }
protected
{ Protected declarations }
public
Procedure neu;
published
{ Published declarations }
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('
Samples', [Ttest]);
end;
procedure Ttest.neu;
begin
Ttest.create(self);
end;
end.
geht aber trotzdem nicht die tutroials hab ich gelesen bringt mir aber nix! muss ich noch den parent des label bestimmen?
danke im vorraus