function GetVersionEx(var lpVersionInformation: TOSVersionInfo): BOOL; stdcall;
Аргумент функции – структура TOSVersionInfo, содержит DwVersionInfoSize:DWORD – заполняется как sizeof TOSVersionInfo) перед вызовом функции DwMajorVersion:DWORD – старшая цифра версии Windows Win NT 3.5 = 3 Win NT 4.0, Win9x = 4 Win2000 = 5 Win XP = 5 DwMinorVersion: DWORD – младшая цифра версии Win NT 3.51 = 51 Win NT 4.0 = 0 Win 95 = 0 Win98 = 10 (вообще говоря больше 0 Win 2000 = 0 Win XP = 1
DwBuildNumber: DWORD Win NT 40 – номер билда Win 9x – старший байт – старшая и младшая цифры версии / младший – номер билда
dwPlatformId: DWORD VER_PLATFORM_WIN32s Win32s on
Windows 3.1. VER_PLATFORM_WIN32_WINDOWS Win32 on Windows 9x VER_PLATFORM_WIN32_NT Win32 on Windows NT, 2000 !
SzCSDVersion:DWORD NT – содержит PСhar с инфо о установленном ServicePack 9x– доп. инфо, может и не быть
Комментарий от Ошин Влад (RV@fss.moris.ru) я делаю так
R:=TRegistry.Create; R.RootKey:=HKEY_LOCAL_MACHINE; R.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion', False); No:=R.ReadString('Version'); //ну и все прочее из этого ключа R.Free;
Комментарий от BAHO (qvitron@mail.ru) Считаю нужным дополнить код Ошина Влада. В NT подобных ОС надо писать так: R.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion', False);
Дата
здравсвуйте, мастера. У меня возник вопрос: Есть поле DBEdit1 - дата убытия в командировку Есть поле DBEdit2 - дата ...
Хелп! Запароленный Paradox ...
Олл, а как к запароленному Paradox'у цепляться программно, через TTable ? Пароль известен. А то делаю Table1.Open, а он ...
History буфера обмена
Кто нибудь сталкивался с такой вещью? Как это можно риализовать? Примерчиком неподмогнете?
Помогите создать таблицу
Мне нужно создать таблицу, имя которой заранее не известно. Пытался это сделать через параметры, выдается ошибка - "The ...
Встроенный ASM
Господа!Как с помощью встроенного асма в делфях нарисовать на битмаре какую-нибудь фигуру (ромб,квадрат и т.д)???
Помогите вытащить символ
Вообщем есть буквы казахского алфавита которых нет в латинице или кирилице. Но в стандартном Times Roman они ...
Подскажите что делаю не так?
var List:TListBox; begin List:=TListbox.Create(form1); List.Items:=Listbox1.Items; Listbox2.Items:=List.Items; end; ...
Мир Borland Kylix. Первые впечатления.
Наверное каждый программист, хотя бы время от времени работающий с Delphi, слышал о том, что Kylix – это Delphi для Linux. Более строго, Kylix – это средство разработки на основе ObjectPascal и VCL для платформы Linux/QT. Данная серия статей предназначена прежде всего для программистов, ранее писавших на Delphi, и желающих теперь освоить программирование для Linux.
Delphi 6. Базы данных и приложения
В книге предпринята попытка дать читателю целостное представление о процессе разработки программного обеспечения для реляционных баз данных. В рамках поставленной цели авторами решены следующие задачи: рассмотрены основы языка Object Pascal на примере создания консольных приложений; рассмотрены объектно-ориентированные возможности языка Object Pascal и технология визуального программирования; описаны основные принципы работы с SQL-ссрвером InterBase; изложена методика взаимодействия программ, созданных в среде Delphi, с базами данных различного типа, в частности, SQL-сервером InterBase: рассмотрены основы проектирования баз данных с использованием программы ERwin; описана "методика разработки клиентского приложения для доступа к базам данных с использованием библиотек динамической загрузки, а также популярных программ Word и Excel для создания отчетов. На примере
БД "Учебные компьютерные курсы" рассмотрен процесс разработки программного обеспечения, !
начиная с вопросов проектирования и заканчивая подготовкой отчетов. Книга может быть использована в качестве основы курса лекции по соответствующей дисциплине. Книга предназначена для старшеклассников, студентов, аспирантов, преподавателей и пользователей ПК, интересующихся программированием.
Автор: Кандзюба С. "ДиаSoft"
Дельфи Топ20 "Дельфи Топ20" - это рейтинг небольших русских сайтов о Дельфи. С помощью него Вы сможете найти много интересной информации о Delphi!
» Оценка сайта: 2
Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.
Для души
Хокку дня
О, с какой тоской Птица из клетки глядит На полет мотылька!
Афоризмы
Знание - сила, всезнание - слабость....
Фраза дня
Ты, работа, нас не бойся, мы тебя не тронем.
Дурацкие законы (информация предоставлена сайтом kurilka.com)
В городе Оттумва в Айове (США) мужчина не может подмигивать женщине, если он с ней не знаком.
В Лос Анжелесе (США) существует постановление, запрещающее купать одновременно двух младенцев в одной и той же купели.
И на закуску коротенький анекдот
- Обвиняемый, вы признаете, что ограбили ювелирный магазин? - Нет. - Обвиняемый, в зале сидит 4 человека, которые видели, что грабили именно вы. - Подумаешь, я могу привести несколько тысяч человек, которые этого не видели.