|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
31.07.2015, 22:10 | #1 |
Пользователь
Регистрация: 30.07.2015
Сообщений: 16
|
Delphi - Incompatible types
Код:
Помогите найти ошибку в этом коде (Incompatible types) Последний раз редактировалось Аватар; 31.07.2015 в 22:15. |
31.07.2015, 22:17 | #2 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
В процедуре Seek второй аргумент должен быть целым.
А у вас там Size/(1024*1024). Операция / всегда возвращает не целое , а действительное. Даже если 1/1 Потому что это Паскаль, а не Си. |
31.07.2015, 22:18 | #3 | |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Цитата:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
|
31.07.2015, 23:22 | #4 | |
Цифровой кот
Старожил
Регистрация: 29.08.2014
Сообщений: 7,629
|
Цитата:
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
|
|
31.07.2015, 23:34 | #5 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
min@y™, может это хитрость такая. Сказали надо файл записей, вот вам запись, самая простая, что может быть.
PS Правда, я не соображу, какова будет длина этой записи, с учетом, что record - не packed Последний раз редактировалось type_Oleg; 31.07.2015 в 23:37. |
31.07.2015, 23:45 | #6 |
Форумчанин
Регистрация: 30.06.2015
Сообщений: 353
|
В зависимости от настроек среды, если память не подводит. И если две версии программы скомпилированные в разных средах с разными настройками попытаются работать с одним файлом - могут напороться. Так что по-хорошему нужно packed.
Лично я не понимаю смысла при первой итерации: Код:
|
31.07.2015, 23:56 | #7 | ||||
Цифровой кот
Старожил
Регистрация: 29.08.2014
Сообщений: 7,629
|
Цитата:
Вообще, наверное, это заблуждение обусловлено двойственностью понятия "запись" в английском диалекте американской мовы: "record"/"write". Цитата:
Цитата:
Цитата:
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
Последний раз редактировалось Stilet; 01.08.2015 в 10:47. |
||||
01.08.2015, 00:16 | #8 | ||
Форумчанин
Регистрация: 30.06.2015
Сообщений: 353
|
Цитата:
Цитата:
|
||
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Incompatible types Почему? | dimavit | Общие вопросы Delphi | 4 | 29.07.2012 12:13 |
Incompatible types | MetR | Помощь студентам | 4 | 22.12.2011 18:31 |
incompatible types | nupinh | Общие вопросы Delphi | 1 | 21.05.2011 23:18 |
Delphi Incompatible types | Iogan Gamba Puti | Помощь студентам | 1 | 19.06.2008 13:45 |