Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запрет на запуск [D7, Win95/98, WinME, NT4, Win2k, WinXP]

Twister1222 © (2005-08-16 20:25:00)
Приветствую уважаемые,

Тут такое дело, как бы реализовать следующие:

Запретить запускать программу на компах в определенных странах. Т.е. к примеру чтобы у французов эта прога не запустилась.

kblc (2005-08-18 07:05:00) [1]
Автор, а может быть на компе есть какое-нибудь специальное железо?

Alexander Panov (2005-08-18 04:16:00) [2]
Задача не решаема в общем случае.

И даже в частных случаях ее можно решить с большой натяжкой.

Германн (2005-08-18 02:01:00) [3]
2 Twister1222 (17.08.05 17:44) [5]

2Германн > По существу бы, а не кидать в "для начинающих".

"По существу" я уже ответил. См. Германн © (17.08.05 01:50) [4]

> Вопрос был задан конкретно, пока решен на 50 процентов (даже мастерами)
А чем меряешь процент решения?

Вот далее Almaz © (17.08.05 18:12) [7] предложил идею. Но, имхо, очень это "геморройно"! Там термин "Если" - главный, а результат получается приемлемым, если "всё тип-топ"!

Almaz (2005-08-17 18:12:00) [4]

> Алмаз спасибо, может ещё идеи ?

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

Если компьютер подключен к интернету, то можно теоритически сделать traceroute к какому-нибудь серверу, например тот же delphimaster.com проанализировать, получить IP провайдера к которому подключен данный компьютер, потом программно подключиться к www.geoip.net/geoip/ и найти на географическое положение провайдера. С вероятностью 99%, ИМХО, провайдер и компьютер имеют очень близкое географическое положение.

Удачи.

BiN (2005-08-17 17:57:00) [5]
Тут без GPS не обойтись.

Twister1222 (2005-08-17 17:44:00) [6]
Германн > По существу бы, а не кидать в "для начинающих".
Вопрос был задан конкретно, пока решен на 50 процентов (даже мастерами)
Алмаз спасибо, может ещё идеи ?

Германн (2005-08-17 01:50:00) [7]
А вот тут я просто не понимаю, почему этот топик до сих пор не в "Начинающих"?

Как может "кусок железа"+" небольшоеколичество кристаллического кремния(с теми или иными примесями)+"различного рода и вида пластмассы", решить "В КАКОЙ СТРАНЕ ОН РАБОТАЕТ?"

Almaz (2005-08-17 01:00:00) [8]

> Twister1222 (17.08.05 00:41) [2]
> Almaz 10x, ну а если у него там Германия к примеру указана
> ?

Значит определиться как Германия. CTRY_GERMANY = 49.

Twister1222 (2005-08-17 00:41:00) [9]
Almaz 10x, ну а если у него там Германия к примеру указана ?

Almaz (2005-08-16 21:20:00) [10]
Определить страну, указанную в региональных настройках ОС можно с помощью функции GetLocalInfo.

var Buffer: array [0..255] of Char; begin if GetLocaleInfo(LOCALE_SYSTEM_DEFAULT, LOCALE_ICOUNTRY, Buffer, sizeof(Buffer)) <> 0 then ShowMessage('Код страны: ' + Buffer); if GetLocaleInfo(LOCALE_SYSTEM_DEFAULT, LOCALE_SENGCOUNTRY, Buffer, sizeof(Buffer)) <> 0 then ShowMessage('Название страны на английском: ' + Buffer); end;

Ну а запретить запуск, я думаю вы сможете и сами.

Удачи.

p.s. А чем вам так французы насолили ? :)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »