THideBox -> Eigene Kompo

[freak4fun]

Wenn bei mir die Hidebox zur Leufzeit erstellt wird gehts (Wenn man nicht wartet bis sie aus/eingefahren ist geht nix mehr). Wenn sie schon auf der Form lag, fährt die HideBox ein und nicht wieder aus. Aber der Pfeil ändert sich. :gruebel:

Ich hab jetzt Feierabend, hab mir die Unit aber nach Hause geschickt. ;)

Die IDee und die Umsetzung, finde ich allerdings super. :thumb:

MfG
freak

[Der_Unwissende]

Hi,
schau dir mal deine Realwidth an, die sieht ein wenig falsch initialisiert aus (= 0 beim Einfahren).

Gruß Der Unwissende

[cherry]

Danke euch allen...
Ich mach jetzt auf Feierabend...

Ich meld mich dann morgen wieder...
Gruss

[freak4fun]

Zitat:

Zitat von Der_Unwissende

Hi,
schau dir mal deine Realwidth an, die sieht ein wenig falsch initialisiert aus (= 0 beim Einfahren).

Was muss ich ändern, damit es geht?

MfG
freak

[NormanNG]

Hi,

Zitat:

Was muss ich ändern, damit es geht?

Nun, im Konstruktor wird Width:= gesetzt, aber für das Ausklappen FRealwidth abgefragt. Setz' einfach im Konstruktur die Variable FRealwidth:=Width (nachdem Width gesetzt wurde :wink: )

[freak4fun]

Zitat:

Zitat von NormanNG

Hi,

Zitat:

Was muss ich ändern, damit es geht?

Nun, im Konstruktor wird Width:= gesetzt, aber für das Ausklappen FRealwidth abgefragt. Setz' einfach im Konstruktur die Variable FRealwidth:=Width (nachdem Width gesetzt wurde :wink: )

Ok, das geht. Wenn ich allerdings zur Designzeit die Länge ändere und dann die HideBox ein und ausfahre fährt sie nur bis 75Pixel aus. :(

MfG
freak

[Der_Unwissende]

Hi,
hab gerade deinen QC nicht zur Hand, deshalb kurz die einfache Beschreibung.
Du definierst dir die Width (ausgeklappt) als Property und setzt die über ein Methode

Delphi-Quellcode:

type
  TDeineKlasse = class(TObject)
    private 
      FWidth : Integer;
      FRealWidth : Integer;
    protected 
      procedure setWidth(const Width : Integer);
    public
      property Width : Integer read FWidth write setWidth;
  end;

Und in dem Setter setzt du dann einfach Realwidth und Width.

Gruß Der Unwissende

[cherry]

So.. nun funktioniert das Teil!!!
Wird evt. noch einmal weiterentwickelt, im Moment kann ich
die Komponente so verwenden und es ist gut.

Hier noch des Zeuchs...

[freak4fun]

Danke! :hello:

MfG
freak