Accueil > Forum > > > > associer un trackbar et un label
associer un trackbar et un label
samedi 5 mai 2007 à 14:44:27 |
associer un trackbar et un label

bdp8
|
Bonjour, j'ai un probléme concernant le Trackbar , voila je veux faire un bandeau déroulant avec un Timer et un trackbar qui augmente la vitesse de défilement. Bon j'arrive a faire le défilement, cependant Ce que j'ai c'est que lorsque je change le trackbar ( onchange associé
au Timer) la vitesse augmente mais juste si je reste appuyer sur le
trackbar.
Ensuite la vitesse diminue lorsque j'arrête d'appuyé sur le trackbar.
Est ce que qqun aurait une idée là-dessus ? Aidez les jeunes developpers......
|
|
samedi 5 mai 2007 à 16:11:06 |
Re : asocier un trackbar et un label

florenth
|
Salut,
Tu pourrais nous passer ce que tu as mis dans le OInChange de ton Trackbar pour qu'on puisse exterminer ce bug ? merci...
++
|
|
samedi 5 mai 2007 à 16:30:02 |
Re : asocier un trackbar et un label

bdp8
|
unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Spin, ComCtrls;
type TForm1 = class(TForm) Label1: TLabel; Timer1: TTimer; Panel1: TPanel; Button3: TButton; TrackBar1: TTrackBar; procedure TrackBar1Change(Sender: TObject); procedure Button3Click(Sender: TObject); procedure Timer1Timer(Sender: TObject); procedure Button1Click(Sender: TObject); private { Déclarations privées } public { Déclarations publiques } end;
var Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Timer1Timer(Sender: TObject); begin
label1.Left := label1.Left-1; end;
procedure TForm1.Button3Click(Sender: TObject); begin Timer1.Enabled := not Timer1.Enabled; label1.Left:=(panel1.Width);
end;
procedure TForm1.TrackBar1Change(Sender: TObject); begin label1.Left := label1.Left-1; end;
end.
Voila.
|
|
samedi 5 mai 2007 à 16:32:45 |
Re : asocier un trackbar et un label

bdp8
|
j'aurai voulu mettre aussi qqch de la forme timer1.interval := 1 Lorsque je change la position du trackbar timer1.interval diminu !
|
|
samedi 5 mai 2007 à 17:21:05 |
Re : asocier un trackbar et un label

florenth
|
Et bien tu n'as qu'a mettre:
Timer1.Interval := TrackBar1.Position ^^
et c'est tout bon !
|
|
samedi 5 mai 2007 à 17:24:50 |
Re : asocier un trackbar et un label

florenth
|
Eh, mais j'y pense, avec ce que tu as mis dans le OnTimer, le label ne va jamais réapparaitre !
Il faudrait plutot faire :
Voila ton unité corrigée :
procedure TForm1.Timer1Timer(Sender: TObject); begin label1.Left := label1.Left - 1; if label1.Left < label1.width then label1.Left := panel1.Width; end;
procedure TForm1.Button3Click(Sender: TObject); begin Timer1.Enabled := not Timer1.Enabled; label1.Left:=panel1.Width; end;
procedure TForm1.TrackBar1Change(Sender: TObject); begin Timer1.Interval := TrackBar1.Position; end;
Bonne chance pour la suite... ++ Flo
|
|
samedi 5 mai 2007 à 17:26:10 |
Re : asocier un trackbar et un label

florenth
|
Réponse acceptée !
Ahh zut, problème d'édition avec cette FreeTextBox, je croyais pourtant l'avoir mis mais il faut mettre un "-" (signe moins) ici : "if label1.Left < -label1.width then"
|
|
samedi 5 mai 2007 à 17:29:27 |
Re : asocier un trackbar et un label

bdp8
|
OK merci beaucoup, la quand je met le curseur du trackbar au minimum le text s'arréte. et puis la vitesse ne varie pas tros ! Est ce que c'est normal ?
|
|
samedi 5 mai 2007 à 18:36:01 |
Re : asocier un trackbar et un label

florenth
|
Oui c'est normal que le texte s'arrete et que la vitesse ne bouge pas trop. Il faut que tu mettes dans l'inspecteur d'objet (pour ton trackbar): - Max := 1000; - Min := 50;
et là, ça devrait allez beaucoup mieux.
Oublie pas de valder les réponses qui te conviennent.
++ Flo
|
|
dimanche 6 mai 2007 à 00:27:58 |
Re : associer un trackbar et un label

bdp8
|
voila le lien vers mon programme. http://rap041.free.fr/BD%20biss.rar Bah Il ya une différence entre quand j'appuye sur le track bar sa va moins vite, mais sinon sur toutes position du trackbar c'est la meme chose !
|
|
Cette discussion est classée dans : timer, label, associer, vitesse, trackbar
Répondre à ce message
Sujets en rapport avec ce message
Comment Voire La Vitesse (Ko/s) Avec Le IdHTTP Dans Un Label ? [ par BenXbox ]
Comment Voire La Vitesse (Ko/s) Avec Le IdHTTP Dans Un Label ?Merci D'Avance.====> BenXbox
representation de la vitesse [ par mister_eos ]
salu je dois faire un jeu de kart en delphi et je n arrive po du tout a voir comment representé la vitesseet le mouvement du vehicule.merci de me donn
trackbar et volume [ par defconsuny ]
salut,super le trackbar pour ajuster un volume sonore d'un mediaplayer mais pour la configuartion c'est autre chose. comment mettre le mediaplayer et
Problème avec les TLabel [ par pelly1308 ]
Bonjour tout le monde.J'ai un problème avec les labels:Je veux un label de taille fixe, j'ai donc mis l'option AutoSize à false, et dans mon programme
Label.caption multilignes??? [ par jmp77 ]
Bonjour,Est ce que quelqu'un saurait comment activer la propriété caption d'un tlabel en mode conception pour que l'on puisse saisir du texte sur plus
Besoin d'aide avec les labels [ par Programmeur1987 ]
Je veut, dison que j'ai x label dans ma form et un text box et un button, bon je veut que j'aye a écrire dans mon edit le nom d'un label et quand je c
Vitesse de la carte reseau [ par manu00 ]
Bonjour,Une petite question...savez vous comment faire en delphi pour connaitre la vitesse (et pkoi pas les references) d'une carte reseau en local...
Associer une icone mon projet [ par klorell ]
Bonjour G un probleme avec mon projet developper en delphi coder en opengl sans forme et j'aimerais changer licone de mon executable ki est pour le mo
mesure de vitesse par delphi [ par Zadigon ]
bonjour, je dispose de deux capteurs, qu m'envoient des impulsons lors du passage d'un objet, je veut utilser ces deux mpulsions pour calculer la
sauter une ligne dans un label en fin de mot tout les 60 caractères [ par Animax77 ]
J'ai créé une base de données access dans laquelle j'ai un mémo, qui peut avoir un texte très long.Je récupère ce texte dan un dbmemo mais je l'affich
Livres en rapport
|
Derniers Blogs
UNE JOLIE-HORLOGE ET PAS QU'UN PEU !UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante
Pour les possesseurs d'iPhone, ça y est Bijin Tokei - qui se traduit littéralement en Français par " Jolie Horloge " - est arrivé et GRATUITEMENT s'il vous plaît ! Après la version Tokyo, Hokkaido, night club, racing, Gal, "pour les mademoiselles'", . voi...
Cliquez pour lire la suite de l'article par neodante TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICESTECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice
Animé par: Gaetan Bouveret et Julien Chomarat Business Connectivity Services (BCS) est dans SharePoint 2010 la version 2 de Business Data Catalog (BDC dans SharePoint 2007). Il s'agit de la solution permettant de visualiser des données provenan...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice [DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE[DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE par orion
Comme de nombreux geek, je suis un grand amateur de série TV et je rate régulièrement des épisodes de mes séries préférés. Une solution s'offre à vous avec ce merveilleux site : Tv Gorge - www.tvgorge.com Moteur de recherche à l'appui, vous pouvez ...
Cliquez pour lire la suite de l'article par orion TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010 par ROMELARD Fabrice
Animé par: Vincent Bellet et Baptiste Giraudier La BI dans SharePoint 2010, Les nouveaux services d'application dans SP2010 et SQL Server Reporting services 2008 R2. La BI dans SharePoint est généralisée pour tous afin de permettre à tous les coll...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Logiciels
DB-MAIN (9.1.0)DB-MAIN (9.1.0)DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal... Cliquez pour télécharger DB-MAIN Xilisoft DPG Convertisseur (5.1.37.0120)XILISOFT DPG CONVERTISSEUR (5.1.37.0120)Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé... Cliquez pour télécharger Xilisoft DPG Convertisseur GraphicsGale (2.01.01)GRAPHICSGALE (2.01.01)GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ... Cliquez pour télécharger GraphicsGale Architecte 3D (Platinum 2010)ARCHITECTE 3D (PLATINUM 2010)Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é... Cliquez pour télécharger Architecte 3D TeamViewer 5 (TeamViewer 5)TEAMVIEWER 5 (TEAMVIEWER 5)Dépanner un ami,expliquer une manipulation devient un jeu d'enfant.
Prise en main d'un autre ord... Cliquez pour télécharger TeamViewer 5
|