Архивы
Несколько полезных процедур и функций в Delphi
Вторник, 26 июля 2011 г.Рубрика: Архив Itword.net (2007-10)
Метки: Delphi
Просмотров: 41389
Подписаться на комментарии по RSS
{*********************Определение своего IP адреса**********************************}
Function GetLocalIP:string;
var
WSAData : TWSAData;
p : PHostEnt;
Name : array [0..$FF] of Char;
begin
WSAStartup($0101, WSAData);
GetHostName(name, $FF);
p := GetHostByName(Name);
Result:=(inet_ntoa(PInAddr(p.h_addr_list^)^));
WSACleanup;
end;
Работа с ini файлами в Delphi
Вторник, 26 июля 2011 г.Рубрика: Архив Itword.net (2007-10)
Метки: Delphi
Просмотров: 22426
Подписаться на комментарии по RSS
На разных этапах создания проекта у вас может возникнуть потребность сохранить пользовательские настройки на диск. Лучше всего для этого подойдут INI файлы.
Работать с ними намного удобнее, нежели с обычными текстовыми файлами. Представьте ситуацию, вы написали крупный проект, который имеет огромное число настроек, например 100 штук (причем это не простые чекбоксы). Теперь представьте, что пользователь изменит один из параметров. Вам придется заново переписывать все 100 настроек в файл. Это очень утомительно. Благо есть способ более элегантный. Для хранения настроек и прочих подобных данных лучше всего подходят INI файлы или реестр. С реестром мы разберемся в следующий раз. Изучим работу с INI файлами. Одно из главных преимуществ INI файлов заключается в том, что эти файлы поддерживают переменные разных типов (String, Integer, Boolean). Также несравненным плюсом является возможность доступа к определенной записи, без изменения остальных. Думаю, что пора закончить введение и перейти к практике. Прежде всего нам надо создать новое приложение. Добавьте в секцию uses модуль inifiles. Давайте сохраним какие-нибудь настройки в INI файле.