Einzelnen Beitrag anzeigen

Benutzerbild von MaBuSE
MaBuSE

Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.837 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Einige Fragen zu Delphi 8 (package mit .net Komponenten)

  Alt 14. Apr 2004, 11:52
Hallo,

ich habe eine kleine .net Komponente für WinForms geschrieben
(eine Test ohne Funktion)

Das ganze ist in einem Package -> dll wird erzeugt

Diese .net Komponente konnte ich auch ohne Probleme in Delphi 8 einbinden und kann Sie nun in WinForms verwenden.

Nun habe ich eine 2. Komponente in das Package gesteckt.

Diese Komponente kann ich aber nicht einbinden, da sie mir nicht bei "installierte .net Komponenten" angezeigt wird.

Was mache ich falsch?

Oder anders gefragt: Wie mache ich das?

Ich bedanke mich schon mal in Voraus für die Antworten

Falls es jemanden interessiert: Hier die Komponente - aber nicht zu genau hinschauen, ist ja nur zum test
Delphi-Quellcode:
unit UserControl;

interface

uses
  System.Drawing, System.Collections, System.ComponentModel,
  System.Windows.Forms, System.Data;

type
  TUserControl = class(System.Windows.Forms.Button)
  strict private
    Components: System.ComponentModel.Container;
  strict protected
    procedure Dispose(Disposing: Boolean); override;
  private
  public
    constructor Create;
  end;

  [assembly: RuntimeRequiredAttribute(TypeOf(TUserControl))]

implementation

uses
  System.Globalization;

{$AUTOBOX ON}

constructor TUserControl.Create;
begin
  inherited Create;
  Self.Components := System.ComponentModel.Container.Create;
  // Button rot setzen
  Self.BackColor := System.Drawing.Color.FromArgb((Byte(255)),
      (Byte(128)), (Byte(128)));
end;

procedure TUserControl.Dispose(Disposing: Boolean);
begin
  if Disposing then
  begin
    if Components <> nil then
      Components.Dispose();
  end;
  inherited Dispose(Disposing);
end;

end.
  Mit Zitat antworten Zitat