ich finde meinen fehler nicht...

[Marco Steinebach]

Hallo zusammen,
kann mal bitte jemand einen Blick auf meinen Constructor werfen und mir sagen, warum ich eine Exception EClassNotFound "Klasse TStaticText nicht gefunden" bekomme?

Delphi-Quellcode:

constructor TMSDatumCombo.create (aOwner: TComponent);
begin
  inherited create (aOwner);
  parent := TWinControl (aOwner);
  with items do
  begin
    clear;
    add ('vorgestern');
    add ('gestern');
    add ('heute');
    add ('nächster Tag');
    add ('übermorgen');
    add ('Sonntag');
    add ('Montag');
    add ('Dienstag');
    add ('Mitwoch');
    add ('Donnerstag');
    add ('Freitag');
    add ('Samstag');
  end;
  fWochentag := TStaticText.Create (aOwner);
  with fWochentag do
  begin
    parent := self.parent;
    left := self.left + 100;
    top := self.top;
    focusControl := self;
  end;
end;

fWochentag ist private als
fWochentag: TStaticText
deklariert...
Ich bin wirklich gespannt, was ich da falsch gemacht habe.
Ich häng die ganze Unit mal dran...
Bitte schaut mal drauf!!!
Viele Grüße
Marco

[haentschman]

Moin...

Mache mal eine 2. Version ohne "with". Schaue mal ob es dann geht und er durch das "with" falsch abbiegt. 8-)

[Marco Steinebach]

... nein, hilft leider nix! Schade...

[Popov]

Ein dumme Frage - die richtige Units hast du aber eingebunden?

[Marco Steinebach]

... joa, hab ich! ;-)
Compilieren läßt sich das Ganze wunderbar, es knallt, läßt man den debugger mitlaufen, auch erst, nachdem der constructor komplett durchgelaufen ist...
Ist mir echt 'n rätsel!

[Gerd01]

Also dies landet

fWochentag := TStaticText.Create (aOwner);

beim aOwner und nicht wie wohl gewollt bei Self ( TMSDatumCombo )

[Marco Steinebach]

Hallo,
ähm, ich dachte immer:
der Owner ist der,tja, besitzer, der sich darum kümmert, daß die jeweilige Komponente, wenn der Owner freigegeben wird, auch freigegeben wird. Dann müße
.....create (aOwner)
ja richtig sein, oder?
Jedenfalls soll die Instanz von TMSDatumCombo auf dem gleichen Formular angezeigt werden, wie auch fWochentag
Schaut man sich
aOwner.name
an, ist das, wie vorherzuseen, "Form1".
Und wenn fWochentag, auch auf Form1 zu sehen sein soll, sollte doch alles stimmen ... Ich versteh's echt nicht...
Hiiiilfe! ;-)

[stahli]

(Self.)Parent im Constructor zuzuweisen ist gewagt. Wann wird die Komponente denn erzeugt? Beim starten des Projektes?
Ist das Laden des Formulars abgeschlossen?

Ganz sicher bin ich nicht, aber das kommt mir komisch vor.
Nimm mal die Parent-Zuseisung aus dem Constructor raus und mache das später. (Macht man ja bei dynamisch erzeugten Panels usw. auch so.

Was Du machen kannst ist, Subcontrols.Parent = Self zuzuweisen.

[Marco Steinebach]

Hallo,
danke, das war's. Ich hab jetzt den Constructor ganz weggelassen, und stattdessen alles, was im Constructor stand, in eine (init) Prozedur gepackt, die eben nach dem Create aufgerufen wird, und, siehe da: alles läuft.
Vielen Dank ... ein Aufruf ohne eine Zweite Prozedur hätte mir zwar besser gefallen, aber...
Viele Grüße
Marco