Как конвертировать строку ?

← →
Barmaglot (2002-11-10 19:48) [0]

Уважаемые программисты!
Подскажите, как можно в Дельфи определить следующую функцию:

function TForm1.ConvertToHour(TS:string):real; var Hours,Mins,Err:integer; begin Val(ExtractWord(1,TS,[".","/","-",":"]),Hours,Err); Val(ExtractWord(2,TS,[".","/","-",":"]),Mins,Err); ConvertToHour:=Hours+Mins/60; end;

Функцию ExtractWord нигде не могу найти ...
Спасибо.

← →
Юрий Зотов © (2002-11-11 06:55) [1]

Жмем F1. В оглавлении справки раскрываем ветки:
-Visual Components Library Reference
--Categorical Routines Listing
---Date/Time Routines

И в итоге за 1 минуту находим StrToTime. Не изобретая велосипедов.

← →
sask © (2002-11-11 07:09) [2]

2 Barmaglot (10.11.02 19:48)
ExtractWord - из библиотеки RX (rxStrUtils.pas) - это на будущее...

2Юрий Зотов © (11.11.02 06:55)
Он по-моему извращенец, я ему ещё вчера об этом сказал:
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1036947124&n=0

Как конвертировать строку ? Найти похожие ветки