Zum Inhalt springen
View in the app

A better way to browse. Learn more.

Fachinformatiker.de

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Auf die Maus bei einem TrackBar reagieren

Empfohlene Antworten

Veröffentlicht

Hallo,

ich möchte auf das Loslassen der Maustaste bei der verwendung eines TTrackBar reagieren.

wenn ich mit

void __fastcall TForm1::OnMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)

arbeite, springt mein Prog nur dann in den Code, wenn ich außerhalb des TrackBars mit der Maus klicke. Es soll aber in den Code Gesprungen werden, wenn die Maus sich Über dem TrackBar befindet.

Ich Hoffe, Ihr könnt mir helfen.

Gruß

Snypoo

Hmmmm...ich arbeite zwar mit dem VC, aber es sollte doch auch bei der VCL möglich sein benutzerdefinierte Klassenableitungen zu erstellen.

Du beziehst Dich ja bei MouseUp auf Deine Form und nicht auf die TrackBar-Instanz.

void __fastcall MyTTrackBar ::OnMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)

So ähnlich würde es bei VC dann heissen *ggg*

Schau mal unter abgeleitete Klassen und die Hierarchie der VCL.

Hallo gugelhupf,

wie muß denn die MyTTrackBar aufgebaut sein, damit ich das so anwenden kann wie Du das beschrieben hast???

Original geschrieben von Snypoo

Hallo gugelhupf,

wie muß denn die MyTTrackBar aufgebaut sein, damit ich das so anwenden kann wie Du das beschrieben hast???

Also unter der MFC wäre so ein Control genauso mit allen Standardfunktionen und Membern zusammengesetzt wie sonst auch. Wie gesagt ich kenn die VCL nur vom Hören-Sagen. Gibt es denn beim Borland kein Hierarchie-Chart ?

Hast mal nachgeschaut wie man eine Control-Klassen von den Standardklassen ableitet ?

Hallo,

ich habe nun eine Lösung für mein Problem gefunden, die Wollte ich Posten, damit auch andere davon Profitieren können.

// HEADER

private:

Controls::TWndMethod OldTrackBarProc;

protected:

void __fastcall NewTrackBarProc(TMessage&);

// CPP-Datei

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

OldTrackBarProc = TrackBar1->WindowProc;

TrackBar1->WindowProc = NewTrackBarProc;

}

//-----------------------------------------------------------------------------

void __fastcall TForm1::NewTrackBarProc(TMessage& Msg)

{

switch(Msg.Msg)

{

case WM_LBUTTONDOWN:

// Deine Behandlung

break;

case WM_LBUTTONUP:

// Deine Behandlung

break;

// Evtl. andere Cases

}

OldTrackBarProc(Msg);

}

Gruß

Snypoo

Archiv

Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.