Avatar billede smith1 Nybegynder
20. maj 2005 - 18:00 Der er 2 kommentarer

skift ProgressBar1 postion med musen

hvordan skifter jeg min ProgressBar1.postion med musen??

ProgressBar1.Max := 10000;

procedure TForm1.ProgressBar1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin

//? 

end;
Avatar billede kroning Nybegynder
20. maj 2005 - 18:25 #1
ProgressBar1.Position:=(ProgressBar1.Max div ProgressBar1.Width) * X;
Avatar billede kroning Nybegynder
20. maj 2005 - 18:44 #2
Denne her er bedre:
ProgressBar1.Position:=round((ProgressBar1.Max / (ProgressBar1.Width-4)) * X);
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester