Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.20;
Скачать: CL | DM;

Вниз

Как не дать запуститься своей проге?   Найти похожие ветки 

 
maxim2 ©   (2003-01-11 13:04) [0]

Привет всем!
Такая проблемка возникла например если прога запускается на платформе NT как не дать ей запуститься?
Подскажите кто знает.


 
Pasechnik   (2003-01-11 13:08) [1]

if GetVersion >= $80000000 then //твой код для 95/98//
else
close;
элементарно.


 
maxim2 ©   (2003-01-11 13:16) [2]

Я немножко не так определяю

if Win32Platform = VER_PLATFORM_WIN32_WINDOWS then
//мой код
else
close;

Как узнать платформу я знаю а куда вставить этот код?


 
Anatoly Podgoretsky ©   (2003-01-11 13:23) [3]

В самое начало програмы


 
maxim2 ©   (2003-01-11 13:29) [4]

> Anatoly Podgoretsky

Создаю проэкт File\New\Application

Куда там вставлять в unit project1 в событие форме oncreate не катит.


 
maxim2 ©   (2003-01-11 13:37) [5]

Все дошло, спасибо всем


 
Verg ©   (2003-01-11 13:38) [6]

Project/view source/

uses
Forms,
.....
sysutils;


begin
if Win32Platform = VER_PLATFORM_WIN32_WINDOWS then
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end;
end.



Страницы: 1 вся ветка

Текущий архив: 2003.01.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.023 c
14-62751
Driverrr
2003-01-04 16:23
2003.01.20
Инфа о сидюке...


1-62490
dimich1978
2003-01-10 11:41
2003.01.20
Как заставить Hint появляться по таймеру. Например для panelи


1-62587
Maksss
2003-01-08 08:00
2003.01.20
не доходит до адресата sendmessage !!!!!!


6-62713
Warlock[NT]
2002-11-20 07:47
2003.01.20
Wake On Lan


3-62376
Bakch
2002-12-25 08:58
2003.01.20
Crystal Report