Страница 1 из 1
Графическое отображение трафика
Добавлено: 15 ноя 2006, 20:58
Alex640
Может быть кто-нибудь подскажет как сделать графическое отображение трафика в окне в виде баров или линий, как это сделано в таких программах как ReGet, DU meter и других подобных. Тотже DU meter сделан на Delphi
Добавлено: 16 ноя 2006, 12:02
somewhere
Берешь TBitmap и рисуешь бары, потом TImage.Picture.Bitmap := MyBitmap.
Например, по Х - 200 значений, значения от 0 до 49
Код: Выделить всё
MyBitmap := TBitmap.Create;
MyBitmap.Width := 200;
MyBitmap.Height := 50;
MyBitmap.PixelFormat := pf8bit;
For X := 0 to 199 do
With MyBitmap.Canvas do
begin
MoveTo(X, 49);
LineTo(X, 49-MyValues[X]);
end;
MyImage.Picture.Bitmap.FreeImage;
MyImage.Picture.Bitmap := MyBitmap;
MyBitmap.Destroy;
Добавлено: 16 ноя 2006, 18:42
Alex640
Спасибо, попробую !
Добавлено: 16 ноя 2006, 22:49
Alex640
Работает, спасибо !
Re: Графическое отображение трафика
Добавлено: 08 мар 2007, 06:31
ia8
Alex640, что всет-таки с программой Satcalc????? Я спрашивал в личном. Тарифы по старому считает, статиситку и скорость не меняет - сервер недоступен. Прошу ответить