grafico tipo gerenciador = desenpenho

Question

por favor  precso fazer um grafico tipo o grafico cardiaco...

Marcelo Saviski · Answer

[color=#128932:f5b7b677e6][b:f5b7b677e6]Coloque um TImage e um timer no form

timer.interval = 100;
image.height = 200;

[/b:f5b7b677e6][/color:f5b7b677e6]

var
num : integer = 100; //variavel global

[color=128932:f5b7b677e6][b:f5b7b677e6]
no evento ontimer do timer fa�a[/b:f5b7b677e6][/color:f5b7b677e6]

begin
image1.canvas.copyrect(bounds(-1,0,image1.width-1,image1.height),image1.canvas,bounds(0,0,image1.width,image1.height));
num := num + random(3)-1;
image1.canvas.pixels[image1.width-1,num] := clgreen;
end;