Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.02.01;
Скачать: CL | DM;

Вниз

совместимость версий Делфи   Найти похожие ветки 

 
neveGreen   (2008-12-20 18:07) [0]

вот начал изучать книгу Бакнелл. Фундаментальные алгоритмы и структуры данных в Делфи. Очень хорошая книга, да вот примеры все не под седьмую версию, а она как раз у меня и стоит. Может кто сталкивался с проблемой и знает какие модули подключить, чтобы работали все примеры и мне больше не мучаться, а то я и первый не могу запустить:

function SeqSearch(aStrs : PStringArray;
                  aCount : Integer;
                  const aName: String5 ): Integer;
var i : Integer;                  
begin
 for i := 0 to pred(aCount) do
   if CompireText(aStrs^[i], aName) = 0 then begin
     Result := i;
     Exit;
   end;
 Rresult := -1;    
end;

Заранее благодарю.


 
Поросенок Винни-Пух ©   (2008-12-20 18:14) [1]

чтобы не мучиться, надо просто сообразить, что если какой-то тип не распознается, то надо найти *.pas файл, в котором есть текст <имя_неизвестного_типа_или_класса>

и что искать может компьютер, потому что он железный


 
Поросенок Винни-Пух ©   (2008-12-20 18:21) [2]

хотя compiretext скорее всего даже виндовый тузик не найдет.

он же английский знает


 
Правильный$Вася   (2008-12-20 18:29) [3]


> String5

не знаю такого типа
видать, в других модулях на диске с книжкой описан
ищи там, читай подряд книжку, а не выборочно


 
neveGreen   (2008-12-20 18:41) [4]


> Правильный$Вася   (20.12.08 18:29) [3]

я и читаю подряд, вначале автор написал, что весь код протестирован на версиях делфи 1-6 все работает... а мне надо на седьмой, разница лишь в том, что в семерке некоторые функции были перенесены в другие модули, а я не знаю в какие


 
Сергей М. ©   (2008-12-20 18:57) [5]


> я и первый не могу запустить


Рискну заявить, что причиной тому банальные очепятки в тексте примера, который ты скопипастил и процитировал здесь, а не в каких-либо "переносах"


 
neveGreen   (2008-12-20 19:09) [6]


> Сергей М. ©   (20.12.08 18:57) [5]

Ага, сорри, но
PStringArray и String5 в книге точно...
Значит в книге очепятки?


 
Сергей М. ©   (2008-12-20 19:24) [7]

Судя по String5 очень на то похоже.
Надо быть полным идиотом, чтобы рамеренно объявить такой тип, да еще в учебнике, да еще и по фундаметам)

PStringArray в Д7 точно нет.

CompireText - это вообще откровенный ляп, таких словов попросту не бывает, а бывает Compare (от англ. "сравнивать")


 
Тын-Дын ©   (2008-12-20 19:37) [8]


> neveGreen   (20.12.08 19:09) [6]
> > Сергей М. ©   (20.12.08 18:57) [5]Ага, сорри, ноPStringArray
> и String5 в книге точно... Значит в книге очепятки?


Что за книгу ты читаешь? В каком виде?


 
neveGreen   (2008-12-20 19:48) [9]


> Тын-Дын ©   (20.12.08 19:37) [8]

pdf
Creatyed by ScanKromsator
pdf ver 4.1
ну PStringArray это уж сильно мощная очепятка


 
Сергей М. ©   (2008-12-20 19:52) [10]


> все не под седьмую версию


А под какую ?


 
neveGreen   (2008-12-20 20:05) [11]


> Сергей М. ©   (20.12.08 19:52) [10]

автор тестировал все на версиях 1 - 6, при этом он указывает, что в некоторых примерах он дает директивы компилятору с информацией о версии, но в этом примере нет таких директив. Более того, в следующем примере тоже есть типы PStringArray и String5.


 
Тын-Дын ©   (2008-12-20 20:12) [12]


> neveGreen   (20.12.08 20:05) [11]


На какой странице пример этот?


 
Сергей М. ©   (2008-12-20 20:17) [13]


> neveGreen   (20.12.08 20:05) [11]


А что, примера вызова функции автор не приводит ?


 
neveGreen   (2008-12-20 20:30) [14]


> На какой странице пример этот?

22

> А что, примера вызова функции автор не приводит ?

увы, пока нет... щас я на 31, и судя по тексту уже не будет приводить, разве что позже в следующих главах


 
Сергей М. ©   (2008-12-20 20:35) [15]

Ну хорошо, а от нас ты собссно что хочешь ?

Ответы тебе ведь уже даны - опечатки налицо, а прочее (то что не похоже на опечатки) можно выяснить только имея под рукой все версии Делфи, указанные автором этого шедевра, либо пролистав весь шедевр в надежде найти там недостающие декларации ..


 
neveGreen   (2008-12-20 20:44) [16]

ну ладно, всем спасибо...


 
Тын-Дын ©   (2008-12-20 20:45) [17]

type
 PStringArray=^TStringArray;
 TStringArray=array of String;


 
neveGreen   (2008-12-20 20:48) [18]


> Тын-Дын ©   (20.12.08 20:45) [17]

спасибо, думаю это будет далее в книге... или Вы уже посмотрели? :)


 
Anatoly Podgoretsky ©   (2008-12-20 20:54) [19]

> neveGreen  (20.12.2008 18:41:04)  [4]

Если судить по этим вещам

if CompireText
Rresult := -1;

То вряд ли автор к этому имеет отношение и в любом случае нет никакого доверия к остальному тексту.


 
Сергей М. ©   (2008-12-20 21:00) [20]


> вряд ли автор к этому имеет отношение


Эт точно.
Переводчика вместе с его шедевром - фтопку)


 
neveGreen   (2008-12-20 21:03) [21]


> Anatoly Podgoretsky ©   (20.12.08 20:54) [19]

нет, это лично мои опечатки
все прекрасно с примером кроме:
PStringArray и String5


 
Тын-Дын ©   (2008-12-20 21:04) [22]


> Эт точно.Переводчика вместе с его шедевром - фтопку)


Это распознавание текста глючило.
У меня в PDF всё нормально.


> neveGreen   (20.12.08 20:48) [18]
> > Тын-Дын ©   (20.12.08 20:45) [17]спасибо, думаю это будет
> далее в книге... или Вы уже посмотрели? :)


Этого вообще нет там.
Не знаю, зачем автор привёл этот код. Но скорее всего, чтобы привести пример сравнения алгоритмов и методов оих оценки.


 
Anatoly Podgoretsky ©   (2008-12-20 21:05) [23]

Я не знаю откуда этот пример из книги, или с диска.
Примеры конечно очень часто страдают описками, опечатками, поскольку таклй простой код не проверяют в компиляции. А в книге еще и дополнительные опечатки, которых может не быть на диске.


 
Тын-Дын ©   (2008-12-20 21:05) [24]

Да, String5 и у меня есть. Но остальных опечаток нет.


 
Тын-Дын ©   (2008-12-20 21:05) [25]


> Anatoly Podgoretsky ©   (20.12.08 21:05) [23]
> Я не знаю откуда этот пример из книги, или с диска.


На диске нет примера такого.


 
Anatoly Podgoretsky ©   (2008-12-20 22:21) [26]


> нет, это лично мои опечатки

Тогда смени

String5 на String
CompireText на CompareText
Rresult на Rresult

и

> Тын-Дын ©   (20.12.08 20:45) [17]
> type
>   PStringArray=^TStringArray;
>   TStringArray=array of String;


 
neveGreen   (2008-12-21 00:53) [27]

спасибо все сделал :)



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

Текущий архив: 2009.02.01;
Скачать: CL | DM;

Наверх




Память: 0.53 MB
Время: 0.011 c
15-1228447092
Slider007
2008-12-05 06:18
2009.02.01
С днем рождения ! 5 декабря 2008 пятница


3-1214206318
Matveih1
2008-06-23 11:31
2009.02.01
Как из Delphi завести нового пользователя в FireBird


2-1229523838
Ru
2008-12-17 17:23
2009.02.01
Напомните по WinAPI


3-1213875860
PSV
2008-06-19 15:44
2009.02.01
ADO (странное поведение)


15-1228652353
DillerXX
2008-12-07 15:19
2009.02.01
Питание для переносного винчестера