www.elektronik.si Seznam forumov www.elektronik.si
Forum o elektrotehniki in računalništvu
 
 PomočPomoč  IščiIšči  Seznam članovSeznam članov  SkupineSkupine  StatisticsStatistika  AlbumAlbum  DatotekeFilemanager DokumentacijaDocDB LinksPovezave   Registriraj seRegistriraj se 
  PravilaPravila  LinksBolha  PriponkePriponke  KoledarKoledar  ZapiskiZapiski Tvoj profilTvoj profil Prijava za pregled zasebnih sporočilPrijava za pregled zasebnih sporočil PrijavaPrijava 

DELPHI + TeeChart + vertical guideline (slider,pointer...)

 
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema
Poglej prejšnjo temo :: Poglej naslednjo temo  
Avtor Sporočilo
saso
Član
Član



Pridružen-a: Čet 18 Mar 2004 10:16
Prispevkov: 510
Aktiv.: 2.15
Kraj: Trbovlje

PrispevekObjavljeno: Pon Jan 14, 2013 5:13 pm    Naslov sporočila:  DELPHI + TeeChart + vertical guideline (slider,pointer...) Odgovori s citatom

Pozdravljeni,

V DELPHI-ju imam narejeno neko aplikacijo , ki izrisuje graf z 6 series, uporabljena je komponenta TeeChart.
Rad bi naredil nek vertikalni guideline, slider ali pointer, v obliki vertikalne črte, ki bi jo lahko premikal čez graf in bi se vrednisti, skozi katere gre ta guideline vpisovale v neke labele ali edit polja.
Ima mogoče kdo kakšno idejo kako to naredit?
Mogoče pride v poštev tudi menjava Teechart komponente, če kdo pozna kakšno drugo, ki to že omogoča.

_________________
LP
Sašo
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
urosg
Član
Član



Pridružen-a: Pet 27 Apr 2007 14:30
Prispevkov: 565
Aktiv.: 2.56

PrispevekObjavljeno: Tor Jan 15, 2013 10:50 am    Naslov sporočila:   Odgovori s citatom

Tako na hitro bolj "dirty" pristop: uporabiš OnMouseMove, OnMouseDown, OnMouseUp da zaznaš kje je kurzor in če bi nekdo rad premikal nekaj (klik na guideline) in ročno narišeš gor guideline (najlažje s pomočjo TTeeGDIPlus) itd.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
saso
Član
Član



Pridružen-a: Čet 18 Mar 2004 10:16
Prispevkov: 510
Aktiv.: 2.15
Kraj: Trbovlje

PrispevekObjavljeno: Tor Jan 15, 2013 12:16 pm    Naslov sporočila:   Odgovori s citatom

Živjo,

Hvala za namig,
tole sem na hitro probal in za narisat guideline in ga nato premikat po grafu bo v redu.
Kaj pa kako sedaj iz tega dobit podatke iz series?

_________________
LP
Sašo
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
urosg
Član
Član



Pridružen-a: Pet 27 Apr 2007 14:30
Prispevkov: 565
Aktiv.: 2.56

PrispevekObjavljeno: Tor Jan 15, 2013 12:50 pm    Naslov sporočila:   Odgovori s citatom

Mislim da bi ti funkcija XScreenToValue or YScreenToValue pomagala.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
saso
Član
Član



Pridružen-a: Čet 18 Mar 2004 10:16
Prispevkov: 510
Aktiv.: 2.15
Kraj: Trbovlje

PrispevekObjavljeno: Tor Jan 15, 2013 9:19 pm    Naslov sporočila:   Odgovori s citatom

Živjo,

nekaj sem se namučil s temle, ni mi še čisto uspelo tako da gremo jutri dalje.
Se pravi dobim vrednosti y vseh seriesov v točki na x osi, ampak zaenkrat še samo takrat, ko kliknem na ketero od series, kar pa ni še to kot želim.

Sedajle pa gledat rokomet, pol pa spat, jutri pa naprej.

_________________
LP
Sašo
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
urosg
Član
Član



Pridružen-a: Pet 27 Apr 2007 14:30
Prispevkov: 565
Aktiv.: 2.56

PrispevekObjavljeno: Tor Jan 15, 2013 9:36 pm    Naslov sporočila:   Odgovori s citatom

Pomoje bi bilo najbolje da greš čez Series in za vsako iteracijo pokličeš to funkcijo.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
saso
Član
Član



Pridružen-a: Čet 18 Mar 2004 10:16
Prispevkov: 510
Aktiv.: 2.15
Kraj: Trbovlje

PrispevekObjavljeno: Tor Jan 15, 2013 9:55 pm    Naslov sporočila:   Odgovori s citatom

Kako si tole mislil "da greš čez Series"?
_________________
LP
Sašo
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
urosg
Član
Član



Pridružen-a: Pet 27 Apr 2007 14:30
Prispevkov: 565
Aktiv.: 2.56

PrispevekObjavljeno: Tor Jan 15, 2013 10:12 pm    Naslov sporočila:   Odgovori s citatom

na hitro

Koda:

var
  i: integer;
begin
  for i := 0 to Chart1.SeriesCount-1 do
    Chart1.Series[i].XScreenToValue(X);
end;
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Pokaži sporočila:   
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Stran 1 od 1

 
Pojdi na:  
Ne, ne moreš dodajati novih tem v tem forumu
Ne, ne moreš odgovarjati na teme v tem forumu
Ne, ne moreš urejati svojih prispevkov v tem forumu
Ne, ne moreš brisati svojih prispevkov v tem forumu
Ne ne moreš glasovati v anketi v tem forumu
Ne, ne moreš pripeti datotek v tem forumu
Ne, ne moreš povleči datotek v tem forumu

Uptime: 499 dni


Powered by phpBB © 2001, 2005 phpBB Group