> > Всем привет! > > > > Помогите перевести код с Delphi на С++.... > > > > Нужен аналогичной по функционалу код, но на С++... > > > > function SecsSince:longint; > > var > > s, sNow : TTimeStamp; > > begin > > s := > DateTimeToTimeStamp(EncodeDate(1990,1,1)); > > sNow := DateTimeToTimeStamp(Now); > > result := Floor(TimeStampToMSecs(sNow) / 1000 - > > TimeStampToMSecs(s) / 1000); > > end; > Что такое TTimeStamp и прочие связанные с ними фенкции
делают не знаю, поэтому пока только так:
int SecsSince() {
TTimeStamp s, sNow;
s = DateTimeToTimeStamp(EncodeDate(1990,1,1));
sNow = DateTimeToTimeStamp(Now);
return Floor(TimeStampToMSecs(sNow) / 1000 - TimeStampToMSecs(s) / 1000);
}
Дальше если опишешь что делают эти все делюфёвские функции
то магу сделать тебе на чистом C++ без всяких там
борлондовских замудронов. Если будешь в C++ Builder это
переносить, то должно работать, они вроде по набору функции
совместимы, хотя не уверен
Нужен аналогичной по функционалу код, но на С++...
function SecsSince:longint;
var
s, sNow : TTimeStamp;
begin
s := DateTimeToTimeStamp(EncodeDate(1990,1,1));
sNow := DateTimeToTimeStamp(Now);
result := Floor(TimeStampToMSecs(sNow) / 1000 - TimeStampToMSecs(s) / 1000);
end;
Что такое TTimeStamp и прочие связанные с ними фенкции...15.03.05 11:48 Автор: 0x4368616F73 Статус: Незарегистрированный пользователь
> Всем привет! > > Помогите перевести код с Delphi на С++.... > > Нужен аналогичной по функционалу код, но на С++... > > function SecsSince:longint; > var > s, sNow : TTimeStamp; > begin > s := DateTimeToTimeStamp(EncodeDate(1990,1,1)); > sNow := DateTimeToTimeStamp(Now); > result := Floor(TimeStampToMSecs(sNow) / 1000 - > TimeStampToMSecs(s) / 1000); > end;
Что такое TTimeStamp и прочие связанные с ними фенкции делают не знаю, поэтому пока только так:
int SecsSince() {
TTimeStamp s, sNow;
s = DateTimeToTimeStamp(EncodeDate(1990,1,1));
sNow = DateTimeToTimeStamp(Now);
return = Floor(TimeStampToMSecs(sNow) / 1000 - TimeStampToMSecs(s) / 1000);
}
Дальше если опишешь что делают эти все делюфёвские функции то магу сделать тебе на чистом C++ без всяких там борлондовских замудронов. Если будешь в C++ Builder это переносить, то должно работать, они вроде по набору функции совместимы, хотя не уверен
> > Всем привет! > > > > Помогите перевести код с Delphi на С++.... > > > > Нужен аналогичной по функционалу код, но на С++... > > > > function SecsSince:longint; > > var > > s, sNow : TTimeStamp; > > begin > > s := > DateTimeToTimeStamp(EncodeDate(1990,1,1)); > > sNow := DateTimeToTimeStamp(Now); > > result := Floor(TimeStampToMSecs(sNow) / 1000 - > > TimeStampToMSecs(s) / 1000); > > end; > Что такое TTimeStamp и прочие связанные с ними фенкции
делают не знаю, поэтому пока только так:
int SecsSince() {
TTimeStamp s, sNow;
s = DateTimeToTimeStamp(EncodeDate(1990,1,1));
sNow = DateTimeToTimeStamp(Now);
return Floor(TimeStampToMSecs(sNow) / 1000 - TimeStampToMSecs(s) / 1000);
}
Дальше если опишешь что делают эти все делюфёвские функции
то магу сделать тебе на чистом C++ без всяких там
борлондовских замудронов. Если будешь в C++ Builder это
переносить, то должно работать, они вроде по набору функции
совместимы, хотя не уверен
Сомневаюсь что эти функции есть в С++, проблема в чем и...15.03.05 12:04 Автор: alex_b Статус: Незарегистрированный пользователь
>> s = DateTimeToTimeStamp(EncodeDate(1990,1,1));
Сомневаюсь что эти функции есть в С++, проблема в чем и встала...
На самом деле нужно вычеслить число секунд с 1990 года по сегодняшний день!!!
Linux заморочен на этом... =(
CLX основан на QT. Причем на очень древней QT. И представляет собой тормозную обертку из борландовских TWinControl, TCanvas и тп написанных на вызовах QT (VCL представляет собой тоже самое но на WINAPI).
Заставить нормально работать Kylix и программы написанные на нем (особенно Kylix C++) под современной системой -геморр еще тот, включающий в себя патчение самого Kylix, написание скрипта для запуска kylix приложения, который будет менять переменную окружения где программа будет искать старые qt либы. Для Kylix C++ еще придется скачать и поставить древний stdc++ и настроить все так чтобы он юзал именно древнюю стдс++.
Вобщем геморрой дикий, а учитывая глючность kylix'а (на некоторых ядрах виснет при отладке/сохранении/загрузке) становится понятным что kylix для серъезных разработок совсем не годиться. Зато QT - само то.
Kylix C++ не знаю. Скажу только про Graphics3217.03.05 21:52 Автор: Neznaika <Alex> Статус: Member
Уже несколько раз приходилось использовать компоненты из этой библиотеки (http://g32.org/) - и никогда особых проблем не было.
Но я не настаиваю.
Если Вы пишете особо продвинутые вещи типа IFS, Firewall, LSP - то с большой вероятностью будет масса проблем, и по-моему это нормально. Если человек хочет написать анти-вирусный движок или драйвер файловой системы - он должен быть готов к тому, что это будет геморрой во всю задницу.
P.S.
Мне кажется, мы несколько отошли от главной темы.