Архивы автора: android developer

Работа с формой программы

Автор: | 16.02.2013
Нет комментариев

Не показывать форму программы: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Application.ShowMainForm:=false; [/cc] Запретить кнопку Close [x] в заголовке окна: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Style := GetWindowLong(Handle, GWL_STYLE); SetWindowLong(Handle, GWL_STYLE, Style And Not WS_SYSMENU); // var Style: Longint; [/cc] Задание цвета формы: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Form1.Color:=RGB(255,130,10); // т.е. задаем значения Красного, Зеленого, Синего (0..255).… Читать далее »

Работа с массивами

Автор: | 16.02.2013
Нет комментариев

Считываем значение из двумерного массива «h» и записываем его в переменную «x» — x:=h[1,1];  //var h: array[1..51] of array[1..15] of Extended; x: Extended; Записываем значение переменной «x»  в двумерный массив «h» — h[1,1]:=x;  //var h: array[1..51] of array[1..15] of Extended; x: Extended; Устанавливаем размерность динамического массива «h» равную 15 — SetLength(h, 15); //var h: array… Читать далее »

Математические функции (модуль Math)

Автор: | 16.02.2013
Нет комментариев

Получение натурального логарифма числа 2 и запись значения в переменную x: [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] x:= Ln(2); // var x : Double; [/cc] Получение экспоненты этого значения — операция обратная Ln (получению натурального логарифма): [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] x:= Exp(x); // var x : Double; [/cc] Модуль числа присвоить переменной x: [cc lang=»delphi»… Читать далее »

Функции для работы с файловой системой

Автор: | 11.02.2013
Нет комментариев

Скрыть папку : SetFileAttributes(PChar(‘c:\TestDir’),faHidden); Создать три папки вложенных друг в друга : ForceDirectories(‘C:\MyDir\Test\Dir1’); Создание папки : createdir(‘c:\TestDir’); // если не указать директорию, то папка будет создана там же где и программа Удаление не пустой папки : [cc lang=»delphi» tab_size=»2″ line_numbers=»false» no_links=»false»] Function MyRemoveDir(sDir: String): Boolean; var iIndex: Integer; SearchRec: TSearchRec; sFileName: String; begin Result :=… Читать далее »

Комментарии в коде

Автор: | 16.01.2013
Нет комментариев

Комментарии мы пишем не для кого-то, комментарии мы пишем для себя. Они нужны там, где код сложный, т.е. там, где не понятно сразу что происходит. По мере повышения уровня знаний в программировании, комментариев становится меньше.

Создание семьи классов

Автор: | 23.11.2012
Нет комментариев

Текст задания : Описать класс Книга: поля Название, год издания. Методы: вывод информации, конструктор с параметрами. Описать дочерний (от Книги) класс Учебник: добавить поля: предмет, класс. Описать дочерний (от Учебника) класс Журнал: добавить поле Номер. Создать объекты описанных классов с помощью конструктора. Вывести информацию об объектах с помощью метода. Решение : Первый наш класс Книга… Читать далее »

Сортировка массива методом вставок

Автор: | 23.11.2012
Нет комментариев

Теоретическая часть метода состоит в том, что массив чисел сортируется с начала,и каждое последующее число вставляется в уже отсортированную часть массива на предназначенное ему место. Основная соль метода выражена в процедуре :

Создание клиента для получения курса валют с WSDL Web Service Центробанка

Автор: | 27.08.2012
2 комментария

Создание клиента для получения курса валют с WSDL Web Service Центробанка http://www.cbr.ru/DailyInfoWebServ/DailyInfo.asmx?wsdl Для работы с сервисом будет использована среда разработки Delphi XE2. Создадим новый проект VLC Forms Application, затем идем в File-New-Others-WebServices- WSDL Importer   Вставляем адрес сервиса Выбор протокола, по умолчанию авто Полученный модуль, его нужно добавить USES в главной формы На странице сервиса http://www.cbr.ru/DailyInfoWebServ/DailyInfo.asmx… Читать далее »