Главная страница
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.011 c
3-69195
Chak
2002-10-31 23:51
2002.11.21
Проверка правильности выполнения оператора INSETR INTO ...


4-69628
TankMan
2002-10-08 04:37
2002.11.21
Выключение компа но не простое.....:)


3-69150
orlando
2002-10-31 12:41
2002.11.21
TSession


3-69146
Max Zyuzin
2002-10-30 08:41
2002.11.21
Совет нужен по IB


1-69280
Сатир
2002-11-11 14:17
2002.11.21
Creating Property Editor