
Und popcorn nicht vergessen

da bin ich ja froh.EugenE hat geschrieben:So mit der 1.08 Version funktioniert es wieder
hmmm ok... da könnte ich mal nach schauen.... hat jetzt aber keine Top-Priorität....EugenE hat geschrieben:Aber wenn man das Fenster ganz zusammen ziehen lässt verschwindet deine Komponente^^
Code: Alles auswählen
procedure TForm1.FormCreate(Sender: TObject);
var ep:TExpandPanels;
ro:TMyRollOut;
cb:TCombobox;
begin
ep:=TExpandPanels.create(self);
ep.FixedHeight:=200;
ep.UseFixedHeight:=true;
//ep.Behaviour:=EPSinglePanel;
ep.Behaviour:=EPHotMouse;
ro:=TMyRollOut.Create(ep);
ro.Parent:=self;
ro.Caption:='Data';
ro.Button.Caption:='Edit';
cb:=TCombobox.create(ro);
cb.Items.Text:='a'+LineEnding+'b'+LineEnding;
cb.Parent:=ro;
ep.AddPanel(ro);
ro:=TMyRollOut.Create(ep);
ro.Parent:=self;
ep.AddPanel(ro);
ro:=TMyRollOut.Create(ep);
ro.Parent:=self;
ep.AddPanel(ro);
end;