Klasse mit Properties als Property

[Ninow]

Kurze Zwischenfrage TPropertyEditor befindet sich ja in DesignEditors.

Der Compiler meldet aber das er DesignEditors.dcu nicht finden kann warum?

[Ninow]

Okay Zwischenfrage erledigt...

[Aphton]

Definiere die einzelnen Properties als published

Delphi-Quellcode:

{..}
published
  property BeginColor;
  property EndColor;
{..}

Weiters musst du für die Instanzierung in TMyPanel selbst sorgen. Dh. im Konstruktor & Destruktor die Instanz per TKlassenname.Create erstellen und anschließend im Destruktor per Free zerstören!

Edit: Sorry, hab mich verguggt. Du müsstest die Propertys normalerweise als Public definieren und anschließend in Kurzform auch als published, soweit ich mich nicht irre... Hatte aber nicht viel am Hut mit Komponentenentwicklung & IDE

[Ninow]

@Aphton: Die Properties müssen unter published stehen, da sie ja zur Entwicklungszeit verändert werden sollen.

[WM_CLOSE]

guggt doch mal, wie es bei datasources gemacht wird. Ich glaube nicht, dass die einen Property-Editor benutzen.

[himitsu]

Zitat von Ninow:

@Aphton: Die Properties müssen unter published stehen, da sie ja zur Entwicklungszeit verändert werden sollen.

TPersistent und Nachkommen > Standardsichtbarkeit = Published
TObjekt und Nachkommen (außer TPersistent) > Standardsichtbarkeit = Public

durch das {$M+}

[sx2008]

Ausserdem muss auch die Methode TBackGround.Assign implementiert werden.
Der Objektinspektor muss unter Umständen eine Kopie des TBackGround Objekts erzeugen und benötigt daher die Assign-Methode.
Bei älteren Delphiversionen kam dann bei fehlender Implementation die Exception "Klasse Txyz kann Txyz nicht zugewiesen werden".
Möglich, dass die Exception in neueren IDEs abgefangen wird.

Delphi-Quellcode:

procedure TBackGround.Assign(Source:TPersistent);  {override}
begin
  if Source is TBackGround then
  begin
    FBackgroundAlignment := TBackGround(Source).FBackgroundAlignment;
    ...
  end
  else
    inherited;  // wichtig! darf nicht fehlen
end;

[Uwe Raabe]

Es könnte auch helfen, den Background von TComponent abzuleiten und als Subkomponente des Panels anzulegen (FBackground.SetSubComponent(true); ). Dann werden die Einstellungen nämlich automatisch auch in der DFM gespeichert. Der Objektinspektor wird dann den Background mit einem "+" darstellen, womit man an dessen Properties kommt. Da du die Deklaration von TBackgroundAlignment nicht mitlieferst, kann man dazu noch nichts sagen. Wenn es ein Aufzählungstyp ist, musst du den lediglich registrieren damit der ObjektInspektor damit klar kommt. Der Property-Editor für TBackground erübrigt sich damit.

[mjustin]

Zitat von himitsu:

TPersistent und Nachkommen > Standardsichtbarkeit = Published
TObjekt und Nachkommen (außer TPersistent) > Standardsichtbarkeit = Public
[/DELPHI]

Das kannte ich noch nicht, oder ist es ein Missverständnis? Macht der Compiler einen klassenabhängigen Unterschied bei der Sichtbarkeit?

Bisher war ich immer davon ausgegangen dass bei

Delphi-Quellcode:

TMeineKlasse = class(TIrgendwas) 
  Geheim: string;
end;

die Sichtbarkeit von "Geheim" immer published ist, unabhängig von der Vorfahrklasse.

Der Unterschied zeigt sich wenn man $M+ hinzufügt. Wenn TObject -> public gälte, würde $M+ der Klasse keine RTTI Informationen hinzufügen, bei TEgal -> published gälte, dann doch.

Mike