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

Вниз

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

 
Barmaglot   (2002-11-10 19:52) [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 нигде не могу найти ...
Спасибо.


 
Song ©   (2002-11-10 20:32) [1]

:-) Ну Вы нагородили...

Вам всего-то нужна ф-ия StrToTime(). Борланд уже всё сделал, а Вы велосипед изобретаете :-)


 
Kent ©   (2002-11-11 13:45) [2]

Можно также FormatDateTime, мне кажется так даже проще будет, любой формат строки, любой разделитель. А вообще кто как больше любит :))



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

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

Наверх




Память: 0.46 MB
Время: 0.015 c
3-69188
Keksss
2002-11-01 09:42
2002.11.21
Фильтрация данных


1-69399
Faustov
2002-11-10 17:54
2002.11.21
Как передать в функцию как параметр двумерный динамический массив


1-69400
ctapik-net
2002-11-10 15:54
2002.11.21
Работа с ListVew


14-69549
alvan
2002-11-02 11:03
2002.11.21
Файлы *.doc


3-69195
Chak
2002-10-31 23:51
2002.11.21
Проверка правильности выполнения оператора INSETR INTO ...