Mehrerere Objekte zur Laufzeit erstellen

[Luki206]

Wie bekomme ich bei der ScrollBox diesen nach innen Wölb Effekt weg? Mit fällt gerade der Name nicht ein aber mit BevelInner, -Outer und -Kind bekomme ich ihn nicht weg. Alles steht auf none

[DeddyH]

Was für' n Effekt? Zeig mal einen Screenshot.

[Luki206]

Den:
Also wie mit dem Panel der Effekt und der stört mich..

[DeddyH]

BorderStyle auf bsNone hilft nicht?

[Luki206]

Doch! Danke ;)

[Luki206]

Ok nochmal ein Problem. Ich kann kein TImage erzeugen bzw. es kommt nach TImage. keine Auswahlhilfe.. hier mein Code bis jetzt:

Delphi-Quellcode:

procedure TFrmHaupt.BtnObjektClick(Sender: TObject);
var LImg: TImage;
LLbl: TLabel;
begin
  Limg := TImage.
end;

Edit: Halt, Fehler gefunden.. TObjectList wird mir als unbekannt angezeigt, muss ich noch was zu uses hinzufügen?

[DeddyH]

Contnrs

[Luki206]

Ok danke ;)

[Perlsau]

Zitat:

Zitat von Luki206 (Beitrag 1249894)

Ok nochmal ein Problem. Ich kann kein TImage erzeugen bzw. es kommt nach TImage. keine Auswahlhilfe.. hier mein Code bis jetzt:

Delphi-Quellcode:

procedure TFrmHaupt.BtnObjektClick(Sender: TObject);
var LImg: TImage;
LLbl: TLabel;
begin
  Limg := TImage.
end;

Edit: Halt, Fehler gefunden.. TObjectList wird mir als unbekannt angezeigt, muss ich noch was zu uses hinzufügen?

Du erzeugst hier ein TImage und weist es der lokalen Variablen LImg zu. Diese steht aber nach Beenden der Procedure nicht mehr zur Verfügung. Wieso machst du's nicht, wie ich dir geraten hatte? Entwickle dir eine Klasse, mit der du die Objekte erzeugst. Die Zeiger auf die erzeugten Objekte verwaltest du dann in einer Objektliste.

Dein hier gezeigter Code hat überhaupt nichts mit einer Objektliste zu tun ?!?

[DeddyH]

Nur komisch, dass ich es hier auch so mache.