Приветствую Вас Гость | RSS

Delphi заготовки

Суббота, 11.05.2024, 22:06
Главная » 2012 » Апрель » 13
пример программы на Delphi для получение пикселя экрана.   также демонстрирует
получение название цвета пикселя экрана на русском языке



создаем  массив для хранения информации об элементах цвета.
каждый элемент будет включать - название на английском языке. русский эквивалент, цвет в формате RGB 
список цветов берем с сайта вики
http://ru.wikipedia.org/wiki/%D0%A1%D0%BF%D0%B8%D1%81%D0%BE%D0%BA_
%D1%86%D0%B2%D0%B5%D1%82%D0%BE%D0%B2

Type

Tcolor_rus = record
   Name:string; // название цвета в Eng
   Rus_name:string; // Название цвета в Rus
   Color:Tcolor; // Цвет
end;


  ColorArray :array of Tcolor_rus; // массив элементов
  ColorArrayCount:integer; // размер массива

  hDC:Thandle; //  для получения пикселя экрана

для корректной работы функции поиска максимально похожего цвета используем
модуль uses math;


1. ... Читать дальше »
Просмотров: 2961 | Добавил: NetSoftWare | Дата: 13.04.2012 | Комментарии (0)


на офицальном сайте Центрального Банка России  есть материал регламентирующий работу с данными о курсах валют

Получение данных, используя XML

     http://www.cbr.ru/scripts/Root.asp?Prtid=SXML

Пример1
Например, для получения котировок на заданный день
http://www.cbr.ru/scripts/XML_daily.asp?date_req=02/03/2002
    date_req= Date of query (dd/mm/yyyy)
* если параметр(date_req) отсутствует, то Вы получите документ на последнюю зарегистрированную дату.

-- Справочник по кодам валют: http://www.cbr.ru/scripts/XML_val.asp?d=0
    d=0 Коды валют устанавливаемые ежедневно.
    d=1 Коды валют устанавливаемые ежемесячно.

http://www.cbr.ru/scripts/XML_daily.asp?date_req=02/03/2002&d=1 - котировки валют устанавливаемые ежемесячно (устарело).
Aнгл. версия:
http://www.cbr.ru/scripts/XML_daily_eng.asp?date_req=22/01/2007
http://www.cbr.ru/scrip ... Читать дальше »
Просмотров: 7715 | Добавил: NetSoftWare | Дата: 13.04.2012 | Комментарии (3)