TrackBar

nortti

mitenkä vaihdetaan TrackBar:ssa Max ja Min arvojen paikkaa silloin kun TrackBar on pystyasennossa... siis esmes jos Max= 65535 niin se pitäisi olla ylhäällä ja Min alhaalla.

3

567

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • DoD

      . ratkaisu on käyttää negatiivisiä arvoja ja kääntää ne ohjelmassa, esim.


      unit Unit1;

      interface

      uses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls, ComCtrls;

      type
      TForm1 = class(TForm)
      TrackBar1: TTrackBar;
      Label1: TLabel;
      procedure TrackBar1Change(Sender: TObject);
      private
      { Private declarations }
      public
      { Public declarations }
      end;

      var
      Form1: TForm1;

      implementation

      {$R *.dfm}

      procedure TForm1.TrackBar1Change(Sender: TObject);
      var positio:integer;
      begin
      positio:=not TrackBar1.Position 1;
      //positio sisältää käsiteltävän arvon
      Label1.Caption:=inttostr(positio);
      end;

      end.

      • DoD

        .. TrackBarin arvot ovat:

        Max = 0
        Min = -65535


      • Nortti
        DoD kirjoitti:

        .. TrackBarin arvot ovat:

        Max = 0
        Min = -65535

        kiitoksia, kokeilin esimerkin mukaan ja toimii ok.


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Ruotsissa uusi vakava ongelma: Vanhusten seksuaalinen hyväksikäyttö

      palvelutaloissa ja kotihoidossa. Tämäkin on ihan puhtaasti väärän maahanmuuton vaikutusta, sillä tekijät ovat kaikki keh
      Maailman menoa
      72
      1892
    2. Työeläkkeiden maksaminen lopetettava ASAP.

      "Vanhimmat sukupolvet ovat saaneet vastinetta eläke­maksuilleen monin­kertaisesti nykyisiin ja tuleviin sukupolviin verr
      Maailman menoa
      97
      1643
    3. Millä kolmella sanalla

      Kuvailisit kaivattuasi?
      Ikävä
      141
      1141
    4. Kyllä mä oon valmis jos sä oot

      Vaikka ja mihin... mutta paikka on väärä.
      Ikävä
      59
      668
    5. Miltä se tuntuu olla

      vihattu ja kukaan ei puolusta?
      Ikävä
      198
      642
    6. Järkytys uutisten ystäville - Huomenta Suomen kesään iso muutos

      Huomenta Suomi on monen suomalaisen vakio-ohjelma. Suorana nähtävä Huomenta Suomi seuraa päivän tärkeimpiä uutisia, pol
      Maailman menoa
      6
      616
    7. Trumpille jälleen voitto

      Trump ensin tuhosi Iranin ydinohjusprojektin, jotta ko. terroristivaltio ei voisi aiheuttaa ydinsotaa. Ja nyt Trump pako
      Maailman menoa
      184
      531
    8. Aurinkoni...

      On ikävä sua ❤️
      Ikävä
      46
      488
    9. Haluan teidät molemmat elämääni

      Toista rakastan todella syvästi, ja toinen on kuin paras ystävä minulle. En voi luopua kummastakaan... </3
      Ikävä
      37
      442
    10. Mut ku se mies on niin vanha!!

      Jäisin leskeksi!🤣
      Ikävä
      44
      438
    Aihe