Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Объявление двоичных констант [D6]

Страницы: < 1 2
Ops © (2002-12-16 15:29:00)
const b = 1111111111110011b;
c = 1111111111101111b;
НЕПРОХОДИТ...

Reindeer Moss Eater (2002-12-16 16:07:00) [21]
By default, numeric constants use decimal notation, but the built-in assembleralso supports binary, octal, and hexadecimal.

Ops (2002-12-16 16:04:00) [22]
Не - перевести в шестнадцатиричный это запросто...
Просто надо менять битики часто- с другой стороны стоит палм на коме - там часто меняют (пока) настройки кома...
Обидно что РАНЬШЕ 100% компилялась!!!

Ops (2002-12-16 15:58:00) [23]
Может можно поставить принудительно опции компилятора и какие?

Anatoly Podgoretsky (2002-12-16 15:57:00) [24]
Может в 7 появились, но сомневаюсь, ассемблерные вставки не рассматриваю

Ops (16.12.02 15:39)
1.
const b = $FFF3 // 1111111111110011b;

2.
const b1111111111110011 = $FFF3

Calm (2002-12-16 15:51:00) [25]

> Reindeer Moss Eater (16.12.02 15:47)
> Нету двоичных констант в Object Pascal!

Да как нет? Я только что у себя проверил - компилит.

Reindeer Moss Eater (2002-12-16 15:47:00) [26]
Нету двоичных констант в Object Pascal!

Ops (2002-12-16 15:39:00) [27]
Это инициализация для ком порта
и нужно смотреть по битикам...
const b = 1111111111110011b;
c = 1111111111101111b;
c1= 0000000000100000b;
d = 1111110011111111b;
e = 1110111111111111b;
e1= 0010000000000000b;
var ct: TCommTimeouts;
dcb: TDCB;
begin
f := Windows.CreateFile(PChar(Port), GENERIC_READ or
GENERIC_WRITE,
FILE_SHARE_READ or FILE_SHARE_WRITE,
nil, OPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL, 0);
if (f < 0) or not Windows.SetupComm(f, 2048, 2048)or not
Windows.GetCommState(f, dcb) then exit; //init error
GetCommState(f, dcb);
dcb.Flags := dcb.Flags and b ; // OutXCtsFlow
dcb.Flags := (dcb.Flags and c) or c1;
dcb.Flags := dcb.Flags and d;
dcb.Flags := (dcb.Flags and e) or e1;

Компиляция неделю назад ПРОХОДИЛА... Враги ГДЕ-ТО изменили настройки!!! Помогите...

Calm (2002-12-16 15:34:00) [28]
У меня, кстати, такой код вполне проходит

Calm (2002-12-16 15:33:00) [29]
Ой, я совсем не в тему.
Невнимателен я сегодня :((

Calm (2002-12-16 15:32:00) [30]
А почему это, интересно, должно проходить?

Вот если бы было что-то вроде
const c:integer=10 ... begin c:=20;

Anatoly Podgoretsky (2002-12-16 15:31:00) [31]
А шестнадцатиричные не проходят по регигии?

Страницы: < 1 2

Наверх

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