Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.09.18;
Скачать: [xml.tar.bz2];

Вниз

Ещё один баг в D6   Найти похожие ветки 

 
Lamer@fools.ua ©   (2005-08-27 12:42) [0]

Код неправильный, конечно, но сообщение об ошибке впечатляет :o)

program Project1;

{$APPTYPE CONSOLE}

type
 P1 = ^T1;
 T1 = packed array [0 .. MaxInt div SizeOf(PAnsiChar)] of PAnsiChar;

begin
end.


P.S. D6.240 (update pack 2)

P.P.S. Правильно так:
program Project1;

{$APPTYPE CONSOLE}

type
 P1 = ^T1;
 T1 = packed array [0 .. MaxInt div SizeOf(PAnsiChar) - 1] of PAnsiChar;

begin
end.


 
begin...end ©   (2005-08-27 12:48) [1]

> Lamer@fools.ua ©   (27.08.05 12:42)

В D7 -- "T1 is not a type identifier".

> сообщение об ошибке впечатляет

Ну, в каком-то смысле они правы... :-)


 
Lamer@fools.ua ©   (2005-08-27 12:55) [2]

>>begin...end ©   (27.08.05 12:48) [1]

>D7 -- "T1 is not a type identifier".

Значит, так и не исправили.

>Ну, в каком-то смысле они правы... :-)

Забавно то, что если T1 не использовать, а только объявить, то всё ОК:

program Project1;

{$APPTYPE CONSOLE}

type
 T1 = packed array [0 .. MaxInt div SizeOf(PAnsiChar)] of PAnsiChar;

begin
end.


 
Anatoly Podgoretsky ©   (2005-08-27 13:15) [3]

Есои не использовать то и проблемы нет, а если использовать то проблема налицо. Это уже не может быть идентификатором типа.



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

Форум: "Основная";
Текущий архив: 2005.09.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.01 c
1-1124840973
ArMellon
2005-08-24 03:49
2005.09.18
как реализовать шифрование типизированных файлов


14-1124944492
КаПиБаРа
2005-08-25 08:34
2005.09.18
Такое только а Рооссии бывает?


3-1123488421
Ярослав
2005-08-08 12:07
2005.09.18
Доступ к таблице Paradox


1-1125220739
*ALEX*
2005-08-28 13:18
2005.09.18
Вопрос простой. В RichEdit есть выделенный


3-1123148932
Koralnik
2005-08-04 13:48
2005.09.18
Запрос в базу данных удаленного сервера





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский