delphi如何取得本地伺服器的時間？原始碼最好了

1樓：龍胖胖紙

本機就now，如果是資料庫所在機子的話，就使用對應資料庫查詢當前時間的語句執行，獲取返回值即可。

2樓：網友

利用資料庫取伺服器時間，如果是sql的用。

select getdate()

delphi中怎麼獲取伺服器的時間,從資料庫中獲取

3樓：來自靜思園有志氣的海象

function getnetdate: tdatetime;

beginwith do

begintryconnection := adoconnection1; // 繫結資料庫連線物件。

if = dtmssql then // 這裡你自己處理一下，公司**的意思是，如果當前資料庫是mssql server

select getdate() as curdate ')

else = dtoracle then // 如果當前資料庫是oracle

select sysdate as curdate from dual ');

open;result := fieldbyname('curdate').asdatetime;

finally

free;end;

end;end;

簡單的說，mssql資料庫，使用「select getdate() 這樣的sql語句獲取資料庫伺服器時間，而oracle則使用「select sysdate」這樣的sql語句。

4樓：網友

前面的說的已經很全面了。

5樓：網友

不知你是什麼資料庫，sql server中可以用getdate函式獲取當前的日期和時間。

delphi改變系統時間的**

6樓：網友

你如果是想把2010-1-1顯示為2010-01-01vart:tdatetime;

fs:tformatsettings;

'yyyy-mm-dd';

t := strtodate('2010-01-01',fs);//, ;

showmessage(datetimetostr(t,fs));

delphi中客戶端如何獲得伺服器時鐘時間

7樓：網友

如果要即時顯示伺服器時間，最好先同步伺服器時間，然後用timer顯示本地時間。

1、獲取伺服器時間。

如果取資料伺服器時間，可以用sql取，如oracle的sysdate。。。select sysdate from dual

如果取應用伺服器時間，可以在伺服器寫個遠端方法取伺服器本地時間如：now,，然後客戶端呼叫。

2、客戶端同步伺服器時間 uses windows;setsystemtime();

3、timer定時重新整理本地時間。

8樓：

1：如果是sql資料庫程式：select getdate()2：socket元件通訊。

取得時間後，比較時間差，如果超過一定值（如30秒），執行時間同步：

根據提供的時間設定本地系統時間。

function set_localtime(atime: tdatetime): boolean;

varadatetime: tsystemtime; /系統時間格式。

adatetime);

result :=setlocaltime(adatetime);

sendmessage(hwnd_broadcast, wm_timechange, 0, 0); 廣播訊息：時間已改變！

end;

delphi 怎樣獲得系統時間？

9樓：oo木葉之魂

date()函式並沒有錯，只是這是delphi裡面的取當前日期的函式，不能用在sql語句裡面，可以給這兩個日期賦值變數rq，rq2 然後在外面執行date()函式。

**如下。begin;;

insert into 借閱表(讀者證號，條形碼，借閱日期，應還日期，借書管理員代號，還書管理員代號，書名) values('''+trim(''','''+trim(''',:rq,:rq2,'''+trim(''','''+trim(''','''+trim(''')' );

rq').value:=date();

rq2').value:=date()+30;

end;

10樓：網友

var rq1,rq2:string;

beginrq1:=formatdatetime('yyyy-mm-dd',now())

rq2:=formatdatetime('yyyy-mm-dd',now()+30);;

insert into 借閱表(讀者證號，條形碼，借閱日期，應還日期，借書管理員代號，還書管理員代號，書名) values('''+trim(''','''+trim(''','''+rq1+''','''+rq2+''','''+trim(''','''+trim(''','''+trim(''')' );

end;

11樓：網友

delphi 取系統時間直接now

他的格式是datetime型，如果你插入資料庫的話這裡要轉換'insert into 借閱表(讀者證號，條形碼，借閱日期，應還日期，借書管理員代號，還書管理員代號，書名) values('''+trim(''','''+trim(''','+datetostr(now)+','+datetostr(now+30)+','''+trim(''','''+trim(''','''+trim(''')' );

如果要自定義日期格式就是formatdatetime('yyyy-mm-dd hh:mm:ss ddd',now);

12樓：網友

可以直接在sql server下使用getdate()

例如：insert into 表（日期） values (getdate())

或者你在設計表的時候就將這一列的預設值設為當前時間，你寫**的時候都不用考慮這個了。

13樓：網友

如要用資料庫取時間的話。

sqlserver 是 getdate()

14樓：文件類共創空間

函式原型為：

void getsystemtime(lpsystemtime lpst)，引數指標lpst獲取系統時間，因此可如以下程式段實現：

procedure : tobject);

varsystime: tsystemtime;

begingetsystemtime(systime);

caption:=inttostr(' '+inttostr(;

if >2000 then

..在程式邏輯中利用獲取的各類時間值end;

delphi如何從源**中提取文字

15樓：網友

建議你去看看正規表示式。和樓上說的一樣，屬於字串處理方面的。

16樓：網友

這是如何處理字串的問題了。

只要過濾去那些等等的字元就好了！

delphi如何取得本地伺服器的時間？原始碼最好了

伺服器如何配置，伺服器如何配置？

如何配置伺服器，自己如何搭建伺服器。

dhcp伺服器如何配置，DHCP伺服器如何配置

其他用戶還看了：