Obsah fóra
PravidláRegistrovaťPrihlásenie




Odpovedať na tému [ Príspevok: 1 ] 
AutorSpráva
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 12.10.09
Prihlásený: 16.11.09
Príspevky: 8
Témy: 3
Príspevok NapísalOffline : 04.01.2010 13:10

Vedel by mi niekto poradit robim jednoduchý osciloskop v Turbo C++ funguje to ako ma len chcem aby mi po spustení krivka zacinala v nule v Timer1Timer priradujem kazdej vzorke jej velkost ako to spravim tak aby to vykreslovanie krivky zacinalo az od nulovej vzorky??poradte prosiiim

void Draw()
{

int y,x;
bmp->Canvas->Brush->Color=clBlack;
bmp->Canvas->FillRect(TRect(0,0,440,396));

bmp->Canvas->Pen->Color=clBlue;
bmp->Canvas->Pen->Width=10;

/////////////////////////vykreslenie mriezky///////////////////////////////
bmp->Canvas->MoveTo(0,0);
bmp->Canvas->LineTo(0,312);
bmp->Canvas->Pen->Width=1;
bmp->Canvas->MoveTo(40,396);
bmp->Canvas->LineTo(40,0);
bmp->Canvas->MoveTo(80,0);
bmp->Canvas->LineTo(80,396);
bmp->Canvas->MoveTo(120,396);
bmp->Canvas->LineTo(120,0);
bmp->Canvas->MoveTo(160,0);
bmp->Canvas->LineTo(160,396);
bmp->Canvas->MoveTo(200,396);
bmp->Canvas->LineTo(200,0);
bmp->Canvas->MoveTo(240,0);
bmp->Canvas->LineTo(240,396);
bmp->Canvas->MoveTo(280,396);
bmp->Canvas->LineTo(280,0);
bmp->Canvas->MoveTo(320,0);
bmp->Canvas->LineTo(320,396);
bmp->Canvas->MoveTo(360,396);
bmp->Canvas->LineTo(360,0);
bmp->Canvas->MoveTo(400,0);
bmp->Canvas->LineTo(400,396);
bmp->Canvas->Pen->Width=10;
bmp->Canvas->MoveTo(437,396);
bmp->Canvas->LineTo(437,0);
bmp->Canvas->Pen->Width=10;
bmp->Canvas->LineTo(0,0);
bmp->Canvas->Pen->Width=1;
bmp->Canvas->MoveTo(649,40);
bmp->Canvas->LineTo(0,40);
bmp->Canvas->MoveTo(0,80);
bmp->Canvas->LineTo(649,80);
bmp->Canvas->MoveTo(649,120);
bmp->Canvas->LineTo(0,120);
bmp->Canvas->Pen->Color=clLime;
bmp->Canvas->Pen->Width=3;
bmp->Canvas->MoveTo(0,160);
bmp->Canvas->LineTo(649,160);
bmp->Canvas->Pen->Color=clBlue;
bmp->Canvas->Pen->Width=1;
bmp->Canvas->MoveTo(649,200);
bmp->Canvas->Pen->Width=1;
bmp->Canvas->Pen->Color=clBlue;
bmp->Canvas->LineTo(0,200);
bmp->Canvas->MoveTo(0,240);
bmp->Canvas->LineTo(649,240);
bmp->Canvas->MoveTo(649,280);
bmp->Canvas->LineTo(0,280);
bmp->Canvas->Pen->Width=10;
bmp->Canvas->MoveTo(0,312);
bmp->Canvas->LineTo(649,312);


//////////////////////vykreslenie krivky/////////////////////////////

bmp->Canvas->Pen->Width=1;
bmp->Canvas->Pen->Color=clRed;

int i,di;
di=(vzoriek/432)/S;

x=6; for (i=0;i<vzoriek;i+=di)
{


y=vzorky[i];


y=W-y;

if (!i)

bmp->Canvas->MoveTo(x,y);
else bmp->Canvas->LineTo(x,y);
x++;

}


/////////////////////////////////////////////////////
Form1->Canvas->Draw(0,0,bmp);

}


__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner)
{
dsound_init(Handle);
vzorky=new BYTE[buff_size];
vzoriek=0;
}
//---------------------------------------------------------------------------


void __fastcall TForm1::FormResize(TObject *Sender)
{
bmp->Width=440;
bmp->Height=350;
Draw();
}
//---------------------------------------------------------------------------



void __fastcall TForm1::Button1Click(TObject *Sender)
{
Timer1->Enabled=true;
Shape1->Brush->Color=clRed;
Shape2->Brush->Color=clGreen;
Draw();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Timer1->Enabled=false;
Shape2->Brush->Color=clRed;
Shape1->Brush->Color=clGreen;
Draw();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormPaint(TObject *Sender)
{
Draw();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
static int cnt=0;
dsound_lock();
BYTE *p; int i,j,sz;
sz=dsound_siz0+dsound_siz1;

p=(BYTE*)dsound_adr0; i=0;

for (j=0;j<sz;j++)
{
if (j==dsound_siz0)
{
p=(BYTE*)dsound_adr1;
}
vzorky[j]=p[i];
i++;
}
vzoriek=j;
dsound_unlock();
cnt++;
Caption=cnt;

Draw();
}


Odpovedať na tému [ Príspevok: 1 ] 


Podobné témy

 Témy  Odpovede  Zobrazenia  Posledný príspevok 
V tomto fóre nie sú ďalšie neprečítané témy. Zobrazenie

v nVidia grafické karty

0

474

08.01.2010 11:49

Peter Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. chybné zobrazenie

v Sieťové a internetové programy

1

540

30.01.2009 13:41

mbmbac Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. zobrazenie súborov

v Audio programy

4

801

12.03.2008 19:21

Mandy Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. zobrazenie stranok

v Sieťové a internetové programy

6

684

11.10.2009 15:07

pitimir Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Zobrazenie RSS

v PHP, ASP

2

869

07.08.2008 16:05

genius7 Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. PS3 zobrazenie

v Herné konzoly

17

638

13.10.2015 13:56

pcluon Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Zobrazenie plochy

v Operačné systémy Microsoft

2

392

04.08.2014 18:35

kingjan Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Zobrazenie Firefox

v Siete

4

517

09.05.2010 16:28

Echo Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. zobrazenie suborov.

v Operačné systémy Microsoft

1

344

12.02.2014 15:08

tatko Tom Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Dvojite zobrazenie

v Monitory, televízory a projektory

0

399

03.09.2012 16:39

silho Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. zobrazenie DIVu

v PHP, ASP

1

545

08.08.2008 10:55

suchy Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Zobrazenie pripojení

v Sieťové a internetové programy

1

389

18.02.2011 17:38

don jebot Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. zobrazenie statickej stranky

v Redakčné systémy

0

647

05.06.2009 12:58

frenkacik Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. zobrazenie casti textu

v PHP, ASP

7

574

11.01.2010 18:52

neopagan Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Chybné zobrazenie textu

v HTML, XHTML, XML, CSS

4

981

13.05.2008 20:43

jukel Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Help! zobrazenie obsahu

v PHP, ASP

11

567

31.05.2007 22:07

pavuckar Zobrazenie posledných príspevkov


Nemôžete zakladať nové témy v tomto fóre
Nemôžete odpovedať na témy v tomto fóre
Nemôžete upravovať svoje príspevky v tomto fóre
Nemôžete mazať svoje príspevky v tomto fóre

Skočiť na:  

Powered by phpBB Jarvis © 2005 - 2024 PCforum, webhosting by WebSupport, secured by GeoTrust, edited by JanoF
Ako väčšina webových stránok aj my používame cookies. Zotrvaním na webovej stránke súhlasíte, že ich môžeme používať.
Všeobecné podmienky, spracovanie osobných údajov a pravidlá fóra