StrToBool

[grave]

Używam Delphi 5. Przy próbie kompilacji HGG.pas (komponent HGG) zostaje podkreślona linijka:

Friend := (not StrToBool(Explode(';', USR[i], 12)));

A w pasku błędów:

[Error] HGG.pas(1036): Undeclared identifier: 'StrToBool'

Tak jest przy naciśnięciu na "Compile" przy budowaniu paczki.

Wpisuję w helpie Delphi: StrToBool - nic się nie wyświetla. Myślę więc sobie, że albo w mojej wersji Delphi tego nie ma, albo brakuje mi jakiegoś komponentu/pakietu/pliku/etc.

Jednak gdy naciskam F9, wszystko się ładnie kompiluje.

Czy ktoś wie, jak mogę skompilować ten plik, aby zainstalować komponent?

 

[rafal]

zobacz czy w SysUtils - masz funkcje StrToBool
albo zrob jakis bylejaki program i uzyj tej funkcji , bo mozliwe ze Delphi 5 jej nie obsluguje

 

[grave]

Niestety, dowiedziałem się, że po prostu jednak Delphi 5 nie obsługuje tej funkcji.
Może mogę zdefiniować własną funkcję StrToBool? Tylko jak ona powinna wyglądać?
Może być to po prostu:

function StrToBool(s: string): Boolean;

begin

if StrToInt(s) = 0 then

   Result := False

else

   Result := True;

end;

czy zależy to od pliku HGG.pas ?