0

Собственно интересует, как корректно организовать работу функции TryStrToBool в Delphi 5?

1 ответ 1

3

А где то так

function TryStrToBool(s:string; default:boolean):boolean;
begin
  s := trim(s);
  if sametext(s, 'true') then result := true
  else if sametext(s, 'false') then result := false
  else result := default;
end;

Ваш ответ

Нажимая на кнопку «Отправить ответ», вы соглашаетесь с нашими пользовательским соглашением, политикой конфиденциальности и политикой о куки

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.