Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

TChart - prikaz particija u obliku pite (Pie)?

[es] :: Pascal / Delphi / Kylix :: TChart - prikaz particija u obliku pite (Pie)?

[ Pregleda: 3009 | Odgovora: 14 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 11:43 - pre 219 meseci
Postavio sam listview u kojem se na TForm.FormCreate ispišu redom particije, recimo:
DISK FILE SYSTEM SIZE ....
C NTFS 9.90GB

Sad bi hteo da se to prikaže u obliku pite na TChart? Zna li neko kako da ono što je u TListview bude u obliku pite predstavljeno u TChart?
Ili da izvučem te podatke u TChart bez TListView, logično, isti je hdd, poklopiće se podaci?!!!
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

IvanBeograd
Kladza
Beograd

Član broj: 83376
Poruke: 379
*.adsl.sezampro.yu.

Sajt: www.dza-bu-drz-ne-daj.com


Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 11:52 - pre 219 meseci
Code:
 C:\Program Files\Borland\Delphi7\Demos\TeeChart

:) Pozzz
SERVIA NOSTRUM REGNUM!
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 13:40 - pre 219 meseci
Naišao sam na taj primer, hvala na odgovoru...
Ali nisam skontao kako da iz TListView prebacim u TChart, kao pita(pie)?!
Nešto tipa:
Code:
Chart1:=ListView.Items

Verovatno nije tako, ne znam, zato pitam...
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

IvanBeograd
Kladza
Beograd

Član broj: 83376
Poruke: 379
*.smin.sezampro.yu.

Sajt: www.dza-bu-drz-ne-daj.com


Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 14:31 - pre 219 meseci
Sorry,mislio sam da nisi pogledao te primere,ja sam nesto ranije radio sa chart-ovima i disk size,
sad cu pokusam da nadjem to sto sam radio!Pozz
SERVIA NOSTRUM REGNUM!
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 15:41 - pre 219 meseci
Ajd, ako nadjes, treba mi za neki moj programcic, bas bi se lepo uklopilo...
Otpozdrav...
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

IvanBeograd
Kladza
Beograd

Član broj: 83376
Poruke: 379
*.smin.sezampro.yu.

Sajt: www.dza-bu-drz-ne-daj.com


Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 15:58 - pre 219 meseci
Evo nesto na brzinu,imam neki ispit,a tako mi se neuci,sve bi radio samo da neucim
nadam se da ce pomoci!Ti bi mogao nesto reci ListView.onClick da ti menja chart tj DiskSize(I),DiskFree(I),...
itd.Gde bi ti I bilo ta particija,tj ItemIndex tog ListView-a!
Pozz

PS.
U codu stoji :
Code:

  Total := DiskSize(4);
  AmtFree := DiskFree(4);

ti stavi :
Code:

  Total := DiskSize(0);
  AmtFree := DiskFree(0);
 



[Ovu poruku je menjao IvanBeograd dana 04.04.2006. u 17:06 GMT+1]

[Ovu poruku je menjao IvanBeograd dana 04.04.2006. u 17:09 GMT+1]
SERVIA NOSTRUM REGNUM!
Prikačeni fajlovi
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 16:34 - pre 219 meseci
Kod mene je Chart1:TChart; i kad odradim:
Code:
procedure TFrm.DrivesChange(Sender: TObject; Item: TListItem;
  Change: TItemChange);
var
  AmtFree: Int64;
  Total:   Int64;
  i:integer;
begin
  Total := DiskSize(i);
  AmtFree := DiskFree(i);
  for i:=0 to lvDrives.ItemIndex-1 do

  Chart.Value[0]:=AmtFree;
  Chart.Value[1]:=Total;

  Label1.Caption:='Slobodno je : '+IntToStr(Round(((AmtFree/1024)/1024)))+' mb.';
  Label2.Caption:='Ukupna velicina : '+IntToStr(Round(((Total/1204)/1024)))+' mb. ';

end;


izbaci da
Citat:
[Error] Form.pas(541): Undeclared identifier: 'Value'

i selektuje red:
Code:
Chart.Value[0]:=AmtFree;
Chart.Value[1]:=Total;


P.S. meni treba da ono sto je prikazano u TlistView bude prikazano i na TChart. Ako imam u TListView 2 particije, hteo bih da se to prikaže u TChart kao i zauzetost hdd, odnosno, koliko spada pod C a koliko spada pod D particiju... Ne treba, bar u ovoj fazi izrade, da se prikaže za svaku particiju, pojedinačno, nego samo za hdd i particije na Form.OnCreate , koliko koja zauzima od hdd-a


[Ovu poruku je menjao loshmiscg dana 04.04.2006. u 17:54 GMT+1]
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 17:16 - pre 219 meseci
Ajde da pojednostavimo...
Da zanemarimo TListView, kako da TChart sa legendom mi prikaže hdd. Odnosno, ako imam dve particije da tako i predstavi, particija C zauzima 20% a particija D zauzima 80%?
U legendi bi trebalo pisati 'Naziv_Particije' i procenat koji zauzima!!!
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

Milos D
Beograd

Član broj: 5621
Poruke: 280
*.adsl.sezampro.yu.



+1 Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 18:50 - pre 219 meseci

Vrednosti dodajes odgovarajucem TChartSeries objektu, a ne samom grafikonu. U ovom slucaju verovatno:

PieSeries1.AddValue (AmtFree);
PieSeries1.AddValue (Total);


[Ovu poruku je menjao Milos D dana 04.04.2006. u 20:01 GMT+1]
 
Odgovor na temu

IvanBeograd
Kladza
Beograd

Član broj: 83376
Poruke: 379
*.smin.sezampro.yu.

Sajt: www.dza-bu-drz-ne-daj.com


Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 19:17 - pre 219 meseci
Ja mislim da on zeli samo da prikaze koliko koja particija mu zauzima prostor od ukupne velicine hard diska??
Definisi 2 promenjive,smesti u jednu promenjivu velicinu jedne particije,a u drugu promenjivu velicinu druge particije.
I prikazi ih preko charta.
Ja sam koristio Chartfx i Chart.Value[0]:=AmtFree; .... mi radi fino. Pozzzz

SERVIA NOSTRUM REGNUM!
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 19:44 - pre 219 meseci
Citat:
Milos D: Vrednosti dodajes odgovarajucem TChartSeries objektu, a ne samom grafikonu. U ovom slucaju verovatno:
PieSeries1.AddValue (AmtFree);
PieSeries1.AddValue (Total);


Ovo mi je pomoglo da odradim, ali nije ono što mi treba... Možete pogledati, upload-ovao sam...
Ovo mi je za C particiju:
Code:

  Total := DiskSize(0);
  AmtFree := DiskFree(0);

  Series1.Add (AmtFree);
  Series1.Add (Total);


a za D:
Code:
 Total := DiskSize(4);
  AmtFree := DiskFree(4);
  Series2.Add (AmtFree);
  Series2.Add (Total);


Na osnovu ovo ga, klikom na buton1 i button2, dobijam pie... nisam mislio na to... šta recimo, kad neko ima više particija????

Citat:
Ja mislim da on zeli samo da prikaze koliko koja particija mu zauzima prostor od ukupne velicine hard diska??

Da, upravo to...
Citat:
Definisi 2 promenjive,smesti u jednu promenjivu velicinu jedne particije,a u drugu promenjivu velicinu druge particije.
I prikazi ih preko charta.

Jel možete okačiti primer da vidim konkretno...

[Ovu poruku je menjao loshmiscg dana 04.04.2006. u 21:06 GMT+1]
Someone's sitting in the shade today because someone planted a tree a long time ago.
Prikačeni fajlovi
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 20:23 - pre 219 meseci
Bacih pogleda... pa, rekoh da i ja nesto napisem :)

Ne znam da li sam dobro razumeo, ali mislim da ovo trazis?

P.S.
Program nema proceduru koja ce oderdiri koje su particije na kojem disku... jednostavno krene od diska C i ide sve dok postoji naredni validan disk (uzima i CD i DVD i virualne diskove... sve dok ne naidje na prvi disk koji ne postoji). Ti isparvi deo koji uzima podatke o diskovima kao sto si radio i za TListView.
Prikačeni fajlovi
 
Odgovor na temu

IvanBeograd
Kladza
Beograd

Član broj: 83376
Poruke: 379
*.adsl.sezampro.yu.

Sajt: www.dza-bu-drz-ne-daj.com


Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 20:45 - pre 219 meseci
Da to je i mene malo zbunjivalo DiskSize(1) mi je flopi,pa pocne da krci kad probam da vidim njegovu velicinu!
SERVIA NOSTRUM REGNUM!
Prikačeni fajlovi
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?04.04.2006. u 20:53 - pre 219 meseci
E sad, posle Srkija sam rešio problem...
Svima podjednako hvala na pomoći....
Someone's sitting in the shade today because someone planted a tree a long time ago.
 
Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.



Profil

icon Re: TChart - prikaz particija u obliku pite (Pie)?05.04.2006. u 15:41 - pre 219 meseci
Kako bi se animacija odradila za BarSeries?
Prikačio sam pa ako neko zna nek pokaže na ovom primeru?!!!
pozzz

P.S. probao sam po primeru na C:\Program Files\Borland\Delphi7\Demos\TeeChart, Delphi 7, ali nekako mi nije jasno, pretrpali su primer sa svim i svačim...

[Ovu poruku je menjao loshmiscg dana 06.04.2006. u 01:27 GMT+1]
Someone's sitting in the shade today because someone planted a tree a long time ago.
Prikačeni fajlovi
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: TChart - prikaz particija u obliku pite (Pie)?

[ Pregleda: 3009 | Odgovora: 14 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.