Moin,
in meiner Anwendung wird dynamisch ein Frame erzeugt.
Der Kind-Frame enthält u.a. eine TComboBox:

markieren

Delphi-Quellcode:

type
  TblaFrame = class(TBasicFrame)
    cb: TComboBox;
    ...

Der Frame wirft eine Exception, aber nur, wenn in den Items ein String (oder nur ein einzelnes Zeichen) ist:

markieren

Delphi-Quellcode:

private
 ProtokollFrame: TBasicFrame;

ProtokollFrame := TblaFrame .create(Self);

Typ= EReadError - Error= Fehler beim Lesen von cb.Items.Strings: Element 'blaFrame' hat kein übergeordnetes Fenster

Ist Items leer, läuft die Kiste an. Wenn ich allerdings Items hinzufüge gibt es wieder eine Exception:

markieren

Delphi-Quellcode:

cb.Items.add('1');
oder
cb.Items.Strings[0] := '1';
oder auch bei
cb.Items.Clear;

Was meint die Meldung: "Element 'blaFrame' hat kein übergeordnetes Fenster"
Alle anderen Frames, die so aufgerufen werden arbeiten korrekt. Die haben auch keine ComboBox....


Hat jemand eine Idee dazu?

zusammenfalten · markieren

Delphi-Quellcode:

ProtokollFrame.Parent := Panel1; // Das, worauf ProtokollFrame erscheinen soll.
// oder
ProtokollFrame.Parent := Form1;
// oder
ProtokollFrame.Parent := Self; // Janachdem, was hier Self ist und ob man ein Frame darauf platzieren kann / darf.
// eventuell noch:
ProtokollFrame.Align := alClient; // alTop ...
// oder
ProtokollFrame.Top := 0; // Oder welche Koordinaten, Höhe, Breite ... sonst gewünscht sind.
ProtokollFrame.Left := 8;
ProtokollFrame.Height := 15;
ProtokollFrame.Width := 42;

Danke für den Tipp !

Was ich unterschlagen hatte, waren die folgenden Zeilen nach create:

markieren

Delphi-Quellcode:

ProtokollFrame := TblaFrame.create(Self);
...
ProtokollFrame.Load; //irgend eine Fkt in blaFrame in der die ComboBox angesprochen wird.
ProtokollFrame.Parent := PanelStandard; //TPanel

Da create(Self) vor ..Parent:=PanelStandard kommt, wäre es eine Erklärung für "Element 'blaFrame' hat kein übergeordnetes Fenster"
da wegen der ComboBox sowieso eine Exception passiert.

Der Ursprung der Exception ist jedoch die ComboBox mit einem Item, und hier passiert es schon bei create.
Wie der Debugger im CPU-Fenster zeigt, springt er hier auf 004CB08C

markieren

Code:

004CB08C 55               push ebp
004CB08D E81AFDFFFF      call HandleException
004CB092 59               pop ecx
004CB093 E89CE9F3FF      call @DoneExcept
004CB098 33C0             xor eax,eax
004CB09A 5A              pop edx
004CB09B 59               pop ecx
004CB09C 59               pop ecx
004CB09D 648910           mov fs:[eax],edx

was jedoch kein gültiger Maschinenbefehl zu sein scheint:004CB087 008CB04C0055E8:

markieren

Code:

004CB06C E893E7FFFF      call TReader.PropertyError
004CB071 33C0             xor eax,eax
004CB073 5A              pop edx
004CB074 59               pop ecx
004CB075 59               pop ecx
004CB076 648910           mov fs:[eax],edx
004CB079 EB1D            jmp $004cb098
004CB07B E9C4E5F3FF      jmp @HandleOnException
004CB080 0100             add [eax],eax
004CB082 0000             add [eax],al
004CB084 C0DD41           rcr ch,$41
004CB087 008CB04C0055E8   add [eax+esi*4-$17aaffb4],cl
004CB08E 1AFD            sbb bh,ch
004CB090 FFFF            db $ff $ff
004CB092 59               pop ecx
004CB093 E89CE9F3FF      call @DoneExcept
004CB098 33C0             xor eax,eax

Übrigens, gibt es keine Probleme, wenn alternativ statt der ComboBox eine RadioGroup verwendet wird.

markieren

Delphi-Quellcode:

ProtokollFrame := TblaFrame.create(Self);
...
ProtokollFrame.Parent := PanelStandard; //TPanel
ProtokollFrame.Load; //irgend eine Fkt in blaFrame in der die ComboBox angesprochen wird.

Da die Combobox wohl 'nen Parent braucht (und zwar vor ihrer erstmaligen Benutzung / Befüllung ..., wäre es eventuell sinnvoll ihr vor der erstmaligen Benutzung / Befüllung ... einen Parent zuzuweisen.

Was wir nicht wissen: Was bitte ist denn Self?

Ein TForm, ein TPanel, 'ne Bratkartoffel , ...? Self muss halt etwas sein, auf das man 'ne ComboBox legen darf. In der IDE, im Formulardesigner, kann man 'ne ComboBox ja auch nicht zwingend überall drauflegen, wobei die IDE "schlau genug ist", die entsprechenden Komponenten erst garnicht in der Komponentenauswahl anzubieten.

Sollte Self z. B. ein Datenmodul sein, so wird das scheitern, bei 'nem WebModul ebenfalls.

markieren

Delphi-Quellcode:

ProtokollFrame := TblaFrame.create(PanelStandard);
ProtokollFrame.Parent := PanelStandard; //TPanel
...
ProtokollFrame.Load; //irgend eine Fkt in blaFrame in der die ComboBox angesprochen wird.