HAMLOG開発室は、HAMLOGに関連したプログラム開発(C、パスカル、VB言語等、又はDLL)についての
専用BBSです。プログラム言語に関する投稿以外は通常のHAMLOG相談室に投稿して下さい。
HAMLOG開発室BBS

Re: Pascal UTC to JST 投稿者:JG1MOU浜田

> Pasacl 講座の続きですがお願いします。
>
> UTC を JST に変換する処理でつまずいています。
> VB2010 ではサンプルも多くあり既に出来ていますが Pasacl の例が少ないようで。
>
> Delphi のサンプルはそこそこありますが宣言の procedure 文の記載箇所が正しく無いようでエラーで落ちてしまったり
> 流用出来ないでいます。

何が解らないのかが解らないのですが、HAMLOGでは、Windows-APIを
使って変換してます。

var
 Systm: TSYSTEMTIME;
 Filtm1, Filtm2: TFILETIME;
begin
if SystemTimeToFileTime(Systm, Filtm1) and
// LocalFileTimeToFileTime(Filtm1, Filtm2) and // JST => UTC
  FileTimeToLocalFileTime(Filtm1, Filtm2) and // UTC => JST
  FileTimeToSystemTime(Filtm2, Systm) then
    変換完了!;
end;

2017/08/05(Sat) 09:02:50  [No.809]


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)
- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)
Call 名前 ※必須
文字色
Eメール
タイトル sage
URL
メッセージ 手動改行 強制改行 図表モード
メッセージには上記と同じURLを書き込まないで下さい
画像File  (130kBまで)
暗証キー (英数字で8文字以内)
投稿キー (投稿時 投稿キー を入力してください)
プレビュー