/
Forside
/
Teknologi
/
Udvikling
/
Delphi/Pascal
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
Delphi/Pascal
#
Navn
Point
1
oldwiking
603
2
jrossing
525
3
rpje
520
4
EXTERMINA..
500
5
gandalf
460
6
gubi
270
7
DJ_Puden
250
8
PARKENSS
230
9
technet
210
10
jdjespers..
200
Delphi - Ny TabSheet i PageControl
Fra :
Michael
Dato :
18-05-01 21:41
Er der en klog person der ved hvordan laver man en ny TabSheet i PageControl
mens programet kører?
/michael
jyde (
18-05-2001
)
Kommentar
Fra :
jyde
Dato :
18-05-01 23:24
Michael wrote:
> Er der en klog person der ved hvordan laver man en ny TabSheet i PageControl
> mens programet kører?
>
> /michael
Du skal først have en variabel af typen TTabsheet og hvis PageControl er en
TPageControl gør du sådan her for at få den nye tab ind i PageControl og gøre
den til den aktive side:
var
DenNyeTab: TTabSheet;
begin
DenNyeTab := TTabSheet.Create(FrmMain); // FrmMain er hovedformen
DenNyeTab.PageControl := PageControl;
DenNyeTab.Parent := PageControl;
PageControl.ActivePage := DenNyeTab;
// evt. flere egenskaber sættes.
end;
Det burde gøre det. Du kan evt. lave en funktion, som så returnerer den nye
TabSheetm så du kan lege videre med den efter funktionskaldet. Et eksempel på en
funktion kunne være:
function LavNyTab: TTabSheet;
begin
Result := TTabSheet.Create(FrmMain); // FrmMain er hovedformen
Result.PageControl := PageControl;
Result.Parent := PageControl;
PageControl.ActivePage := Result;
end;
Så kan du for eksempel gøre dette:
//ændrer caption på den nye tabsheet
LavNyTab.Caption := 'Fil01.txt';
På den måde har du kontrol over Tabsheet også efter funktionskaldet. Det var
bare en idé, der er god at have nogle gange. Om du bruger den å du selvfølgelig
selv bestemme.
Hilsen Brixen.
Michael (
20-05-2001
)
Kommentar
Fra :
Michael
Dato :
20-05-01 10:26
> Du skal først have en variabel af typen TTabsheet og hvis PageControl er
en
> TPageControl gør du sådan her for at få den nye tab ind i PageControl og
gøre
> den til den aktive side:
Jeg takker mange gange.
/md
Søg
Alle emner
Teknologi
Udvikling
Delphi/Pascal
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177552
Tips :
31968
Nyheder :
719565
Indlæg :
6408847
Brugere :
218887
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.