Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Structure determination


jonni ©   (2003-09-11 04:32:00) 

в языке С++ есть такая структура:
union {
UINT uTimeout;
UINT uVersion;
};
a mozhno li sdelat" tozhe samoe v Delphi ili ne"zya??


Verg   (2003-09-11 11:12:00) [1]

type
TUnionRecord = record
case boolean of
false:(utimeout : DWORD);
true :(uVersion : DWORD);
end;

var Ur : TUnionRecord;
begin
Ur.uTimeout:=INFINITE; // например
.....


Какие проблемы, возмите Паскаль изучите.
Запись с вариантами называется (в С - это объединение)


MishaS   (2003-09-11 10:57:00) [2]

Verg, а как её использовать в программе, например получить доступ
к utimeout.


Verg   (2003-09-11 09:32:00) [3]

type
TUnionRecord = record
case boolean of
false:(utimeout : DWORD);
true :(uVersion : DWORD);
end;


default   (2003-09-11 05:44:00) [4]

UINT = LongWord
см. модуль Windows
у тебя будет что-то типа:
YourRecordType = record
uTimeout, uVersion: UINT;
end;


default   (2003-09-11 05:39:00) [5]

можно


Наверх

Титульная страница Поиск, карта сайта Написать письмо