- BSOD 0x0000007B Vista (2) / (0x83008BA0 0xC00000034 0x00000000 0x00000000)
- volodya62:
demonHunter12
А последнюю удачную конфигурацию не пробовали загрузить? :shuffle:
При загрузке нажать F8 и выбрать "последняя удачная конфигурация". :smoke:
- Обмен приглашениями/логинами на ВitTorrent & БитТоррент [6] (1616) /
- RXLayer:
Очень нужно! :wink:
Подскажите треккер с большим количеством кинофильмов в BR и/или HD на Eng языке, или на языке оригинала! :beer: Интересует т.к. часто вижу некачественно слепленные рипы!
- Mastek 1200 ub Plus Научите тупого! (6) / Как сканировать фотографии?
- BobikTuzik:
Спасибо.С расширением определился.Сканирую-полный вперед!!!
Вот теперь с фотопленками надо научится.
- Русификация Windows 7 build 7600 (0) / Как русифицировать и где взять пакет русификации
- Krot Off:
Господа, доброго времени суток, подскажите пожалуйста где взять пакет русификации Windows 7 Ultimate 64x build 7600 ?!
- Проблемы с установкой Microsoft Windows 7 (342) / Решение проблем с установкой
- wormax:
При запуске диска из BIOS мелькает надпись "cannot boot from cd - code 5"
При попытке установки на ноут(ASUS f50z) установка запускается.
Предполагаю что отказывается утсанавливаться изза старого железа (7 лет ему уже)
Что делать?
- Восстановить пароли в Red Hat (2) /
- ndch:
AnDySs1
Нужно именно УЗНАТЬ пароль. Человек умер, записки с паролями если и есть, то неизвестно где.
- BitTorrent & БитТоррент & Tracker & Трэкер от Ru-Board (4) (1201) / БитТоррент Трекер / BitTorrent Tracker
- vsjcfm:
Нет, статика. Напомню, что им больше никто не пользуется. По поводу неправильного ввода пароля - на авторизации он говорит, типа 6 попыток осталось. А регаться не хочут(
- King's Bounty. Легенда о рыцаре / Принцесса в доспехах (843) / обсуждение
- Agul:
Цитата:Вовсе не ерунда. На красных можно магию колдовать, а на черных - нет
Черные быстрее, сильнее, более защищены, выше защита от огня, им магия просто не нужна, могут огнем жарить по кривой линии. Сомневаюсь что ИИ игры при наличии красных драконов выставит хоть пару юнитов в одну линию чтобы их можно было издалека поджарить. Особенно выгодно драконы смотрятся в битве с другими драконами.
С другой стороны если человек может хорошо играть красными, то и флаг ему в руки, не просто так же они в игре. Каждый юнит имеет свои "фишки".
- Активация Windows 7/Vista/2008 & R2 прошивкой BIOS (8) (239) /
- fakir81:
sersh05
У меня WinHex 15.4 SR-9, ctrl+с и ctrl+v работают. Можешь мышкой через вкладку edit.
Добавлено:
alha
Цитата:1. Gigabyte 7N400V Pro
2. Версия F12
3. AWARD
4. GIGABYTE SLIC 2.1
5. http://download1.gigabyte.ru/bios/motherboard_bios_ga-7n400vpro_f12.exe
Пробуем, отписываемся SLIC 2.1 GIGABYTE - http://slil.ru/28205596
Samshit
Цитата:GA-P55-UD3
F4
AWARD
GIGABYTE SLIC 2.1
http://download1.gigabyte.ru/bios/motherboard_bios_ga-p55-ud3_f4.exe
Пробуем, отписываемся SLIC 2.1 GIGABYTE - http://slil.ru/28205585
- Modern Warfare 2 (Call of Duty 6) (362) / Над новой частью работают Infinity Ward
- Spawn2000:
Надо собрать развед данные в каждой миссии или не обязательно? И что измениться если их все собирать?
Прошел игру не собирая никаких данных. Шепарда убил, такая мелодрама. С Макаровым непонятно ничего, вроде как сдал Шепарда и стал белым и пушистым?
- Фантастика на английском (364) / Ссылки, обзоры, обсуждения
- corex:
Очередные новинки в Ирке
Джон Ринго начал новую серию Troy Rising романом Live Free or Die (February 16, 2010). Что может писать Джон Ринго? Ну конечно - ненаучную милитаристскую фантастику.
Отдельный роман Р. Скотта Бэккера Neuropath (2008). Жанр можно определить, как "на грани фантастики". Не в смысле качеств или интересности, а в смысле того, что это современный триллер на этой самой грани. Чтобы самому не стать таким вот невропатом, от чтения этого автора воздержусь, хватило в свое время 10% The Darkness That Comes Before, чтобы это понять.
Как известно, Брендон Сандерсон взялся дописывать цикл Wheel of Time после смерти Джордана. Но скромничать он не стал и, вместо того, чтобы просто дописать последнюю книгу A Memory of Light, он теперь делает из нее аж трилогию. Сейчас вышла первая книга из этой трилогии: The Gathering Storm (October 27, 2009).
После не очень удачного продолжения книги The Witches of Karres Джеймса Шмица триумвиратом авторов, двое из этого триумвирата, Эрик Флинт и Дэйв Фрир, прогнали третью – Мерседес Лэки, и написали третью книгу The Sorceress of Karres (January 5, 2010) вдвоем. И правильно: судя по стилю второй книги, Мерси и слова им там не дала вставить.
Dust of Dreams (August 18, 2009), девятая книга в серии Стивена Эриксона Malazan Book of the Fallen.
Frost Bitten (September 29, 2009), десятая книга в серии Келли Армстронг Women of the Otherworld.
Jumper Cable (October 13, 2009), тридцать третья книга в серии Пирса Энтони Xanth.
- NETFraemwork 3.5 (0) / Ччто это такое?? Программа?? Что она дает??
- tema26rus:
Ччто это такое?? Программа?? Что она дает??
- TTS-Text To Speech-Синтез речи-Говорилки-Digalo-Elan-voice (412) / Acapela AT&T Cepstral Loquendo NeoSpeech Sakrament Scans
- Seymour:
Переименуйте кто-нибудь тему в "Microsoft Agent / Speech API (SAPI) / Text-to-Speech (TTS)" ("Голосовые движки для синтеза и распознавания речи"), чтоб все связанное со Speech API обсуждалось здесь, благо уже на 20 страниц наговорили...
- ArchiCAD 12 (682) / продукт Graphisoft ArchiCAD 12 Варезник
- SimffAS:
LexVel
Цитата:так решения под х64 нет?..
Ставь ArchiCAD 13 x86 лечи его и работай. Появится "лечение" для ArchiCAD x64 переставишь. Это все же лучше вариант чем ждать "у моря погоды".
- Embarcadero (CodeGear) RAD Studio 2010 (Weaver) (1005) / Поддержка Windows 7.
- clear2121:
Пробовал. НЕ ПОМОГАЕТ. До установки Апдейта 2 всё прекрасно. А потом всё глотает и не работает.
- Обменник фото-литературой #2 (1526) / продолжение
- Zioma:
What Digital Camera - December 2009
PDF | 149 pages | 66.3 Mb | English
Скачать:
http://rapidshare.com/files/307060897/wdc-2009-12-dec.rar
Зеркало:
http://dep_sitfiles.com/files/t16jm7fyx
- Получение бесплатных лицензий к KIS, KAV (3041) / Бесплатные лицензии к продуктам Лаборатории Касперского
- YuriyAk:
grey4x
Смотри почту!!!
Сам Женя Тебе прислал!!!
- SolidWorks и т.д. ( часть 6) (290) / SolidWorks и приложения к нему
- leoneed80:
Kolpak, в предыдущей ветке ищи http://forum.ru-board.com/topic.cgi?forum=35&topic=39867#1
- VMware ESX Server и VMware Infrastructure (часть 2) (1498) / Инсталляция и работа - все версии ESX
- hifahif:
100% ЗАРАБОТОК В ИНТЕРНЕТЕ.
прочитай возможно пригодится.
не обман-реальные деньги.
Вариант 1.
заранее пишу,в случае недоверия спрашивайте в личку что к чему,не поверил пока сам не сделал..4000 р. в месяц вполне реально. Если есть 15 минут свободного времени в день, то это для тебя. На жизнь может и не хватит, но оплатить интернет за месяц и свою мобильную связь хватит))) Да и на пиво останется))) Если в среднем за день получать 5$, то за неделю (рабочую) = 25$, за месяц = 100$ тратя 15-20 минут в день.Занимаясь этим можно зарабатывать большие деньги. 500 рефералов(приглашенные вами люди) будут приносить вам доход 500 центов за клик,в среднем 1 человек в день делает 20 кликов. И это реально!!!
Все делайте по шагам и вопросов у Вас никаких не возникнет, обязательно дочитайте до конца:
1) Зарегистрируйтесь в системе на сайте, www.b u x.to
2) Далее заполняйте формы
1. Username - здесь пишите имя латинскими буквами для входа в систему (логин).
2. Password - здесь пишите пароль не менее 6 символов.
3. Confirm password - повторяете пароль.
4. Email Address - здесь пишите Ваш настоящий email адрес. На него ничего приходить не будет, кроме уведомлений от сайта.
5. Confirm Email Address - повторяете email.
6. PayPal email address for payments - здесь опять пишите этот же адрес.
7. Your country - выбираете страну проживания.
8. Referrer - тут пишите "pinto_a", иначе бонуса не будет ни мне, ни вам).
9. Ставите галочку, что Вы согласны с правилами сайта и вводите знаки с картинки.
10. Нажимаете на кнопку регистрации.
3) Далее нажимайте на надпись Login
4) Теперь вводите ваш логин и пароль, которые вы 2 шага назад зарегистрировали
5) Далее раздел Surf Ads
6) В этом разделе показаны все Ваши ссылки, которые есть у вас на сегодняшний день, они выделены серым цветом
7) Далее кликайте на любую возможную ссылку
8) В открывшемся окне сверху слева пошел отсчет, Вы для быстроты загрузки страницы можете отключить картинки. Просто ждите пока отсчет 30 секунд закончится
9) Как только появилась надпись DONE и галочка можете закрывать страницу
10) Если появилась надпись Done, но без галочки, значит вам эту страницу не засчитали, значит вы делаете что то не правильно, тогда просто перейдите обратно
в раздел Surf ads и нажмите на эту ссылку заново.
11) Как страницу вам засчитали, закрывайте окно и переходите обратно в раздел surf ads, и кликайте на следующую ссылку
12) Те ссылки которые вы покликали становятся зачеркнутыми, для проверки, зайдите в раздел surf ads и обновите страницу (если это необходимо)
13) Как только все ссылки станут зачеркнутыми ваша задача на этот день окончена, заходите на следующий день и ссылки появятся заново, только может в большем
количестве, если вы будете кликать каждый день.
Для того что бы проверить сколько на вашем балансе денег уже заработано зайдите в раздел My stats, Первые цифры малы, но потом будет намного больше!
14) В первые дни сумма будет небольшая. Но через несколько дней 5-7 баксов за день и это не предел и не обман!!
15) Как снять деньги: накапливаете 50$, выводите деньги в обменную систему AlertPay, а оттуда либо на свою карточку VISA classic (можно оформить в любом
банке), либо почтовым переводом, либо на вебмани или на яндекс.
приглашай знакомых по ссылки To refer others, каждый приглашенный тобой реферал будет приносить тебе и ему по 1 центу т.е. 100чел(25кликов)750уе месяц.
Изначально у вас будет не очень большой заработок,но подумайте сами в интернете миллиард людей,рассылая эту информацию по форумам,найти 500 человек которые будут приносить вам 500 центов в день за клик очень легко.
Все тоже самое:
www.rcbux.com/register.php?r=timadog
www.paid-bux.info/?r=timadog
www.uddoo.com/?r=timadog
www.bux3.com/?r=timadog
www.angelbux.com/?r=timadog
www.leobux.org.ua/?r=timadog
www.turquads.net/kayit.php?r=timadog
www.paid2youtube.com/?r=timadog
www.teenpunci.info/?r=timadog
www.wordlinx.com/?r=207247
www.tempscript.com/?r=timadog
www.neobux.com/?r=timadog2
www.palmbux.com/register.php/timadog2a
www.surfpay.co.uk/?r=timadog
www.rixbux.com/register.php?r=timadog
www.beanybux.com/?r=timadog
www.bux.gs/?r=timadog
www.10bux.net/?r=timadog
www.B-U-X.net/?r=timadog
Вариант 2.
http://www.fusionmails.com/pages/index.php?refid=unadog
Минимум к выплате: 0.01$ (E-gold), 0.05$ (Paypa, Alertpayl)
Выплаты: E-gold, Paypal, Alertpay
Рефсистема: 10%, 3%, 1%, 1%
Виды заработка: письма, клики, регистрации, промоут.
http://wmpublic.com/n/eas
Русский спонсор,серфинг,клики,выполнение заданий все задания подробно описанны на русском языке,минималка 1 цент,моментальный вывод средств.
www.rusip.ru/cgi-bin/regist.cgi?WMR=300273387212 - простой,платящий,русскоязычныйй спонсор.
Вариант 3.
Система более простая,требует открытое окно explorer которое будет приносить доход от 45-75 центов в час + бонусы от рефералов.
www.surf junky.com/?r=Easymoney2
нажимаете sign up для регистрации
страница начинает перебирать сайты со скоростью 45 центов в час.
люди зарегистрировавшиеся по Your referral link будут приносить вам дополнительный доход.
- Программы для разработки, тестирования,... оптических систем (1316) / Обсуждаем то чем пользуемся.
- yevogre:
Цитата:по Вашим данным получается, что в случае светосильных систем Zemax даёт результат по аберрациям, отличающимся от Code V?
Я только что проверил не совсем светосильную систему. Правда, работаю только в КОДе.
Но получал графики линзовых объективов, у которых число Штреля в диапазоне частот 400...900 нан было близко к 1.
Проверил на объективе диаметром 5, фокус 10, разрешение близко к дифф. пределу при частотах
587 и 656 нан. В этом диапазоне число Штреля близко к 1 (0,89....0,7).
Добавляю 486 и 852 нМ, ЧКХ просаживается, но не сильно. А вот число Штреля падает сразу до 0,2. При трассировке подобного объектива через TracePro диаметр пятна 480нан на порядки превышает
диаметр 587нан. Ну, я на абсолютную истину не претендую, может, что не так делаю.
Но попался мне как-то Пецваль от ночника, разрешение никакое. Попросил схему, прогнал через Код.
Результат тот, что увидел глазами - уровень 20...28 линий на 20% контраста.
Написал расчётчику - он прислал графики от ЗЕМАКСа, где разрешение по центру на том-же контрасте составляет более 60 линий.
- Монтажные шаблоны для Фотошоп/Photoshop (504) / Интересные шаблоны в формате PSD и не только...
- DLdev:
- USB Flash Drive. Общие вопросы (Часть 2) (721) / проблемы с форматированием, диагностированием использованием
- Ignat:
klin70,
1. Acronis Disk Director Suite;
2. Да;
3. Нет.
Как флеш определяется в BIOS SETUP? Загрузитесь с любого LiveCD /WinPE, посмотрите как определяется флеш. Определяет ли проблемное USB-устройство программа ChipGenius, если да, то скопировать всю информацию из нижнего окошка, выложить здесь.
Главное, не торопитесь предпринимать какие-либо необдуманные действия!!!
Добавлено:
Цитата:
- хранят на нескольких носителях!Данные ОЧЕНЬ-ОЧЕНЬ ценные
- Inno Setup (создание инсталяционных пакетов) (421) / Обсуждение работы - (часть №8)
- YURSHAT:
Народ столкнулся с такой проблемой. В проверке системных требований на Windows Vista некоректно отображается название звуковой карты и ОЗУ. Вот как должно быть (пример S.T.A.L.K.E.R.)
а вот что у меня
Мож поможет кто? вот [more=скрипт][Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{A26D5C25-7C3D-44DD-B9AB-6535A19CFC4A}
AppName=My Program
AppVerName=My Program 1.5
AppPublisher=My Company, Inc.
AppPublisherURL=http://www.example.com/
AppSupportURL=http://www.example.com/
AppUpdatesURL=http://www.example.com/
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes
[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"
[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
[Files]
Source: "C:\Program Files\Inno Setup 5\Examples\MyProg.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "get_hw_caps.dll"; DestDir: "{app}"; Flags: ignoreversion
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
[Icons]
Name: "{group}\My Program"; Filename: "{app}\MyProg.exe"
Name: "{group}\{cm:UninstallProgram,My Program}"; Filename: "{uninstallexe}"
Name: "{commondesktop}\My Program"; Filename: "{app}\MyProg.exe"; Tasks: desktopicon
[Run]
Filename: "{app}\MyProg.exe"; Description: "{cm:LaunchProgram,My Program}"; Flags: nowait postinstall skipifsilent
[Code]
const
NeedSize = 20;
DRIVE_UNKNOWN = 0;
DRIVE_NO_ROOT_DIR = 1;
DRIVE_REMOVEABLE = 2;
DRIVE_FIXED = 3;
DRIVE_REMOTE = 4;
DRIVE_CDROM = 5;
DRIVE_RAMDISK = 6;
var
ListBox: TListBox;
Text: TNewStaticText;
function GetVideoCardName(): PChar;
external 'hwc_GetVideoCardName@files:get_hw_caps.dll stdcall';
function GetSoundCardName(): PChar;
external 'hwc_GetSoundCardName@files:get_hw_caps.dll stdcall';
function DetectHardware(): Integer;
external 'hwc_DetectHardware@files:get_hw_caps.dll stdcall';
function GetHardDriveFreeSpace(hdd: integer): Integer;
external 'hwc_GetHardDriveFreeSpace@files:get_hw_caps.dll stdcall';
function GetHardDriveName(hdd: integer): PChar;
external 'hwc_GetHardDriveName@files:get_hw_caps.dll stdcall';
function GetHardDriveTotalSpace(hdd: integer): Integer;
external 'hwc_GetHardDriveTotalSpace@files:get_hw_caps.dll stdcall';
function GetHardDrivesCount(): Integer;
external 'hwc_GetHardDrivesCount@files:get_hw_caps.dll stdcall';
function GetSoundCards(): Integer;
external 'hwc_GetSoundCards@files:get_hw_caps.dll stdcall';
function GetSystemPage(): Integer;
external 'hwc_GetSystemPage@files:get_hw_caps.dll stdcall';
function GetSystemPhys(): Integer;
external 'hwc_GetSystemPhys@files:get_hw_caps.dll stdcall';
function GetVidMemLocal(): Integer;
external 'hwc_GetVidMemLocal@files:get_hw_caps.dll stdcall';
function GetVidMemNonLocal(): Integer;
external 'hwc_GetVidMemNonLocal@files:get_hw_caps.dll stdcall';
function GetVideoCardDev(): Integer;
external 'hwc_GetVideoCardDev@files:get_hw_caps.dll stdcall';
function GetVideoCardVen(): Integer;
external 'hwc_GetVideoCardVen@files:get_hw_caps.dll stdcall';
function GetLogicalDrives: DWORD;
external 'GetLogicalDrives@kernel32.dll stdcall';
function GetDriveType(nDrive: string): Longint;
external 'GetDriveTypeA@kernel32.dll stdcall';
function DelSp(const s: string): string; //функция удаления табуляции и пробелов в начале строки
var
c, i: integer;
stt, st, st1: string;
begin
c := 0;
st := s;
for i := 1 to Length(st) do
begin
stt := copy(st, i, 1);
if (stt = ' ') and (c >= 1) then
begin
st1 := st1;
c := c + 1;
end
else if (stt = ' ') and (c = 0) then
begin
c := c + 1;
st1 := st1 + stt;
end
else if (stt <> ' ') then
begin
c := 0;
st1 := st1 + stt;
end
end;
Result := st1;
end;
function CheckSystemPage(PreviousPageId: Integer): Integer;
var
Page: TWizardPage;
ProcessorName: string;
Processor, VideoCardPanel, AudioCardPanel, RAMPanel, PageFilePanel: TMemo;
ProcessorNamePanel, VideoCardNamePanel, AudioCardNamePanel, RAMTotalPanel, PageFileTotalPanel: TMemo;
ProcessorMHZ: Cardinal;
StaticText, StaticText2: TNewStaticText;
VidRam: integer;
begin
RegQueryStringValue(HKLM, 'HARDWARE\DESCRIPTION\System\CentralProcessor\0', 'ProcessorNameString', ProcessorName);
RegQueryDWordValue(HKLM, 'HARDWARE\DESCRIPTION\System\CentralProcessor\0', '~MHz', ProcessorMHZ);
GetVidMemLocal;
GetSoundCards;
Page := CreateCustomPage(PreviousPageId, 'Аппаратное обеспечение', 'Программа установки обнаружила следующие необходимые компоненты');
StaticText := TNewStaticText.Create(Page);
with StaticText do
begin
Parent := Page.Surface;
Caption := 'Все компоненты удовлетворяют требованиям игры.';
Left := 0;
Top := 0;
AutoSize := True;
end;
StaticText2 := TNewStaticText.Create(Page);
with StaticText2 do
begin
Parent := Page.Surface;
Caption := 'Когда Вы будете готовы продолжить установку, нажмите «Далее».';
Left := 0;
Top := 220;
AutoSize := True;
end;
//******************************************* [Начало - Процессор] ***************************************************//
Processor := TMemo.Create(Page);
with Processor do
begin
Text := ' Процессор';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(0); //оригинал S.T.A.L.K.E.R.
Top := ScaleY(30);
Width := ScaleX(106); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := clBtnFace;
end;
ProcessorNamePanel := TMemo.Create(Page);
with ProcessorNamePanel do
begin
Text := DelSP(ProcessorName) + ' ' + IntToStr(ProcessorMHZ) + ' MHz';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(110); //оригинал S.T.A.L.K.E.R.
Top := ScaleY(30);
Width := ScaleX(304); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := $CCFFCC;
end;
if ProcessorMHZ < 1800 then //Минимальное количество частоты в MHz
begin
StaticText.Caption := 'Компоненты, выделенные красным, не удовлетворяют требованиям игры.'#13+'Проверьте соответствие системным требованиям.';
ProcessorNamePanel.Color := $CCCCFF;
end;
//******************************************* [Конец - Процессор] ****************************************************//
//******************************************* [Начало - Видеоадаптер] ************************************************//
VideoCardPanel := TMemo.Create(Page);
with VideoCardPanel do
begin
Text := ' Видеоадаптер';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(0); //оригинал S.T.A.L.K.E.R.
Top := Processor.Top + 27;
Width := ScaleX(106); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := clBtnFace;
end;
VideoCardNamePanel := TMemo.Create(Page);
with VideoCardNamePanel do
begin
Text := ' ' + GetVideoCardName;
Alignment := taLeftJustify;
Parent := Page.Surface;
VidrAM := GetVidMemLocal / 1000000;
if VidRam > 63 then
begin
if VidRam < 100 then Text := DelSp (Text) + ' 64 МB'
else if VidRam < 200 then Text := DelSp (Text) + ' 128 МB'
else if VidRam < 300 then Text := DelSp (Text) + ' 256 МB'
else if VidRam < 400 then Text := DelSp (Text) + ' 384 МB'
else if VidRam < 600 then Text := DelSp (Text) + ' 512 МB'
else if VidRam > 500 then Text := DelSp (Text) + ' 1024 МB';
end;
Left := ScaleX(110); //оригинал S.T.A.L.K.E.R.
Top := VideoCardPanel.Top;
Width := ScaleX(304); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := $CCFFCC;
end;
if GetVidMemLocal < 127000000 then //Минимальное объем ОЗУ [в байтах] у видеоадаптера 128 MB
begin
StaticText.Caption := 'Компоненты, выделенные красным, не удовлетворяют требованиям игры.'#13+'Проверьте соответствие системным требованиям.';
VideoCardNamePanel.Color := $CCCCFF;
end;
//******************************************* [Конец - Видеоадаптер] *************************************************//
//******************************************* [Начало - Звуковая карта] **********************************************//
AudioCardPanel := TMemo.Create(Page);
with AudioCardPanel do
begin
Text := ' Звуковая карта';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(0); //оригинал S.T.A.L.K.E.R.
Top := VideoCardPanel.Top + 27;
Width := ScaleX(106); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := clBtnFace;
end;
AudioCardNamePanel := TMemo.Create(Page);
with AudioCardNamePanel do
begin
Text := ' ' + GetSoundCardName;
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(110); //оригинал S.T.A.L.K.E.R.
Top := AudioCardPanel.Top;
Width := ScaleX(304); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := $CCFFCC;
end;
if
GetSoundCards = 0 then
begin
StaticText.Caption := 'Компоненты, выделенные красным, не удовлетворяют требованиям игры.'#13+'Проверьте соответствие системным требованиям.';
AudioCardNamePanel.Color := $CCCCFF;
end;
//******************************************* [Конец - Звуковая карта] ***********************************************//
//******************************************* [Начало - ОЗУ] *********************************************************//
RAMPanel := TMemo.Create(Page);
with RAMPanel do
begin
Text := ' Память';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(0); //оригинал S.T.A.L.K.E.R.
Top := AudioCardPanel.Top + 27;
Width := ScaleX(106); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := clBtnFace;
end;
RAMTotalPanel := TMemo.Create(Page);
with RAMTotalPanel do
begin
Text := ' ' + IntToStr(GetSystemPhys + 2) + ' MB';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(110); //оригинал S.T.A.L.K.E.R.
Top := RAMPanel.Top;
Width := ScaleX(304); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := $CCFFCC;
end;
if GetSystemPhys + 2 < 1024 then //Минимальное объем ОЗУ 1 Гб или 1024 Мб
begin
StaticText.Caption := 'Компоненты, выделенные красным, не удовлетворяют требованиям игры.'#13+'Проверьте соответствие системным требованиям.';
RAMTotalPanel.Color := $CCCCFF;
end;
//******************************************* [Конец - ОЗУ] **********************************************************//
//******************************************* [Начало - Файл подкачки] ***********************************************//
PageFilePanel := TMemo.Create(Page);
with PageFilePanel do
begin
Text := ' Файл подкачки';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(0); //оригинал S.T.A.L.K.E.R.
Top := RAMPanel.Top + 27;
Width := ScaleX(106); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := clBtnFace;
end;
PageFileTotalPanel := TMemo.Create(Page);
with PageFileTotalPanel do
begin
Text := ' ' + IntToStr(GetSystemPage) + ' MB';
Alignment := taLeftJustify;
Parent := Page.Surface;
Left := ScaleX(110); //оригинал S.T.A.L.K.E.R.
Top := PageFilePanel.Top;
Width := ScaleX(304); //оригинал S.T.A.L.K.E.R.
Height := ScaleY(22); //оригинал S.T.A.L.K.E.R.
ReadOnly := True;
Color := $CCFFCC;
end;
if GetSystemPage < 2048 then //Минимальное объем файла [в мегабайтах] подкачки 1 Гб или 1024 Мб
begin
StaticText.Caption := 'Компоненты, выделенные красным, не удовлетворяют требованиям игры.'#13+'Проверьте соответствие системным требованиям.';
PageFileTotalPanel.Color := $CCCCFF;
end;
Result := Page.ID;
end;
//******************************************* [Конец - Файл подкачки] ************************************************//
procedure ListBoxOnClick(Sender: TObject);
var
NewLetter, OldString: string;
i: Integer;
begin
for i := 0 to ListBox.Items.Count - 1 do
begin
if ListBox.Selected[i] then
begin
NewLetter := Copy(ListBox.Items[i], 0, 1);
OldString := Copy(WizardForm.DirEdit.Text, 2, Length(WizardForm.DirEdit.Text));
WizardForm.DirEdit.Text := NewLetter + OldString;
end;
end;
end;
procedure InitializeWizard();
var
Page: TWizardPage;
Text: TNewStaticText;
Memo: TMemo;
Path: string;
FreeMB, TotalMB: Cardinal;
drives: DWORD;
i: integer;
begin
CheckSystemPage(wpLicense);
Text := TNewStaticText.Create(WizardForm);
Text.Top := 110;
Text.Width := 332;
Text.Height := 14;
Text.Caption := 'Список жестких дисков и свободного места';
Text.Parent := WizardForm.SelectDirPage;
ListBox := TListBox.Create(WizardForm);
ListBox.Top := 128;
ListBox.Width := 208;
ListBox.Height := ScaleY(84);
ListBox.Parent := WizardForm.SelectDirPage;
ListBox.OnClick := @ListBoxOnClick;
ListBox.Font.Name := 'Courier New';
ListBox.Font.Size := 10;
ListBox.Color := clBtnFace;
drives := GetLogicalDrives();
for i := 0 to 31 do
begin
if (drives and (1 shl i)) > 0 then
begin
Path := chr(ord('A') + i) + ':\';
if GetDriveType(Path) = DRIVE_FIXED then
begin
GetSpaceOnDisk(Path, True, FreeMB, TotalMB);
if FreeMB>1024 then ListBox.Items.Add(Path + ' ' + IntToStr(round(FreeMB / TotalMB * 100)) + '% ' + floatToStr(round(FreeMB/1024*100)/100) + ' GB')
else ListBox.Items.Add(Path + ' ' + IntToStr(round(FreeMB / TotalMB * 100)) + '% ' + IntToStr(FreeMB) + ' MB');
end;
end;
end;
end;[/more]
- Континентальная хоккейная лига-09/10. 24 тур. 15-16.11.2009 (7) / воскресенье-понедельник
- Mr KMS:
[Mr KMS]
275. ЦСКА - СКА ........................ 2-3
276. Торпедо - Атлант .................. 2-3
277. Витязь - Северсталь ............... 3-2
278. Локомотив - Металлург Нк .......... 4-2
279. ХК МВД - Сибирь ................... 3-2
280. Ак Барс - Динамо М ................ 3-2
281. Нефтехимик - Динамо Мн ............ 3-2
282. Лада - Динамо Р ................... 2-3
283. Салават Юлаев - Автомобилист ...... 3-1
284. Барыс - Трактор ................... 3-2
285. Авангард - Металлург Мг ........... 2-3
[/Mr KMS]
- А тута будет БАР! (7) А с некоторых пор ещё и стриптиз-бар! (1040) / тута мы выпьем немного....
- SergeyGolubev:
PEDKA
Serg_Ivanov
Цитата:Пока при памяти...
уже при памяти... :beer: :gigi:
Цитата:Отправлено: 06:35 15-11-2009
ура товарисЧи - время на форуме RU-BOARD - правильное... :)
- Trance Energy (9) / Музыка, видео и все что касается сего действа
- ares20031978:
Trance Season: Melody of Autumn №1 (13.09.2009)
Альбом: Trance Season: Melody of Autumn №1
Дата: 13.09.2009
Стиль: Trance, Uplifting Trance
Количество: 40
Время: 307 min
Размер: 703 Mb
Tracklist:
1. Arnej - Tomorrow Never Comes (Intro Mix)
2. Armin Van Buuren feat. Van Velzen - Broken Tonight (Original Mix)
3. Ronski Speed feat. Ana - The Deep Devine (Gareth Emery Remix)
4. Three Drives - Automatic City (Orjan Nilsen Remix)
5. Simon Pitt feat. Vikki Lorenzo - Sun and Moon (Jonas Steur Mix)
6. Medina - You And I (Dash Berlin Mix)
7. Breakfast - Air Guitar (Original Mix)
8. Ashley Wallbridge - Dionysus (Original Mix)
9. Jerome Isma-Ae and Sebastian Kireg - 308 (Original Mix)
10. Myon and Shane 54 feat. Aruna - Helpless (Monster Mix)
11. Perpetual feat. Tiff Lacey - Restless (Matt Holliday Intro Mix)
12. Stoneface and Terminal - St. Francis Foley (Club Mix)
13. tyDi feat. Audrey Gallagher - You Walk Away (Original Mix)
14. Talla 2XLC vs. Robert Burian - Deja Vu (Giuseppe Ottaviani Remix)
15. Randy Katana - You And I (Original Mix)
16. Ummet Ozcan - Maya (Robert Ladiges Mix)
17. Sied Van Riel - Mongoosed (Original Mix)
18. Radion 6 - Ultra Disko (Original Mix)
19. Rex Mundi feat. Susana - Nothing At All (Original Mix)
20. Pedro Del Mar with Ciro Visone and Sara Pollino - Sunset At Luminosity Beach (Pedro Del Mar and Sensi Mix)
21. Mac and Mac - Solid Session (First State Remix)
22. Alex Kunnari - Last Sunrise (Original Mix)
23. Adiva feat. Vicky Fee - How Does It Feel (Stoneface and Terminal Vocal Mix)
24. Klauss Goulart - Deep Universe (M6 Remix)
25. Tiesto - Louder Then Boom (Extended Mix)
26. Jochen Miller - Brace Yourself (Extended Mix)
27. Activa vs. Chris and Matt Kidd - UR (Stoneface and Terminal Remix)
28. Phillip Aplha - Sudden Changes (Ashley Wallbridge Remix)
29. Heatbeat feat. Josie - Because Of You (M6 vs. Relocate Remix)
30. Signum - Addicted (Original Mix)
31. Arty - Sunset (Original Mix)
32. Emanuele Braveri feat. Tiff Lacey - Travel (EBJ Original Mix)
33. Dan Stone - Mumbai (Original Mix)
34. Jon O'Bir - Prophase (Original Mix)
35. Giuseppe Ottaviani - Our Dimension (Cressida Remix)
36. Mem - First Contact (Original Mix)
37. Ron Van Den Beuken and Maarten De Jong - Life's Too Short (Mark Sherrys Outburst Mix)
38. Smart Apes vs. Anna Lee feat. Kate Miles - Perfect (Existone Remix)
39. DJ Cosmo feat. Ray Wilson - Show Me The Way (Extended Mix)
40. Carl B - How Things Could Have Been (Sied Van Riel Remix)
Скачать Trance Season: Melody of Autumn №1 (13.09.2009)
Скачать сборник
- Проблемы с принтером НР DJ 3940 (4) /
- T90C:
Спасибо всем за помощь.
- S.T.A.L.K.E.R. Зов Припяти (Call of Pripyat) (454) / Поиск
- arom_uk:
а нормального трейнера на 1.6.01 ещё не пробегало?
Ребёнок плачет, быстро убивают его. :)
- ABBYY Lingvo (продолжение 8) (354) / Многоязычный словарь для ПК, КПК и смартфонов
- SergeyGolubev:
Webum
Цитата:Тут есть люди которые контактируют с автором PLUS сборки ?
есть - m0nkrus...
- Проблемы с принтером НР DJ 3940 (8) /
- T90C:
Спасибо за всем отзывы.