| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как конвертировать строку ? [D6, WinME, Win2k]
Barmaglot © (2002-11-10 19:48:00)Уважаемые программисты!
Подскажите, как можно в Дельфи определить следующую функцию:
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нигде не могу найти ...
Спасибо.
Song (2002-11-11 08:58:00) [1]2Юрий Зотов © (11.11.02 06:55)
Он по-моему извращенец, я ему ещё вчера об этом сказал:
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1036947124&n=0
sask (2002-11-11 07:09:00) [2]2 Barmaglot (10.11.02 19:48)
ExtractWord - из библиотеки RX (rxStrUtils.pas) - это на будущее...
Юрий Зотов (2002-11-11 06:55:00) [3]Жмем F1. В оглавлении справки раскрываем ветки:
-Visual Components Library Reference
--Categorical Routines Listing
---Date/Time Routines
И в итоге за 1 минуту находим StrToTime. Не изобретая велосипедов.
| |
