Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c