Объявление 32-х битного типа не удается.

[Alex Cones]

Library ACA128;

Type
 LongWord = 0..4294967295;

Begin
End;

ERROR [7]: Error in integer constant

Как исправить? Нужно объявить целый беззнаковый 32-х битный тип.

P.S. {$N+} - Не помог.

[profi]

У меня все ОК.

library Project1;

uses
  SysUtils,
  Classes;

type
    LongWord = 0..4294967295;

    var
      a : LongWord;


{$R *.res}

begin
end.

[Alex Cones]

Вы компилировали в дельфи, а тема расположена в разделе "паскаль".

[profi]

У вас какой компилятор? Возможно нужно подключить дополнительные модули.

[Alex Cones]

Обыкновенный TP7.0
P.S. Догадался нажать F1 (Лучше поздно, чем никогда). Вот, что получил. Теперь буду искать загадочный Turbo Pascal Language Guide. Врятли эта легендарная книга существует...

P.S. Yandex про это ничего не знает... :'( Жаль...

[profi]

Alex Cones если не секрет. А зачем там мучаться? Может все таки в Delphi реализуете, то что нужно.

[Alex Cones]

Alex Cones если не секрет. А зачем там мучаться? Может все таки в Delphi реализуете, то что нужно.

1) Паскаль дает исполняемые файлы/библиотеки минимальных размеров.
2) Намного интересней развивать мозг, решая такие проблемы и раздумывая, как обходить ограничения компилятора, чем просто кинуть на форму кнопку, назначить на неё код и считать себя великим программистом (имея размер exe в 500-1000 кб).

P.S. Я так понимаю, проблема путем "в лоб" не решается. Придется тогда искать обходной путь...

[raxp]

у меня help/index выдал по типам сие...

[Alex Cones]

Но ведь 0FFFFh это всего лишь 65535...

[raxp]

таки, как насчет обходных маневров... по входу ок, по выходу надоть подумать...

Library ACA128;

Type
 LongWord = array [0..31] of byte;



function stype(x: longword):integer; export;
begin
 stype:= x[0]
end;

exports stype index 1;


begin
end.