Splitterposition wieder herstellen

wulfskin · Verfasst: Mi 07.12.05 22:22

Hallo,

wieder ein kleines Problem das mir mein Nerv kostet.
Beispiel: Ich habe zwei Panels. Das Linke kann den ganzen Platz einnehmen (alClient) und das rechte ist logischerweise rechts (alRight) ausgerichtet. Ein Splitter (alRight) trennt die beiden. Nun kann es sein, dass ich das rechte Panel ausblende. Leider ist danach der Splitter nicht mehr an der richtigen Position, also zwischen den beiden.
Wie kann ich dieses Problem beheben?

Gruß Hape!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.

Lannes · Verfasst: Do 08.12.05 10:45

Hallo,

teste das mal:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

procedure TForm1.VerbergenClick(Sender: TObject);
begin
//Panel_Rechts.Tag := Panel_Rechts.Width; //alternativ
Panel_Rechts.Width:= 0;
Splitter1.Width := 0;
end;

procedure TForm1.AnzeigenClick(Sender: TObject);
begin
//Panel_Rechts.Width:= Panel_Rechts.Tag; //alternativ
Panel_Rechts.Width:= 100;                //alternativ
Splitter1.Width := 3;
end;

_________________
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )

wulfskin · Verfasst: Do 08.12.05 16:17

Vielen Dank,

funktioniert perfekt. Typisch, auf sowas komm ich wieder nicht

!

Gruß Hape!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme