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

569

    Vastaukset 3

    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. Naiset ymmärtävät ettei talous lähde nousuun

      Miten paljon järjellisempi olento nainen onkaan kuin tilastollisestikin paremmin tienaava mies. Kun kaikkialla puskuroid
      Maailman menoa
      138
      887
    2. En jaksa

      Enää pelleillä ja paljastan J naisen nimen. Se on Jonna ja hän ei koskaan, edes luultavasti ollut täällä. Silti piene
      Ikävä
      44
      657
    3. Minkälainen nainen

      Minkälainen kaipaamasi nainen on luonteeltaan? Kaikki hassun hauskat antava ja helppo on sallittuja, jos poikien on kovi
      Ikävä
      21
      588
    4. Kissa eli kivuissa useita viikkoja

      Ei vienyt lääkäriin vaikka kissa parka maukui ja moni seuraajakin (minäkin) näin että kissa on sairas.
      Tuusniemi
      110
      563
    5. Yksi asia sen esti

      Etten antanut meille mahdollisuutta
      Ikävä
      36
      532
    6. Jos meillä olisi yhteinen koti

      Niin haittaisiko sinua pitää se vähä tavaraisena? Ajattelin tänään että jos joskus asuttaisiin yhdessä ja haluaisit pal
      Ikävä
      50
      525
    7. Okei, eli olet rakastunut

      Hyvä sinä, niin minäkin.
      Ikävä
      58
      513
    8. Tuntuu pahalta meidän molempien puolesta

      Anteeksi, että olen tällainen pelkuri. En vaan usko rakkauteen enää miehen ja naisen välillä omalla kohdalla. Tiedän, et
      Ikävä
      34
      488
    9. Martinan mauton tyyli

      Voi hyvää päivää 🤣 nyt ollaan oltu Muhiksen kanssa Kultareservin avajaisissa suorat housut jalassa ja 500€ korsetti pää
      Kotimaiset julkkisjuorut
      128
      476
    10. Arvaako kukaan?

      "Humalojalla metalliromun keräyspaikalla on kulkenut pitkin kevättä ja kesää joku henkilö, joka on vienyt sieltä kymmeni
      Haapavesi
      24
      445
    Aihe