Автор проектов
Сообщения: 3652 Благодарности: 1498
Профиль | Сайт | Отправить PM | Цитировать
function InitializeSetup(): Boolean; begin if IsWin64 then Result:= True else MsgBox('На вашем компьютере установлена 32-битная ОС.' + #13#10 'Установка невозможна!', mbInformation, MB_OK); end;
------- Рекомендую: $25 на тест виртуального сервера (VPS) за регистрацию по ссылке
Отправлено: 16:53, 14-04-2010 | #1706