25. april 2001 - 22:34Der er
4 kommentarer og 1 løsning
Online placering af komponet på PageControl
Opgave: Der skal online placeres et komponent på PageContol1, TabSheet1, når der trykkes på Button1 som er placeret på TabSheet1
Har prøvet med følgende kode
Var KomponetenSomSkalAnbringes : TKomponent
procedure TForm1.Button1Click(Sender: TObject); begin KomponentenSomSkalAnbringes := TKomponent.Create(Form1 (????Hvad skal stå her)) KomponentenSomSkalAnbringes.Parent := Self; KomponentenSomSkalAnbringes.BringToFront; end;
Ved ovenstående kode kommer der ingen ting, eller måske ligger komponenten bag PageControl/TabSheetet ? BringToFront er prøvet som det ses men uden effekt
Næe nu har jeg selv fundet ud af det Forældrene skal ikke sættes til sig selv men KomponentenSomSkalAnbringes.Parent := TabSheet1;
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.